{A B C} (f : B -> A) (g : C -> A) := { b : B & { c : C & f b = g c }}.
Require Import HoTT.Basics HoTT.Types. Require Import HFiber Homotopy.IdentitySystems Cubical.PathSquare. Require Import Diagrams.CommutativeSquares.