proposition: Proposition prod_dcpo_le {X Y : dcpo} (xy₁ xy₂ : (X × Y)%dcpo) (p : pr1 xy₁ ⊑ pr1 xy₂) (q : pr2 xy₁ ⊑ pr2 xy₂) : xy₁ ⊑ xy₂.
proof: Proof. exact (p ,, q). 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.ScottTopology UniMath.OrderTheory.DCPOs.Core.WayBelow UniMath.OrderTheory.DCPOs.Basis.Basis UniMath.OrderTheory.DCPOs.Basis.Continuous UniMath.OrderTheory.DCPOs.Elements.Maximal