(* This file was automatically generated: do not edit *********************)
-include "Basic-1/iso/fwd.ma".
+include "basic_1/T/fwd.ma".
-theorem iso_refl:
+include "basic_1/iso/fwd.ma".
+
+lemma iso_refl:
\forall (t: T).(iso t t)
\def
\lambda (t: T).(T_ind (\lambda (t0: T).(iso t0 t0)) (\lambda (n:
nat).(iso_sort n n)) (\lambda (n: nat).(iso_lref n n)) (\lambda (k:
K).(\lambda (t0: T).(\lambda (_: (iso t0 t0)).(\lambda (t1: T).(\lambda (_:
(iso t1 t1)).(iso_head t0 t0 t1 t1 k)))))) t).
-(* COMMENTS
-Initial nodes: 59
-END *)
theorem iso_trans:
\forall (t1: T).(\forall (t2: T).((iso t1 t2) \to (\forall (t3: T).((iso t2
(\lambda (x0: T).(\lambda (x1: T).(\lambda (H2: (eq T t5 (THead k x0
x1))).(eq_ind_r T (THead k x0 x1) (\lambda (t: T).(iso (THead k v1 t3) t))
(iso_head v1 x0 t3 x1 k) t5 H2)))) H1)))))))))) t1 t2 H))).
-(* COMMENTS
-Initial nodes: 351
-END *)