--- a/src/HOL/Tools/res_atp.ML Wed Apr 19 10:43:53 2006 +0200
+++ b/src/HOL/Tools/res_atp.ML Wed Apr 19 13:11:35 2006 +0200
@@ -15,6 +15,7 @@
val time_limit: int ref
datatype mode = Auto | Fol | Hol
+ val linkup_logic_mode : mode ref
val write_subgoal_file: mode -> Proof.context -> thm list -> thm list -> int -> string
val vampire_time: int ref
val eprover_time: int ref
@@ -339,7 +340,7 @@
datatype mode = Auto | Fol | Hol;
-val linkup_logic_mode = ref Fol;
+val linkup_logic_mode = ref Auto;
fun tptp_writer logic goals filename (axioms,classrels,arities) =
if is_fol_logic logic