]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/tests/elim.ma
a) Detection of existential types now implemented
[helm.git] / matita / tests / elim.ma
index 03eafba6a0075dbedf19b75289873dde2e793e57..e038c5da2a03e5294fc568ed6829f9cbece7aed3 100644 (file)
@@ -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.