pro plot_limb_int,t=t,r,i,mm
restgen,file='/home/caf/REF_FILES/CH_Min_Max_w.genx',r,i,mm
plot_io,r,i(0,*)*t,xr=[0.6,1.5],xtitle='!3 r/R !X',ys=1,xcharsize=1.1,ycharsize=1.1,charsize=1.1,yr=[.2,70],$
ytitle='!3 Intensity DN/5 arc sec/15.1 sec !X',symsiz=.5,xs=1,thick=3. 
oplot,r,mm(0,*)*t,linestyle=3,thick=3.
oplot,r,mm(1,*)*t,linestyle=4,thick=3.
oplot,r,i(1,*)*t,linestyle=2,thick=3.

oplot,[1.11,1.2],[37,37],thick=3.
oplot,[1.11,1.2],[30,30],linestyle=2,thick=3.
oplot,[1.11,1.2],[24,24],linestyle=3,thick=3.
oplot,[1.11,1.2],[19.5,19.5],linestyle=4,thick=3.

xyouts,1.21,37,'!3 Al.1265 Solar Max !X'
xyouts,1.21,30,'!3 AlMgMn Solar Max !X'
xyouts,1.21,24,'!3 Al.1265 Solar Min !X'
xyouts,1.21,19.5,'!3 AlMgMn Solar Min !X'

xyouts,1.066,0.09,'!9 n !X'
xyouts,0.515 ,8.2,'2',charsiz=.8,orientation=90
end