jz=var.jj[*,*,2]
bz=var.bb[*,*,2]
az=var.aa[*,*,2]
;
default,jmax,.1
print,jmax,minmax(jz)
;
default,bmax,1e-2
print,bmax,minmax(bz)
;
default,amax,1e-3
print,amax,minmax(az) & stop
;
lev=grange(-1,1,30)*jmax
contour,jz,x,y,lev=lev,/fil,/iso
;
;lev=grange(-1,1,30)*bmax
;contour,bz,x,y,lev=lev,/fil,/iso
stop
;
lev=grange(-1,1,10)*amax
contour,az,x,y,lev=lev,/over
;
save,file='jz.sav',jz,x,y,t
save,file='var.sav',jz,bz,az,x,y,t
END