]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/components/tptp_grafite/tptp2grafite.ml
- Procedural: generation of "exact" is now complete
[helm.git] / helm / software / components / tptp_grafite / tptp2grafite.ml
index 54a523cccb81ef237b19846172e08a49f6aea5fa..63dfe0285bb00cb87374c0a5b20096b95c58dbbc 100644 (file)
@@ -260,12 +260,12 @@ let convert_ast statements context = function
            else [])@
             [GA.Executable(floc,GA.Tactic(floc, Some (
               if ueq_case then
-                GA.AutoBatch (floc,["paramodulation","";
-                  "timeout",string_of_int !paramod_timeout])
+                  GA.AutoBatch (floc,([],["paramodulation","";
+                  "timeout",string_of_int !paramod_timeout]))
               else
-                GA.AutoBatch (floc,["depth",string_of_int !depth])
+                  GA.AutoBatch (floc,([],["depth",string_of_int !depth]))
             ),
-              GA.Dot(floc)));
+              GA.Semicolon(floc)));
             GA.Executable(floc,GA.Tactic(floc, Some (GA.Try(floc,
               GA.Assumption floc)), GA.Dot(floc)))
             ]@