{a a' : A} (b b' : B) (p : a = a') : jglue a b @ (jglue a' b)^ = jglue a b' @ (jglue a' b')^. Proof. destruct p. exact (concat_pV _ @ (concat_pV _)^). Defined.
Require Import Basics Types. Require Import Cubical.DPath Cubical.PathSquare. Require Import NullHomotopy. Require Import Extensions. Require Import Colimits.Pushout. Require Import Truncations.Core Truncations.Connectedness. Require Import Pointed.Core. Require Import WildCat. Require Import Spaces.Nat.Core.