This is Printing-with-Mathematica-under-0.9 in view mode; [Up]
Date: Sun 31-May-1989 15:45:56 From: Unknown Subject: Printing with Mathematica under 0.9 The NeXT 0.9 documentation says that Mathematica does not yet support printing. Although there does not seem to be a way to print an entire notebook with Mathematica, there is a way to print a single object. The secret is to use Mathematica's ability to communicate with an external process. Here is one 1. Define the external process that will handle the printing. This might be: $LaserWriter = "!psfix | lpr" or you might want to specify additional flags, such as $LaserWriter = "!psfix | lpr -Pyourprinter" if you want to specify a printer other than the default. 2. Define a Mathematica function to do the actual printing. For example, LaserWrite[graph_] := Display[ $LaserWriter, graph ] 3. Now you are ready to print. A sample sequence is Plot3D[Sin[x y], {x,0,4}, {y,0,4}] LaserWrite[%] The plot will be automatically scaled to fit the page. >From: tj@wb1.cs.cmu.edu (Cal Thixton)
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Marcel Waldvogel and Netfuture.ch.