Postscript output:
-----------------
    IDL> set_plot,'ps'
    IDL> device,file='filename.ps'
    IDL>  ... plot,...
    IDL> device,/close
    IDL>
    IDL> set_plot,'X'       ;revert to X output