Printing graphics

If you want to send graphics to a postscript printer, you can use the
PSPrint function available in Matheamtica.

	In[19]:= Plot3D[Sin[x y],{x,0,3},{y,0,3}]

	Out[19]= -SurfaceGraphics-

	In[20]:= PSPrint[%]

	Out[20]= -SurfaceGraphics-

The print job will be sent to the default printer.