contour,var.lnrho[*,*,256],nlev=30,/fil,/iso,x,y
vel_a,var.uu[*,*,256,0],var.uu[*,*,256,1],/over,x,y,len=.02,nvec=800
END