X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Ftactics%2FautoTactic.ml;h=bf9ade7b113daecd60b171436f045ec0e55b7c4b;hb=8aaf525856e25bcd8f355e505fd00f45c62bc18f;hp=6afef50e050f2fb69a5f4e7ad0b9292f7cea9dd1;hpb=46f19eadce5f3a11c0ae26934fd8d1b597906416;p=helm.git diff --git a/helm/ocaml/tactics/autoTactic.ml b/helm/ocaml/tactics/autoTactic.ml index 6afef50e0..bf9ade7b1 100644 --- a/helm/ocaml/tactics/autoTactic.ml +++ b/helm/ocaml/tactics/autoTactic.ml @@ -156,7 +156,7 @@ let rec auto dbd = function ;; -let auto_tac ?num ~(dbd:Mysql.dbd) = +let auto_tac ?num dbd = let auto_tac dbh (proof,goal) = debug_print "Entro in Auto"; match (auto dbd [(proof, [(goal,depth)],None)]) with