thys2/SizeBound4.thy
changeset 420 b66a4305749c
parent 418 41a2a3b63853
child 425 14c558ae0b09
equal deleted inserted replaced
419:6de6bc551a8b 420:b66a4305749c
  1155   unfolding UNIV1_def bders_simp_Set_def
  1155   unfolding UNIV1_def bders_simp_Set_def
  1156   apply(auto)
  1156   apply(auto)
  1157   oops
  1157   oops
  1158 
  1158 
  1159 
  1159 
  1160 
       
  1161 
       
  1162 (*
  1160 (*
  1163 lemma asize_fuse:
  1161 lemma asize_fuse:
  1164   shows "asize (fuse bs r) = asize r"
  1162   shows "asize (fuse bs r) = asize r"
  1165   apply(induct r arbitrary: bs)
  1163   apply(induct r arbitrary: bs)
  1166   apply(auto)
  1164   apply(auto)