update in ground

[helm.git] / matita / matita / contribs / lambdadelta / delayed_updating / unwind1 / unwind_constructors.ma

diff --git a/matita/matita/contribs/lambdadelta/delayed_updating/unwind1/unwind_constructors.ma b/matita/matita/contribs/lambdadelta/delayed_updating/unwind1/unwind_constructors.ma
index d2a552d843d48c00c28b5a25b4507de73077bd09..a412797a0b95e998cc40968d837c221557915ae1 100644 (file)
--- a/matita/matita/contribs/lambdadelta/delayed_updating/unwind1/unwind_constructors.ma
+++ b/matita/matita/contribs/lambdadelta/delayed_updating/unwind1/unwind_constructors.ma
@@ -18,20 +18,20 @@ include "delayed_updating/syntax/prototerm_constructors.ma".
 (* UNWIND FOR PROTOTERM *****************************************************)
 
 lemma unwind_iref_sn (f) (t:prototerm) (n:pnat):
-      ▼[𝐮❨f@❨n❩❩]t ⊆ ▼[f](𝛗n.t).
+      ▼[𝐮❨f＠⧣❨n❩❩]t ⊆ ▼[f](𝛗n.t).
 #f #t #n #p * #q #Hq #H0 destruct
 @(ex2_intro … (𝗱n◗𝗺◗q))
 /2 width=1 by in_comp_iref/
 qed-.
 
 lemma unwind_iref_dx (f) (t) (n:pnat):
-      ▼[f](𝛗n.t) ⊆ ▼[𝐮❨f@❨n❩❩]t.
+      ▼[f](𝛗n.t) ⊆ ▼[𝐮❨f＠⧣❨n❩❩]t.
 #f #t #n #p * #q #Hq #H0 destruct
 elim (in_comp_inv_iref … Hq) -Hq #p #Hp #Ht destruct
 /2 width=1 by in_comp_unwind_bi/
 qed-.
 
 lemma unwind_iref (f) (t) (n:pnat):
-      ▼[𝐮❨f@❨n❩❩]t ⇔ ▼[f](𝛗n.t).
+      ▼[𝐮❨f＠⧣❨n❩❩]t ⇔ ▼[f](𝛗n.t).
 /3 width=1 by conj, unwind_iref_sn, unwind_iref_dx/
 qed.