X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2Finjection.ma;h=7d9586fd1badd4482f9dc88667cb01e755f42b89;hb=7a0b77fca976aedae747b64989ffc89d75fe0991;hp=7f79ef3867146f4e77bd5513811178a5d09551d4;hpb=d38484e586188871d25ff9d582b1264fa58350d8;p=helm.git diff --git a/helm/software/matita/tests/injection.ma b/helm/software/matita/tests/injection.ma index 7f79ef386..7d9586fd1 100644 --- a/helm/software/matita/tests/injection.ma +++ b/helm/software/matita/tests/injection.ma @@ -77,7 +77,7 @@ theorem injection_test3: *) theorem injection_test4: - ∀n,n',m,m'. k1 bool (S n) (S m) = k1 bool (S n') (S (S m')) → m = S m'. + ∀n,n',m,m'. k1 bool (S n) (S (S m)) = k1 bool (S n') (S (S (S m'))) → m = S m'. intros; injection H; assumption.