;;;;.r init
;;;;roti='1865'
;;;;mlmb='E'
!P.MULTI = [ 0, 1 , 2 ]

psfilenm=roti+mlmb+'.ps'
set_plot,'ps'
device,/landscape,/inches,xsize=10.0,ysize=7.5,$
	xoffset=0.5,yoffset=10.5,filename=psfilenm




.r beeM
.r beeL


device,/close
set_plot,'x'
cmnd='lpr -Phao4s -h '+psfilenm
spawn,cmnd