author | blanchet |
Fri, 20 Dec 2013 11:12:51 +0100 | |
changeset 54834 | b125539be102 |
parent 54833 | 68c8f88af87e |
child 54835 | 431133d07192 |
--- a/src/HOL/BNF/Tools/bnf_gfp_rec_sugar.ML Fri Dec 20 09:48:04 2013 +0100 +++ b/src/HOL/BNF/Tools/bnf_gfp_rec_sugar.ML Fri Dec 20 11:12:51 2013 +0100 @@ -1141,6 +1141,7 @@ (codeN, code_thmss, code_nitpicksimp_attrs), (ctrN, ctr_thmss, []), (discN, disc_thmss, simp_attrs), + (exhaustN, map the_list maybe_exhaust_thms, []), (selN, sel_thmss, simp_attrs), (simpsN, simp_thmss, []), (strong_coinductN, map (if n2m then single else K []) strong_coinduct_thms, [])]