author | blanchet |
Mon, 25 Sep 2023 17:16:32 +0200 | |
changeset 78694 | 5e995ceb7490 |
parent 78693 | 1c0576840bf4 |
child 78695 | 41273636a82a |
--- a/src/HOL/Tools/ATP/atp_proof.ML Mon Sep 25 17:16:32 2023 +0200 +++ b/src/HOL/Tools/ATP/atp_proof.ML Mon Sep 25 17:16:32 2023 +0200 @@ -529,6 +529,7 @@ >> (fn (var, typ_opt) => ATerm ((var, the_list typ_opt), [])) || parse_hol_quantifier >> mk_simple_aterm || $$ "(" |-- parse_hol_term --| $$ ")" + || Scan.this_string tptp_not >> mk_simple_aterm || parse_literal_binary_op >> mk_simple_aterm || parse_nonliteral_binary_op >> mk_simple_aterm) x and parse_applied_hol_term x =