pro sidebarleb,hdr
;
;	prints CCD information alongside the plot
;	the horizontal size of the plot should be set [0,.7]
;
; SCCS variables for IDL use
; 
; @(#)sidebarleb.pro	1.2 07/23/97 :NRL Solar Physics
;
;
tmp=hdr.FILENAME
x=0.71
y=0.95
dely=.050
GET_UTC,dte,/ecs
xyouts,x,y,/normal,'FILE: '+tmp
y=y-dely
xyouts,x,y,/normal,'TELESCOPE:  '+hdr.detector
y=y-dely
xyouts,x,y,/normal,'Date: '+hdr.date_obs
y=y-dely
xyouts,x,y,/normal,'FILTER: '+hdr.filter
y=y-dely
xyouts,x,y,/normal,'POLAR: '+hdr.polar
y=y-dely
xyouts,x,y,/normal,'READ PORT:  '+hdr.readport
y=y-dely
xyouts,x,y,/normal,'ExpT: '+string(hdr.EXPTIME,format="(f7.2)")+' seconds'
y=y-dely
xyouts,x,y,/normal,'Plot: '+dte
y = y-dely
;nel = n_elements(!siderem)
;for i=0,nel-1 do if !siderem(i) ne '' then begin
;    xyouts,x,y,/normal,!siderem(i)
;    y = y-dely
;endif
if !p.subtitle ne '' then xyouts,x,y,/normal,!p.subtitle
return
end