Canonical Structure FT_c2 := Build_Com_arrow FT_eq2.

(* Specifications: *)
Lemma FT_diag2 : FT_Apeps FT_i0 =_S (FT_Apeps FT_m0 o FT_t'') o FT_p.
Lemma FT_diag3 : FT_Apeps FT_j0 =_S (FT_Apeps FT_m0 o FT_t'') o FT_q.
Lemma FT_diag4 : FT_Apeps FT_i0 o FT_t =_S FT_Apeps FT_j0 o FT_t' o FT_h'.
Lemma FT_eq3 : forall i : FT_I, Com_law (axf:=Build_Com_ob (FT_f FT_j0)) (bxg:=Build_Com_ob (FT_f i)) (FT_t' o FT_Apeps i).