changeset 54503 | b490e15a5e19 |
parent 52629 | d6f2a7c196f7 |
child 54504 | 096f7d452164 |
--- a/src/HOL/Tools/Sledgehammer/sledgehammer_proof.ML Tue Nov 19 18:14:56 2013 +0100 +++ b/src/HOL/Tools/Sledgehammer/sledgehammer_proof.ML Tue Nov 19 18:34:04 2013 +0100 @@ -33,9 +33,6 @@ ArithM | BlastM - (* legacy *) - val By_Metis : facts -> byline - val no_label : label val no_facts : facts @@ -100,9 +97,6 @@ ArithM | BlastM -(* legacy *) -fun By_Metis facts = By (facts, MetisM) - val no_label = ("", ~1) val no_facts = ([],[])