; IDL Version 8.1, Mac OS X (darwin x86_64 m64)
; Journal File for Bob@steinr.pa.msu.edu
; Working directory: /Volumes/d2/MHDV/mhd12v/Slices
; Date: Thu Jun  9 12:21:32 2011
 
journ
restore,/ver,'bb_mhd12_6km_226.save'
help,by01
t=9
by6=reform(by01[2015-840:*,*,t])
restore,/ver,'bb_mhd12_224.save'
t=19
by12=reform(by01[1008-841/2:*,*,t])
restore,/ver,'../../../mhdh/mhd48-1/Slices/bb_48h1_1949.save'
by24=reform(by01[0:210,0:504,26])
restore,/ver,'../../../mhdh/mhd48-1/Slices/int_48h1_1843.save'
restore,/ver,'../../../mhdh/mhd48-1/Slices/bb_48h1_1843.save'
by48=reform(by01[0:105,0:252,40])
print,1660*.8
;      1328.00
window,xs=1328,ys=800
print,min(by6,max=max),max
;    -0.516043      2.52300
print,min(by12,max=max),max
;    -0.158629      2.18187
print,min(by24,max=max),max
;     -1.67742      2.02342
print,min(by48,max=max),max
;     -1.56475      1.90494
bmin=-1.6
bmax=2.0
by6b=bytscl(by6,min=bmin,max=bmax)
by12b=bytscl(by12,min=bmin,max=bmax)
by24b=bytscl(by24,min=bmin,max=bmax)
by48b=bytscl(by48,min=bmin,max=bmax)
by6bb=congrid(by6b,211,505)
by12bb=congrid(by12b,211,505)
by24bb=by24b
by48bb=congrid(by48b,211,505)
iy=0
ix=0
panel,ix,iy,nx=4,ny=1,xdist=1,ydist=1,xleft=6,ybottom=4,xright=2,ytop=1
plot_image,by6bb,[0,5],[0,12],xtitle='!5X (Mm)',ytit='!5Y (Mm)'
ix=1
panel,ix,iy,nx=4,ny=1,xdist=1,ydist=1,xleft=6,ybottom=4,xright=2,ytop=1
plot_image,by12bb,[0,5],[0,12],xtitle='!5X (Mm)'
ix=2
panel,ix,iy,nx=4,ny=1,xdist=1,ydist=1,xleft=6,ybottom=4,xright=2,ytop=1
plot_image,by24bb,[0,5],[0,12],xtitle='!5X (Mm)'
ix=3
panel,ix,iy,nx=4,ny=1,xdist=1,ydist=1,xleft=6,ybottom=4,xright=2,ytop=1
plot_image,by48bb,[0,5],[0,12],xtitle='!5X (Mm)'
flush,!journal
help,int6,by6
int6c=congrid(int6,211,505)
int6c=congrid(int6,211,5a05)
; % Syntax error.
by6c=congrid(by6,211,5a05)
; % Syntax error.
by6c=congrid(by6,211,505)
int6c=congrid(int6,211,505)
tvscl,int6c
tvscl,by6c
tvscl,int6c,0
tvscl,by6c,1
help,int6c,by6c
!p.multi=0
tvscl,int6c,0
erase
tvscl,int6c,0
tvscl,by6c,1
intatst=seeing(intc,size=12,ap=400)
; % Array dimensions must be greater than 0.
retall
intatst=seeing(int6c,size=12,ap=400)
;    0.0391439    0.0198896
tvscl,int6catst,2
; % TVSCL: Expression must be an array in this context: INT6CATST.
tvscl,intatst,2
help,intatst
help,congrid(intatst,211,505),2
tvscl,congrid(intatst,211,505),2
intatst=seeing(int6c,size=5,ap=400)
;    0.0391439    0.0182229
tvscl,congrid(intatst,211,505),2
erase
tvscl,int6
help,int6
window,xs=1400,ys=1400
tvscl,congrid(int6,841/2,2016/2)
tvscl,int6[*,2016-841:*]
print,2016-841
;    1175
tvscl,int6[*,1100:1100+840]
int6c=int6[*,1100:1100+840]
help,int6c
by6c=by6[*,1100:1100+840]
help,by6c
tvcsl,by6c,0
; % Attempt to call undefined procedure/function: 'TVCSL'.
tvscl,by6c,0
print,dx6
;   0.00595238
print,dx6*841
;      5.00595
int6atst=seeing(int6c,size=5,ap=400)
;    0.0398589    0.0368293
by6atst=seeing(by6c,size=5,ap=400)
;     0.374140     0.353300
tvscl,by6c
window,xs=1700,ys=900
tvscl,by6c,0
tvscl,by6catst,1
; % TVSCL: Expression must be an array in this context: BY6CATST.
tvscl,by6atst,1
by6nst=seeing(by6c,size=5,ap=160)
;     0.374140     0.328901
int6nst=seeing(int6c,size=5,ap=160)
;    0.0398589    0.0332948
by6sst=seeing(by6c,size=5,ap=100)
;     0.374140     0.309117
int6sst=seeing(int6c,size=5,ap=100)
;    0.0398589    0.0304443
int6hin=seeing(int6c,size=5,ap=50,ora=0.344)
;    0.0398589    0.0210213
by6hin=seeing(by6c,size=5,ap=50,ora=0.344)
;     0.374140     0.240445
flush,!journal
window,xs=1000,ys=1000
panel,0,0,nx=1,ny=1,xdist=1,ydist=1,xleft=6,ybottom=4,xright=2,ytop=1
plot_image,by6atst,[0,5],[0,12],xtitle='!5X (Mm)',ytit='!5Y (Mm)'
plot_image,bytscl(by6atst),[0,5],[0,5],xtitle='!5X (Mm)',ytit='!5Y (Mm)'
plot_image,bytscl(by6atst),[0,5],[0,5],xtitle='!5X (Mm)',ytit='!5Y (Mm)',chars=2
!p.charthick=1.5
plot_image,bytscl(by6atst),[0,5],[0,5],xtitle='!5X (Mm)',ytit='!5Y (Mm)',chars=2
plot_image,inttscl(by6atst),[0,5],[0,5],xtitle='!5X (Mm)',ytit='!5Y (Mm)',chars=2
; % Variable is undefined: INTTSCL.
retall
plot_image,bytscl(int6atst),[0,5],[0,5],xtitle='!5X (Mm)',ytit='!5Y (Mm)',chars=2
plot_image,bytscl(int6c),[0,5],[0,5],xtitle='!5X (Mm)',ytit='!5Y (Mm)',chars=2
plot_image,bytscl(by6c),[0,5],[0,5],xtitle='!5X (Mm)',ytit='!5Y (Mm)',chars=2
plot_image,bytscl(int6nst),[0,5],[0,5],xtitle='!5X (Mm)',ytit='!5Y (Mm)',chars=2
plot_image,bytscl(by6nst),[0,5],[0,5],xtitle='!5X (Mm)',ytit='!5Y (Mm)',chars=2
plot_image,bytscl(by6sst),[0,5],[0,5],xtitle='!5X (Mm)',ytit='!5Y (Mm)',chars=2
plot_image,bytscl(int6sst),[0,5],[0,5],xtitle='!5X (Mm)',ytit='!5Y (Mm)',chars=2
plot_image,bytscl(int6hin),[0,5],[0,5],xtitle='!5X (Mm)',ytit='!5Y (Mm)',chars=2
plot_image,bytscl(by6hin),[0,5],[0,5],xtitle='!5X (Mm)',ytit='!5Y (Mm)',chars=2