fact: Definition Smash_rec_beta_glue {P : Type} {Psm : X -> Y -> P} {Pl Pr : P} (Pgl : forall a, Psm a pt = Pl) (Pgr : forall b, Psm pt b = Pr) (a : X) (b : Y) : ap (Smash_rec Psm Pl Pr Pgl Pgr) (glue a b) = ((Pgl a) @ (Pgl pt)^) @ (Pgr pt @ (Pgr b)^).
imports: Basics Pointed.Core Types Colimits.Pushout Cubical