X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=inline;f=matita%2Fmatita%2Fcontribs%2Flambda_delta%2FBasic_2%2Funfold%2Fdelift_lift.ma;h=a02d3db2cac92bddfe9b0c9fac3c68e2036f28a2;hb=011cf6478141e69822a5b40933f2444d0522532f;hp=ae1a455429a51784fde5e0bd5f491bc2efedfb85;hpb=0aa60d67f17b528b896e05bbd01038cbc195f69d;p=helm.git

diff --git a/matita/matita/contribs/lambda_delta/Basic_2/unfold/delift_lift.ma b/matita/matita/contribs/lambda_delta/Basic_2/unfold/delift_lift.ma
index ae1a45542..a02d3db2c 100644
--- a/matita/matita/contribs/lambda_delta/Basic_2/unfold/delift_lift.ma
+++ b/matita/matita/contribs/lambda_delta/Basic_2/unfold/delift_lift.ma
@@ -31,9 +31,9 @@ qed-.
 
 lemma delift_fwd_lref1_be: ∀L,U2,d,e,i. L ⊢ #i [d, e] ≡ U2 →
                            d ≤ i → i < d + e →
-                           ∃∃K,V1,V2. ⇓[0, i] L ≡ K. 𝕓{Abbr} V1 &
+                           ∃∃K,V1,V2. ⇩[0, i] L ≡ K. ⓓV1 &
                                       K ⊢ V1 [0, d + e - i - 1] ≡ V2 &
-                                      ⇑[0, d] V2 ≡ U2.
+                                      ⇧[0, d] V2 ≡ U2.
 #L #U2 #d #e #i * #U #HU #HU2 #Hdi #Hide
 elim (tpss_inv_lref1 … HU) -HU
 [ #H destruct elim (lift_inv_lref2_be … HU2 ? ?) //