proposition: Proposition compact_el_way_below_le {X : dcpo} {x y : X} (p : is_compact_el x) (q : x ⊑ y) : x ≪ y.
proof: Proof. exact (trans_way_below_le p q). Qed.
imports: UniMath.MoreFoundations.All UniMath.OrderTheory.DCPOs.Core.DirectedSets UniMath.OrderTheory.DCPOs.Core.Basics UniMath.OrderTheory.DCPOs.Core.WayBelow UniMath.OrderTheory.DCPOs.Basis.Continuous