fact: Definition pullback_corec {A B C D} {f : A -> B} {g : C -> D} {h : A -> C} {k : B -> D} (p : k o f == g o h) : A -> Pullback k g := fun a => (f a ; h a ; p a).
imports: HoTT.Basics HoTT.Types HFiber PathAny Cubical.PathSquare Diagrams.CommutativeSquares