fact: Definition joinl {A B} : A -> Join A B := fun a => @pushl (A*B) A B fst snd a.
imports: Basics Types Cubical NullHomotopy Extensions Colimits.Pushout Truncations.Core Truncations.Connectedness Pointed.Core WildCat Spaces.Nat.Core