457 NONE => I |
457 NONE => I |
458 | SOME secs => TimeLimit.timeLimit (Time.fromSeconds secs)) |
458 | SOME secs => TimeLimit.timeLimit (Time.fromSeconds secs)) |
459 fun failed failure = |
459 fun failed failure = |
460 ({outcome = SOME failure, used_facts = [], used_from = [], |
460 ({outcome = SOME failure, used_facts = [], used_from = [], |
461 run_time = Time.zeroTime, |
461 run_time = Time.zeroTime, |
462 preplay = Lazy.value (Sledgehammer_Reconstructor.Metis_Method (NONE, NONE), |
462 preplay = Lazy.value (Sledgehammer_Proof_Methods.Metis_Method (NONE, NONE), |
463 Sledgehammer_Reconstructor.Play_Failed), |
463 Sledgehammer_Proof_Methods.Play_Failed), |
464 message = K "", message_tail = ""}, ~1) |
464 message = K "", message_tail = ""}, ~1) |
465 val ({outcome, used_facts, run_time, preplay, message, message_tail, ...} |
465 val ({outcome, used_facts, run_time, preplay, message, message_tail, ...} |
466 : Sledgehammer_Prover.prover_result, |
466 : Sledgehammer_Prover.prover_result, |
467 time_isa) = time_limit (Mirabelle.cpu_time (fn () => |
467 time_isa) = time_limit (Mirabelle.cpu_time (fn () => |
468 let |
468 let |