X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FLAMBDA-TYPES%2FBase-1%2Fpreamble.ma;h=44823fc814b685f673bb1665b1a238e195c842c8;hb=82d0bc4291648c88e9f248fc5a67518e938eacdf;hp=288e0626d82cf7545b9cb3e277d21c614264ee5e;hpb=b54b2b352753b1c784d06118fc689c1ee9f9feaf;p=helm.git

diff --git a/helm/software/matita/contribs/LAMBDA-TYPES/Base-1/preamble.ma b/helm/software/matita/contribs/LAMBDA-TYPES/Base-1/preamble.ma
index 288e0626d..44823fc81 100644
--- a/helm/software/matita/contribs/LAMBDA-TYPES/Base-1/preamble.ma
+++ b/helm/software/matita/contribs/LAMBDA-TYPES/Base-1/preamble.ma
@@ -102,9 +102,9 @@ theorem trans_eq : \forall A:Type. \forall x,y,z:A. x=y \to y=z \to x=z.
 qed.
 
 theorem plus_reg_l: \forall n,m,p. n + m = n + p \to m = p.
- intros. apply plus_reg_l; auto.
+ intros. apply plus_reg_l; autobatch.
 qed.
 
 theorem plus_le_reg_l: \forall p,n,m. p + n <= p + m \to n <= m.
- intros. apply plus_le_reg_l; auto.
+ intros. apply plus_le_reg_l; autobatch.
 qed.