src/HOL/Tools/ATP/recon_parse.ML
changeset 17435 0eed5a1c00c1
parent 17422 3b237822985d
child 17484 f6a225f97f0a
equal deleted inserted replaced
17434:c2efacfe8ab8 17435:0eed5a1c00c1
   127   if cut_exists "Here is a proof with" s then
   127   if cut_exists "Here is a proof with" s then
   128     (kill_lines 0
   128     (kill_lines 0
   129      o snd o cut_after ":"
   129      o snd o cut_after ":"
   130      o snd o cut_after "Here is a proof with"
   130      o snd o cut_after "Here is a proof with"
   131      o fst o cut_after " ||  -> .") s
   131      o fst o cut_after " ||  -> .") s
   132   else if cut_exists start_V6 s then
   132   else if cut_exists start_V8 s then
   133     (kill_lines 0    (*Vampire 6.0*)
   133     (kill_lines 0    (*Vampire 8.0*)
   134      o snd o cut_after start_V6
   134      o snd o cut_after start_V8
   135      o fst o cut_before end_V6) s
   135      o fst o cut_before end_V8) s
   136   else if cut_exists end_E s then
   136   else if cut_exists end_E s then
   137     (kill_lines 0    (*eproof*)
   137     (kill_lines 0    (*eproof*)
   138      o snd o cut_after start_E
   138      o snd o cut_after start_E
   139      o fst o cut_before end_E) s
   139      o fst o cut_before end_E) s
   140   else "??extract_proof failed" (*Couldn't find a proof*)
   140   else "??extract_proof failed" (*Couldn't find a proof*)