X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2Felim.ma;h=42dc195cb1f99c8a15d5bc7a34c8b270c3723851;hb=b2a190e3c2d5b594d409db937e88f9f4f7d22b8c;hp=03eafba6a0075dbedf19b75289873dde2e793e57;hpb=0582a602f0b1d6f5430326893a473d78b0aa7dfd;p=helm.git

diff --git a/helm/software/matita/tests/elim.ma b/helm/software/matita/tests/elim.ma
index 03eafba6a..42dc195cb 100644
--- a/helm/software/matita/tests/elim.ma
+++ b/helm/software/matita/tests/elim.ma
@@ -12,8 +12,8 @@
 (*                                                                        *)
 (**************************************************************************)
 
-set "baseuri" "cic:/matita/tests/elim".
-include "../legacy/coq.ma".
+
+include "coq.ma".
 
 inductive stupidtype: Set \def
   | Base : stupidtype
@@ -72,9 +72,8 @@ theorem t': \forall x,y. \forall H: sum x y O.
     (\lambda a,b,K. y=a \to O=b \to
         match K with [ (k a b p) \Rightarrow a ] = x)
      ? ? ? H).
- goal 16.
  simplify. intros.
  generalize in match H1.
  rewrite < H2; rewrite < H3.intro.
- rewrite > H4.auto new library.
+ rewrite > H4.autobatch library.
 qed.