336 |
336 |
337 fun e_kbo () = if is_e_at_least_1_3 () then "KBO6" else "KBO" |
337 fun e_kbo () = if is_e_at_least_1_3 () then "KBO6" else "KBO" |
338 |
338 |
339 val e_config : atp_config = |
339 val e_config : atp_config = |
340 {exec = (fn () => (["E_HOME"], |
340 {exec = (fn () => (["E_HOME"], |
341 if is_e_at_least_1_8 () then ["eprover"] else ["eproof_ram", "eproof"])), |
341 if is_e_at_least_1_8 () then ["eprover"] else ["eproof_ram", "eproof"])), |
342 arguments = fn ctxt => fn full_proof => fn heuristic => fn timeout => |
342 arguments = fn ctxt => fn full_proof => fn heuristic => fn timeout => fn file_name => |
343 fn file_name => |
343 fn ({is_lpo, gen_weights, gen_prec, ...}, ord_info, sel_weights) => |
344 fn ({is_lpo, gen_weights, gen_prec, ...}, ord_info, sel_weights) => |
344 (if is_e_at_least_1_8 () then "--auto-schedule " else "") ^ |
345 "--tstp-in --tstp-out --silent " ^ |
345 "--tstp-in --tstp-out --silent " ^ |
346 e_selection_weight_arguments ctxt heuristic sel_weights ^ " " ^ |
346 e_selection_weight_arguments ctxt heuristic sel_weights ^ " " ^ |
347 e_term_order_info_arguments gen_weights gen_prec ord_info ^ " " ^ |
347 e_term_order_info_arguments gen_weights gen_prec ord_info ^ " " ^ |
348 "--term-ordering=" ^ (if is_lpo then "LPO4" else e_kbo ()) ^ " " ^ |
348 "--term-ordering=" ^ (if is_lpo then "LPO4" else e_kbo ()) ^ " " ^ |
349 "--cpu-limit=" ^ string_of_int (to_secs 2 timeout) ^ |
349 "--cpu-limit=" ^ string_of_int (to_secs 2 timeout) ^ |
350 (if is_e_at_least_1_8 () then |
350 (if is_e_at_least_1_8 () then |
351 " --proof-object=1" |
351 " --proof-object=1" |
352 else |
352 else |
353 " --output-level=5" ^ |
353 " --output-level=5" ^ |
354 (if is_e_at_least_1_6 () then |
354 (if is_e_at_least_1_6 () then " --pcl-shell-level=" ^ (if full_proof then "0" else "2") |
355 " --pcl-shell-level=" ^ (if full_proof then "0" else "2") |
355 else "")) ^ |
356 else |
|
357 "")) ^ |
|
358 " " ^ file_name, |
356 " " ^ file_name, |
359 proof_delims = |
357 proof_delims = |
360 [("# SZS output start CNFRefutation", "# SZS output end CNFRefutation")] @ |
358 [("# SZS output start CNFRefutation", "# SZS output end CNFRefutation")] @ |
361 tstp_proof_delims, |
359 tstp_proof_delims, |
362 known_failures = |
360 known_failures = |