(a : A) (b : B) : diamond_v_sq a a 1 = diamond_h_sq b b 1. Proof. unfold diamond_v_sq, diamond_h_sq, diamond_v, diamond_h. symmetry; apply ap, 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.