(* Properties with syntactic equivalence on referred entries ****************)
lemma req_reqx_trans: ∀L1,L,T1. L1 ≡[T1] L →
- â\88\80G1,G2,L2,T2. â¦\83G1,L,T1â¦\84 â\89\9b â¦\83G2,L2,T2â¦\84 â\86\92 â¦\83G1,L1,T1â¦\84 â\89\9b â¦\83G2,L2,T2â¦\84.
+ â\88\80G1,G2,L2,T2. â\9dªG1,L,T1â\9d« â\89\9b â\9dªG2,L2,T2â\9d« â\86\92 â\9dªG1,L1,T1â\9d« â\89\9b â\9dªG2,L2,T2â\9d«.
#L1 #L #T1 #HL1 #G1 #G2 #L2 #T2 #H
elim (feqx_inv_gen_sn … H) -H #H #HL2 #T12 destruct
/3 width=3 by feqx_intro_sn, req_reqx_trans/