(* Basic_properties *********************************************************)
lemma feqx_intro_dx (G): ∀L1,L2,T2. L1 ≛[T2] L2 →
- â\88\80T1. T1 â\89\9b T2 â\86\92 â¦\83G,L1,T1â¦\84 â\89\9b â¦\83G,L2,T2â¦\84.
+ â\88\80T1. T1 â\89\9b T2 â\86\92 â\9dªG,L1,T1â\9d« â\89\9b â\9dªG,L2,T2â\9d«.
/3 width=3 by feqx_intro_sn, teqx_reqx_div/ qed.
(* Basic inversion lemmas ***************************************************)
-lemma feqx_inv_gen_sn: â\88\80G1,G2,L1,L2,T1,T2. â¦\83G1,L1,T1â¦\84 â\89\9b â¦\83G2,L2,T2â¦\84 →
+lemma feqx_inv_gen_sn: â\88\80G1,G2,L1,L2,T1,T2. â\9dªG1,L1,T1â\9d« â\89\9b â\9dªG2,L2,T2â\9d« →
∧∧ G1 = G2 & L1 ≛[T1] L2 & T1 ≛ T2.
#G1 #G2 #L1 #L2 #T1 #T2 * -G2 -L2 -T2 /2 width=1 by and3_intro/
qed-.
-lemma feqx_inv_gen_dx: â\88\80G1,G2,L1,L2,T1,T2. â¦\83G1,L1,T1â¦\84 â\89\9b â¦\83G2,L2,T2â¦\84 →
+lemma feqx_inv_gen_dx: â\88\80G1,G2,L1,L2,T1,T2. â\9dªG1,L1,T1â\9d« â\89\9b â\9dªG2,L2,T2â\9d« →
∧∧ G1 = G2 & L1 ≛[T2] L2 & T1 ≛ T2.
#G1 #G2 #L1 #L2 #T1 #T2 * -G2 -L2 -T2
/3 width=3 by teqx_reqx_conf, and3_intro/