author | blanchet |
Fri, 18 Nov 2011 16:42:31 +0100 | |
changeset 45579 | 2022cd224a3c |
parent 45578 | 66f31d77b05f |
child 45580 | 136e3faf74da |
--- a/src/HOL/Tools/ATP/atp_reconstruct.ML Fri Nov 18 14:47:08 2011 +0100 +++ b/src/HOL/Tools/ATP/atp_reconstruct.ML Fri Nov 18 16:42:31 2011 +0100 @@ -146,7 +146,7 @@ end | NONE => NONE fun resolve_fact fact_names = map_filter (resolve_one_named_fact fact_names) -val is_fact = not o null oo resolve_fact +fun is_fact fact_names = not o null o resolve_fact fact_names fun resolve_one_named_conjecture s = case try (unprefix conjecture_prefix) s of