6.7.1 昔はこうだった

Display[] 関数 を `` Display["!psfix > ファイル名", グラフィックス]'' のように 使うと図形を印刷するための PostScript データが作成できる。

例えば

トーラスの図をファイルに記録

g = ParametricPlot3D[{Cos[t](3+Cos[u]),Sin[t](3+Cos[u]),Sin[u]}, {t,0,2Pi}, {u,0,2Pi}]
Display["!psfix > torus.ps", g]