auto new => autobatch

diff --git a/helm/software/matita/dama/reals.ma b/helm/software/matita/dama/reals.ma
index 87bbee5fd0d2e84de0a9e49d8ee066f4d826e8b8..d57e6cfba62f8cada56b0da615a5b07fa5df3d12 100644 (file)
--- a/helm/software/matita/dama/reals.ma
+++ b/helm/software/matita/dama/reals.ma
@@ -39,7 +39,7 @@ definition max_seq: ∀R:real.∀x,y:R. nat → R.
   [ apply x
   | apply not_eq_sum_field_zero ;
     unfold;
-    auto new
+    autobatch
   | apply y
   | apply lt_zero_to_le_inv_zero 
   ].

diff --git a/helm/software/matita/dama/vector_spaces.ma b/helm/software/matita/dama/vector_spaces.ma
index de4af986a7a98d437ecf2ed3e6d46892a1304396..6aaebd12bde8b9007229f21b9755b160d63df765 100644 (file)
--- a/helm/software/matita/dama/vector_spaces.ma
+++ b/helm/software/matita/dama/vector_spaces.ma
@@ -127,7 +127,7 @@ apply
      d (f j) l ≤ inv R (sum_field ? (S n)) ?);
  apply not_eq_sum_field_zero;
  unfold;
- auto new.
+ autobatch.
 qed.
 
 definition is_cauchy_seq : ∀R:real.\forall V:vector_space R.
@@ -141,7 +141,7 @@ definition is_cauchy_seq : ∀R:real.\forall V:vector_space R.
       d (f N)  (f n)≤ inv R (sum_field R (S m)) ?);
  apply not_eq_sum_field_zero;
  unfold;
- auto.
+ autobatch.
 qed.
 
 definition is_complete ≝