changeset 80709 | e6f026505c5b |
parent 80703 | cc4ecaa8e96e |
child 81516 | 31b05aef022d |
--- a/src/HOL/Nominal/nominal_inductive2.ML Wed Aug 14 18:59:49 2024 +0200 +++ b/src/HOL/Nominal/nominal_inductive2.ML Wed Aug 14 21:23:22 2024 +0200 @@ -46,6 +46,7 @@ fun mk_perm_bool_simproc names = Simplifier.make_simproc \<^context> {name = "perm_bool", + kind = Simproc, lhss = [\<^term>\<open>perm pi x\<close>], proc = fn _ => fn _ => fn ct => (case Thm.term_of ct of