X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fdynamic%2Fcnv_cpmuwe_cpme.ma;fp=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fdynamic%2Fcnv_cpmuwe_cpme.ma;h=801a56a09375fc0440d710d7d453925cc5aa07a7;hb=ba7b8553850e4a33cf8607b07758392230d9ed40;hp=992588e0b55fd020a90204214b04d59824ff11b4;hpb=c0d38a82464481e3c8fd68e4b00d7b9b448df462;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/dynamic/cnv_cpmuwe_cpme.ma b/matita/matita/contribs/lambdadelta/basic_2/dynamic/cnv_cpmuwe_cpme.ma
index 992588e0b..801a56a09 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/dynamic/cnv_cpmuwe_cpme.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/dynamic/cnv_cpmuwe_cpme.ma
@@ -21,9 +21,9 @@ include "basic_2/dynamic/cnv_cpme.ma".
 
 (* Advanced Properties with t-unbound whd evaluation on terms ***************)
 
-lemma cnv_R_cpmuwe_dec (a) (h) (G) (L):
-      ∀T. ⦃G,L⦄ ⊢ T ![a,h] → ∀n. Decidable (R_cpmuwe h G L T n).
-#a #h #G #L #T1 #HT1 #n
+lemma cnv_R_cpmuwe_dec (h) (a) (G) (L):
+      ∀T. ⦃G,L⦄ ⊢ T ![h,a] → ∀n. Decidable (R_cpmuwe h G L T n).
+#h #a #G #L #T1 #HT1 #n
 elim (cnv_fwd_aaa … HT1) #A #HA
 elim (cpme_total_aaa h n … HA) -HA #T2 #HT12
 elim (cnuw_dec h G L T2) #HnT1