author | blanchet |
Wed, 25 May 2011 08:31:36 +0200 | |
changeset 42975 | 284f9a7af1c9 |
parent 42974 | 347d5197896e |
child 42976 | 9901f877eeb7 |
--- a/src/HOL/Tools/ATP/atp_proof.ML Tue May 24 18:04:23 2011 +0200 +++ b/src/HOL/Tools/ATP/atp_proof.ML Wed May 25 08:31:36 2011 +0200 @@ -511,7 +511,7 @@ deps) :: clean_up_dependencies (name :: seen) steps -val clean_up_atp_proof_dependencies = clean_up_dependencies [] +fun clean_up_atp_proof_dependencies proof = clean_up_dependencies [] proof fun map_term_names_in_term f (ATerm (s, ts)) = ATerm (f s, map (map_term_names_in_term f) ts)