proposition: Proposition unit_dcpo_basis_laws : dcpo_basis_laws unit_dcpo unit_dcpo_basis_data.
proof: Proof. intro x. split. - split. + refine (hinhpr (tt ,, _)). apply unit_dcpo_way_below. + intros i j. refine (hinhpr ((tt ,, _) ,, (tt ,, tt))). apply unit_dcpo_way_below. - split. + intro ; exact tt. + intros ? ?. exact tt. Qed.
imports: UniMath.MoreFoundations.All UniMath.OrderTheory.Posets.Basics UniMath.OrderTheory.Posets.PointedPosets UniMath.OrderTheory.Posets.MonotoneFunctions UniMath.OrderTheory.DCPOs.Core.DirectedSets UniMath.OrderTheory.DCPOs.Core.Basics UniMath.OrderTheory.DCPOs.Core.ScottContinuous UniMath.OrderTheory.DCPOs.Core.WayBelow UniMath.OrderTheory.DCPOs.Basis.Basis UniMath.OrderTheory.DCPOs.Basis.Continuous