1812 {Ts = Ts, bnfs = Ibnfs, ctors = ctors, dtors = dtors, xtor_co_recs = recs, |
1812 {Ts = Ts, bnfs = Ibnfs, ctors = ctors, dtors = dtors, xtor_co_recs = recs, |
1813 xtor_co_induct = ctor_induct_thm, dtor_ctors = dtor_ctor_thms, ctor_dtors = ctor_dtor_thms, |
1813 xtor_co_induct = ctor_induct_thm, dtor_ctors = dtor_ctor_thms, ctor_dtors = ctor_dtor_thms, |
1814 ctor_injects = ctor_inject_thms, dtor_injects = dtor_inject_thms, |
1814 ctor_injects = ctor_inject_thms, dtor_injects = dtor_inject_thms, |
1815 xtor_map_thms = ctor_Imap_thms, xtor_set_thmss = ctor_Iset_thmss', |
1815 xtor_map_thms = ctor_Imap_thms, xtor_set_thmss = ctor_Iset_thmss', |
1816 xtor_rel_thms = ctor_Irel_thms, xtor_co_rec_thms = ctor_rec_thms, |
1816 xtor_rel_thms = ctor_Irel_thms, xtor_co_rec_thms = ctor_rec_thms, |
1817 xtor_co_rec_o_map_thms = ctor_rec_o_Imap_thms, rel_xtor_co_induct_thm = Irel_induct_thm} |
1817 xtor_co_rec_o_map_thms = ctor_rec_o_Imap_thms, rel_xtor_co_induct_thm = Irel_induct_thm, |
|
1818 dtor_set_induct_thms = []} |
1818 |> morph_fp_result (substitute_noted_thm noted); |
1819 |> morph_fp_result (substitute_noted_thm noted); |
1819 in |
1820 in |
1820 timer; (fp_res, lthy') |
1821 timer; (fp_res, lthy') |
1821 end; |
1822 end; |
1822 |
1823 |