;restore,'data/slice.sav'
bz4=sample_2d(bb(*,*,2),4,4)
uz4=sample_2d(uu(*,*,2),4,4)
bz128=bb(0:127,0:127,2)
uz128=uu(0:127,0:127,2)
save,file='data/slice_ubz.sav',bz4,uz4,bz128,uz128
END