--- a/src/HOL/Sledgehammer.thy Wed Jun 11 11:28:46 2014 +0200
+++ b/src/HOL/Sledgehammer.thy Wed Jun 11 15:29:23 2014 +0200
@@ -14,6 +14,11 @@
lemma size_ne_size_imp_ne: "size x \<noteq> size y \<Longrightarrow> x \<noteq> y"
by (erule contrapos_nn) (rule arg_cong)
+(* Has all needed simplification lemmas for logic.
+ "HOL.simp_thms(35-42)" are about \<exists> and \<forall>. These lemmas are left out for now. *)
+lemmas waldmeister_fol = simp_thms(1-34) disj_absorb disj_left_absorb conj_absorb conj_left_absorb
+ eq_ac disj_comms disj_assoc conj_comms conj_assoc
+
ML_file "Tools/Sledgehammer/async_manager.ML"
ML_file "Tools/Sledgehammer/sledgehammer_util.ML"
ML_file "Tools/Sledgehammer/sledgehammer_fact.ML"
@@ -27,10 +32,13 @@
ML_file "Tools/Sledgehammer/sledgehammer_prover.ML"
ML_file "Tools/Sledgehammer/sledgehammer_prover_atp.ML"
ML_file "Tools/Sledgehammer/sledgehammer_prover_smt2.ML"
+ML_file "Tools/Sledgehammer/sledgehammer_prover_waldmeister.ML"
ML_file "Tools/Sledgehammer/sledgehammer_prover_minimize.ML"
ML_file "Tools/Sledgehammer/sledgehammer_mepo.ML"
ML_file "Tools/Sledgehammer/sledgehammer_mash.ML"
ML_file "Tools/Sledgehammer/sledgehammer.ML"
ML_file "Tools/Sledgehammer/sledgehammer_commands.ML"
+hide_fact (open) waldmeister_fol
+
end