src/HOL/Library/FSet.thy
changeset 69593 3dda49e08b9d
parent 69164 74f1b0f10b2b
child 69654 bc758f4f09e5
equal deleted inserted replaced
69592:a80d8ec6c998 69593:3dda49e08b9d
  1205 lemma fset_size_o_map: "inj f \<Longrightarrow> size_fset g \<circ> fimage f = size_fset (g \<circ> f)"
  1205 lemma fset_size_o_map: "inj f \<Longrightarrow> size_fset g \<circ> fimage f = size_fset (g \<circ> f)"
  1206   apply (subst fun_eq_iff)
  1206   apply (subst fun_eq_iff)
  1207   including fset.lifting by transfer (auto intro: sum.reindex_cong subset_inj_on)
  1207   including fset.lifting by transfer (auto intro: sum.reindex_cong subset_inj_on)
  1208 
  1208 
  1209 setup \<open>
  1209 setup \<open>
  1210 BNF_LFP_Size.register_size_global @{type_name fset} @{const_name size_fset}
  1210 BNF_LFP_Size.register_size_global \<^type_name>\<open>fset\<close> \<^const_name>\<open>size_fset\<close>
  1211   @{thm size_fset_overloaded_def} @{thms size_fset_simps size_fset_overloaded_simps}
  1211   @{thm size_fset_overloaded_def} @{thms size_fset_simps size_fset_overloaded_simps}
  1212   @{thms fset_size_o_map}
  1212   @{thms fset_size_o_map}
  1213 \<close>
  1213 \<close>
  1214 
  1214 
  1215 lifting_update fset.lifting
  1215 lifting_update fset.lifting