reads,'PC6F230W.HHH',uv1,nx,ny
BZERO   =  1.8553040771484E+03                                                  
BSCALE  =  5.6850377470255E-02                                                  
uv1=bzero+bscale*uv1
;
reads,'PC6F230W2.HHH',uv2,nx,ny
BZERO   =  0.0000000000000E+00                                                  
BSCALE  =  1.0000000000000E+00                                                  
uv2=bzero+bscale*uv2
;
reads,'PC6F487N.HHH',vi1,nx,ny
BZERO   =  1.9098229980469E+03                                                  
BSCALE  =  5.8547444641590E-02                                                  
vi1=bzero+bscale*vi1
;
reads,'PC6F487N2.HHH',vi2,nx,ny
BZERO   =  0.0000000000000E+00                                                  
BSCALE  =  1.0000000000000E+00                                                  
vi2=bzero+bscale*vi2
tvwindow,0,xs=4*nx,ys=2*ny
tv,uv1,0,0
tv,uv2,nx,0
tv,vi1,0,ny
tv,vi2,nx,ny
stop
end