{A B C : Type} {a00 a10 a01 a11 : A} {px0 : a00 = a10} {px1 : a01 = a11} {p0x : a00 = a01} {p1x : a10 = a11} (f : A -> B) (g : B -> C) (s : PathSquare px0 px1 p0x p1x) : PathCube (sq_ap (g o f) s) (sq_ap g (sq_ap f s)) apc apc apc apc. Proof. by destruct s. Defined.
Require Import Basics. Require Import Cubical.DPath. Require Import Cubical.PathSquare. Require Import Cubical.DPathSquare. Require Import Types.Paths Types.Prod.