src/HOL/Tools/ATP/atp_proof.ML
changeset 41201 208bd47b6f29
parent 41146 be78f4053bce
child 41203 1393514094d7
equal deleted inserted replaced
41200:6cc9b6fd7f6f 41201:208bd47b6f29
   279           end)
   279           end)
   280 
   280 
   281 (**** PARSING OF VAMPIRE OUTPUT ****)
   281 (**** PARSING OF VAMPIRE OUTPUT ****)
   282 
   282 
   283 val parse_vampire_braced_stuff =
   283 val parse_vampire_braced_stuff =
   284   $$ "{" -- scan_general_id -- $$ "}"
   284   $$ "{" -- Scan.repeat (scan_general_id --| Scan.option ($$ ",")) -- $$ "}"
   285   -- Scan.option ($$ "(" |-- parse_vampire_detritus --| $$ ")")
   285   -- Scan.option ($$ "(" |-- parse_vampire_detritus --| $$ ")")
   286 
   286 
   287 (* Syntax: <num>. <formula> <annotation> *)
   287 (* Syntax: <num>. <formula> <annotation> *)
   288 val parse_vampire_line =
   288 val parse_vampire_line =
   289   scan_general_id --| $$ "." -- parse_formula
   289   scan_general_id --| $$ "." -- parse_formula