src/HOL/Tools/ATP_Manager/atp_systems.ML
changeset 37643 f576af716aa6
parent 37628 78334f400ae6
child 37922 ff56c361d75b
equal deleted inserted replaced
37642:06992bc8bdda 37643:f576af716aa6
   335                      else rpair 0)
   335                      else rpair 0)
   336               val (proof, outcome) =
   336               val (proof, outcome) =
   337                 extract_proof_and_outcome complete res_code proof_delims
   337                 extract_proof_and_outcome complete res_code proof_delims
   338                                           known_failures output
   338                                           known_failures output
   339             in (output, msecs, proof, outcome) end
   339             in (output, msecs, proof, outcome) end
       
   340           val readable_names = debug andalso overlord
   340           val (pool, conjecture_offset) =
   341           val (pool, conjecture_offset) =
   341             write_tptp_file (debug andalso overlord) full_types explicit_apply
   342             write_tptp_file thy readable_names full_types explicit_apply
   342                             probfile clauses
   343                             probfile clauses
   343           val conjecture_shape = shape_of_clauses (conjecture_offset + 1) goal_clss
   344           val conjecture_shape = shape_of_clauses (conjecture_offset + 1) goal_clss
   344           val result =
   345           val result =
   345             do_run false
   346             do_run false
   346             |> (fn (_, msecs0, _, SOME _) =>
   347             |> (fn (_, msecs0, _, SOME _) =>