optimize - %-12345X@PJL JOB @PJL SET RESOLUTION = 1200 @PJL...

Info iconThis preview shows pages 1–3. Sign up to view the full content.

View Full Document Right Arrow Icon

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full DocumentRight Arrow Icon
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: %-12345X@PJL JOB @PJL SET RESOLUTION = 1200 @PJL ENTER LANGUAGE = POSTSCRIPT %!PS-Adobe-3.0 %%Title: C:\TeXpapers\D65\optimize.DVI %%Creator: PSCRIPT.DRV Version 4.0 %%CreationDate: 08/24/01 11:42:11 %%BoundingBox: 13 13 599 779 %%Pages: (atend) %%PageOrder: Special %%Requirements: %%DocumentNeededFonts: (atend) %%DocumentSuppliedFonts: (atend) %%DocumentData: Clean7Bit %%LanguageLevel: 2 %%EndComments %%BeginProlog %%BeginProcSet: Pscript_Win_ErrorHandler 1.0 1 /currentpacking where{pop/oldpack currentpacking def/setpacking where{pop false setpacking}if}if/$brkpage 64 dict def $brkpage begin/prnt{dup type /stringtype ne{=string cvs}if dup length 6 mul/tx exch def/ty 10 def currentpoint/toy exch def/tox exch def 1 setgray newpath tox toy 2 sub moveto 0 ty rlineto tx 0 rlineto 0 ty neg rlineto closepath fill tox toy moveto 0 setgray show}bind def/nl{currentpoint exch pop lmargin exch moveto 0 -10 rmoveto}def/=={/cp 0 def typeprint nl}def/typeprint{dup type exec}readonly def /lmargin 72 def/rmargin 72 def/tprint{dup length cp add rmargin gt{nl/cp 0 def }if dup length cp add/cp exch def prnt}readonly def/cvsprint{=string cvs tprint( )tprint}readonly def/integertype{cvsprint}readonly def/realtype{ cvsprint}readonly def/booleantype{cvsprint}readonly def/operatortype{(--) tprint =string cvs tprint(-- )tprint}readonly def/marktype{pop(-mark- )tprint} readonly def/dicttype{pop(-dictionary- )tprint}readonly def/nulltype{pop (-null- )tprint}readonly def/filetype{pop(-filestream- )tprint}readonly def /savetype{pop(-savelevel- )tprint}readonly def/fonttype{pop(-fontid- )tprint} readonly def/nametype{dup xcheck not{(/)tprint}if cvsprint}readonly def /stringtype{dup rcheck{(\()tprint tprint(\))tprint}{pop(-string- )tprint} ifelse}readonly def/arraytype{dup rcheck{dup xcheck{({)tprint{typeprint}forall (})tprint}{([)tprint{typeprint}forall(])tprint}ifelse}{pop(-array- )tprint} ifelse}readonly def/packedarraytype{dup rcheck{dup xcheck{({)tprint{typeprint} forall(})tprint}{([)tprint{typeprint}forall(])tprint}ifelse}{pop (-packedarray- )tprint}ifelse}readonly def/courier/Courier findfont 10 scalefont def end errordict/handleerror{systemdict begin $error begin $brkpage begin newerror{/newerror false store vmstatus pop pop 0 ne{grestoreall}if showpage initgraphics courier setfont lmargin 720 moveto(ERROR: )prnt errorname prnt nl(OFFENDING COMMAND: )prnt/command load prnt $error/ostack known{nl nl(STACK:)prnt nl nl $error/ostack get aload length{==}repeat}if systemdict/showpage get exec(%%[ Error: )print errorname =print (; OffendingCommand: )print/command load =print( ]%%)= flush}if end end end} dup 0 systemdict put dup 4 $brkpage put bind readonly put/currentpacking where...
View Full Document

This note was uploaded on 11/13/2010 for the course ISE 680 taught by Professor Santanu during the Spring '10 term at Purdue University Calumet.

Page1 / 126

optimize - %-12345X@PJL JOB @PJL SET RESOLUTION = 1200 @PJL...

This preview shows document pages 1 - 3. Sign up to view the full document.

View Full Document Right Arrow Icon
Ask a homework question - tutors are online