;- ; docformat = 'IDL' ;+ ; open ps ;- pro openeps,nomefile on_error,2 print,'out to ps on the file:', nomefile set_plot,'ps' device,bits=8,filename=nomefile,/ENCAPSULATED end ;- ; docformat = 'IDL' ;+ ; closeps ;- pro closeps on_error,2 device,/close set_plot,'x' end