{X : Type} (P : Susp X -> Type) (H_N : P North) (H_S : P South) (H_merid : forall x:X, (merid x) # H_N = H_S) (x : X) : apD (Susp_ind P H_N H_S H_merid) (merid x) = H_merid x. Proof. srapply Pushout_ind_beta_pglue. Defined.
Require Import Basics. Require Import Types. Require Import Cubical.DPath Cubical.DPathSquare. Require Import WildCat. Require Import Colimits.Pushout. Require Import NullHomotopy. Require Import Truncations.Core. Require Import Modalities.Modality. Require Import Extensions.