]> matita.cs.unibo.it Git - helm.git/commitdiff
auto proof are printed in procedural style
authorEnrico Tassi <enrico.tassi@inria.fr>
Mon, 4 Jun 2007 13:02:02 +0000 (13:02 +0000)
committerEnrico Tassi <enrico.tassi@inria.fr>
Mon, 4 Jun 2007 13:02:02 +0000 (13:02 +0000)
helm/software/matita/matitaScript.ml

index e446b67f5503c9b00b5886ac379244643e43130a..a615e6f9f01f08bafd6b893436e90e5110d26dde 100644 (file)
@@ -548,7 +548,7 @@ let rec eval_macro include_paths (buffer : GText.buffer) guistuff lexicon_status
             Auto.revision time size depth
         in
         let proof_script = 
-          if true (* List.exists (fun (s,_) -> s = "paramodulation") params *) then
+          if List.exists (fun (s,_) -> s = "paramodulation") params then
               let proof_term = 
                 Auto.lambda_close ~prefix_name:"orrible_hack_" 
                   proof_term menv cc