fact: Definition incl_scott_continuous_map (x : X) : scott_continuous_map (Y x) coproduct_set_dcpo := (λ y, x ,, y) ,, is_scott_continuous_incl x.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.OrderTheory.Posets UniMath.OrderTheory.DCPOs.Core.DirectedSets UniMath.OrderTheory.DCPOs.Core.Basics UniMath.OrderTheory.DCPOs.Core.ScottContinuous