]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_2/rt_computation/fsb_feqg.ma
update in basic_2
[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / rt_computation / fsb_feqg.ma
index f2a7640d1174ef3fb68ce5b39fdc3d7725cae7e1..73ae6efed446ccb55c682eae1524a4cc57192da8 100644 (file)
@@ -24,7 +24,7 @@ lemma fsb_feqg_trans (S):
       reflexive … S → symmetric … S → Transitive … S →
       ∀G1,L1,T1. ≥𝐒 ❪G1,L1,T1❫ →
       ∀G2,L2,T2. ❪G1,L1,T1❫ ≛[S] ❪G2,L2,T2❫ → ≥𝐒 ❪G2,L2,T2❫.
-#S #H1S #H2S #H3S #G1 #L1 #T1 #H @(fsb_ind_alt … H) -G1 -L1 -T1
+#S #H1S #H2S #H3S #G1 #L1 #T1 #H @(fsb_ind … H) -G1 -L1 -T1
 #G1 #L1 #T1 #_ #IH #G2 #L2 #T2 #H12
 @fsb_intro #G #L #T #H2
 elim (feqg_fpbc_trans … H12 … H2) -G2 -L2 -T2