update in ground_2, static_2, basic_2, apps_2, alpha_1

[helm.git] / matita / matita / contribs / lambdadelta / apps_2 / functional / mf_cpr.ma

diff --git a/matita/matita/contribs/lambdadelta/apps_2/functional/mf_cpr.ma b/matita/matita/contribs/lambdadelta/apps_2/functional/mf_cpr.ma
index 2e7f3d5efa075fd41c20254dd481289865c28a7a..fc472668bc0faa628688f8f697a9317ce0a0a918 100644 (file)
--- a/matita/matita/contribs/lambdadelta/apps_2/functional/mf_cpr.ma
+++ b/matita/matita/contribs/lambdadelta/apps_2/functional/mf_cpr.ma
@@ -20,9 +20,9 @@ include "apps_2/functional/mf_exteq.ma".
 
 (* Properties with relocation ***********************************************)
 
-lemma mf_delta_drops (h) (G): â\88\80K,V1,V2. â¦\83G, Kâ¦\84 ⊢ V1 ➡[h] V2 →
-                              â\88\80T,L,l. â¬\87*[l] L ≘ K.ⓓV1 →
-                              â\88\80gv,lv. â¦\83G, Lâ¦\84 ⊢ ●[gv,⇡[l←#l]lv]T ➡[h] ●[gv,⇡[l←↑[↑l]V2]lv]T.
+lemma mf_delta_drops (h) (G): â\88\80K,V1,V2. â\9dªG,Kâ\9d« ⊢ V1 ➡[h] V2 →
+                              â\88\80T,L,l. â\87©*[l] L ≘ K.ⓓV1 →
+                              â\88\80gv,lv. â\9dªG,Lâ\9d« ⊢ ●[gv,⇡[l←#l]lv]T ➡[h] ●[gv,⇡[l←↑[↑l]V2]lv]T.
 #h #G #K #V1 #V2 #HV #T elim T -T * //
 [ #i #L #l #HKL #gv #lv
   >mf_lref >mf_lref