]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/static_2/relocation/sex.ma
λδ-2B is released
[helm.git] / matita / matita / contribs / lambdadelta / static_2 / relocation / sex.ma
index 6247b8686c3b92c04ea24ab3b1a33ed24bbc3ca3..6eb1629fd8609d3416f2aa0f272d6a3b8048ed8b 100644 (file)
@@ -143,7 +143,7 @@ lemma sex_inv_push: ∀RN,RP,f,I1,I2,L1,L2.
 qed-.
 
 lemma sex_inv_tl: ∀RN,RP,f,I1,I2,L1,L2. L1 ⪤[RN,RP,⫱f] L2 →
-                  RN L1 I1 I2 → RP L1 I1 I2 → 
+                  RN L1 I1 I2 → RP L1 I1 I2 →
                   L1.ⓘ{I1} ⪤[RN,RP,f] L2.ⓘ{I2}.
 #RN #RP #f #I1 #I2 #L2 #L2 elim (pn_split f) *
 /2 width=1 by sex_next, sex_push/
@@ -151,7 +151,7 @@ qed-.
 
 (* Basic forward lemmas *****************************************************)
 
-lemma sex_fwd_bind: ∀RN,RP,f,I1,I2,L1,L2. 
+lemma sex_fwd_bind: ∀RN,RP,f,I1,I2,L1,L2.
                     L1.ⓘ{I1} ⪤[RN,RP,f] L2.ⓘ{I2} →
                     L1 ⪤[RN,RP,⫱f] L2.
 #RN #RP #f #I1 #I2 #L1 #L2 #Hf