src/HOL/Library/Cardinality.thy
changeset 71942 d2654b30f7bd
parent 71258 d67924987c34
child 73886 93ba8e3fdcdf
equal deleted inserted replaced
71941:49af3d9a818c 71942:d2654b30f7bd
   215 end
   215 end
   216 
   216 
   217 instantiation int :: card_UNIV begin
   217 instantiation int :: card_UNIV begin
   218 definition "finite_UNIV = Phantom(int) False"
   218 definition "finite_UNIV = Phantom(int) False"
   219 definition "card_UNIV = Phantom(int) 0"
   219 definition "card_UNIV = Phantom(int) 0"
   220 instance by intro_classes (simp_all add: card_UNIV_int_def finite_UNIV_int_def infinite_UNIV_int)
   220 instance by intro_classes (simp_all add: card_UNIV_int_def finite_UNIV_int_def)
   221 end
   221 end
   222 
   222 
   223 instantiation natural :: card_UNIV begin
   223 instantiation natural :: card_UNIV begin
   224 definition "finite_UNIV = Phantom(natural) False"
   224 definition "finite_UNIV = Phantom(natural) False"
   225 definition "card_UNIV = Phantom(natural) 0"
   225 definition "card_UNIV = Phantom(natural) 0"