%!PS-Adobe-2.0 %%Creator: dvips(k) 5.90a Copyright 2002 Radical Eye Software %%Title: test.dvi %%Pages: 1 %%PageOrder: Ascend %%BoundingBox: 0 0 596 842 %%DocumentFonts: Times-Roman CMR10 %%DocumentPaperSizes: a4 %%EndComments %DVIPSWebPage: (www.radicaleye.com) %DVIPSCommandLine: dvips -z -D 600 -o test.ps test %DVIPSParameters: dpi=600, compressed %DVIPSSource: TeX output 2005.02.21:2242 %%BeginProcSet: texc.pro %! /TeXDict 300 dict def TeXDict begin/N{def}def/B{bind def}N/S{exch}N/X{S N}B/A{dup}B/TR{translate}N/isls false N/vsize 11 72 mul N/hsize 8.5 72 mul N/landplus90{false}def/@rigin{isls{[0 landplus90{1 -1}{-1 1}ifelse 0 0 0]concat}if 72 Resolution div 72 VResolution div neg scale isls{ landplus90{VResolution 72 div vsize mul 0 exch}{Resolution -72 div hsize mul 0}ifelse TR}if Resolution VResolution vsize -72 div 1 add mul TR[ matrix currentmatrix{A A round sub abs 0.00001 lt{round}if}forall round exch round exch]setmatrix}N/@landscape{/isls true N}B/@manualfeed{ statusdict/manualfeed true put}B/@copies{/#copies X}B/FMat[1 0 0 -1 0 0] N/FBB[0 0 0 0]N/nn 0 N/IEn 0 N/ctr 0 N/df-tail{/nn 8 dict N nn begin /FontType 3 N/FontMatrix fntrx N/FontBBox FBB N string/base X array /BitMaps X/BuildChar{CharBuilder}N/Encoding IEn N end A{/foo setfont}2 array copy cvx N load 0 nn put/ctr 0 N[}B/sf 0 N/df{/sf 1 N/fntrx FMat N df-tail}B/dfs{div/sf X/fntrx[sf 0 0 sf neg 0 0]N df-tail}B/E{pop nn A definefont setfont}B/Cw{Cd A length 5 sub get}B/Ch{Cd A length 4 sub get }B/Cx{128 Cd A length 3 sub get sub}B/Cy{Cd A length 2 sub get 127 sub} B/Cdx{Cd A length 1 sub get}B/Ci{Cd A type/stringtype ne{ctr get/ctr ctr 1 add N}if}B/id 0 N/rw 0 N/rc 0 N/gp 0 N/cp 0 N/G 0 N/CharBuilder{save 3 1 roll S A/base get 2 index get S/BitMaps get S get/Cd X pop/ctr 0 N Cdx 0 Cx Cy Ch sub Cx Cw add Cy setcachedevice Cw Ch true[1 0 0 -1 -.1 Cx sub Cy .1 sub]/id Ci N/rw Cw 7 add 8 idiv string N/rc 0 N/gp 0 N/cp 0 N{ rc 0 ne{rc 1 sub/rc X rw}{G}ifelse}imagemask restore}B/G{{id gp get/gp gp 1 add N A 18 mod S 18 idiv pl S get exec}loop}B/adv{cp add/cp X}B /chg{rw cp id gp 4 index getinterval putinterval A gp add/gp X adv}B/nd{ /cp 0 N rw exit}B/lsh{rw cp 2 copy get A 0 eq{pop 1}{A 255 eq{pop 254}{ A A add 255 and S 1 and or}ifelse}ifelse put 1 adv}B/rsh{rw cp 2 copy get A 0 eq{pop 128}{A 255 eq{pop 127}{A 2 idiv S 128 and or}ifelse} ifelse put 1 adv}B/clr{rw cp 2 index string putinterval adv}B/set{rw cp fillstr 0 4 index getinterval putinterval adv}B/fillstr 18 string 0 1 17 {2 copy 255 put pop}for N/pl[{adv 1 chg}{adv 1 chg nd}{1 add chg}{1 add chg nd}{adv lsh}{adv lsh nd}{adv rsh}{adv rsh nd}{1 add adv}{/rc X nd}{ 1 add set}{1 add clr}{adv 2 chg}{adv 2 chg nd}{pop nd}]A{bind pop} forall N/D{/cc X A type/stringtype ne{]}if nn/base get cc ctr put nn /BitMaps get S ctr S sf 1 ne{A A length 1 sub A 2 index S get sf div put }if put/ctr ctr 1 add N}B/I{cc 1 add D}B/bop{userdict/bop-hook known{ bop-hook}if/SI save N @rigin 0 0 moveto/V matrix currentmatrix A 1 get A mul exch 0 get A mul add .99 lt{/QV}{/RV}ifelse load def pop pop}N/eop{ SI restore userdict/eop-hook known{eop-hook}if showpage}N/@start{ userdict/start-hook known{start-hook}if pop/VResolution X/Resolution X 1000 div/DVImag X/IEn 256 array N 2 string 0 1 255{IEn S A 360 add 36 4 index cvrs cvn put}for pop 65781.76 div/vsize X 65781.76 div/hsize X}N /p{show}N/RMat[1 0 0 -1 0 0]N/BDot 260 string N/Rx 0 N/Ry 0 N/V{}B/RV/v{ /Ry X/Rx X V}B statusdict begin/product where{pop false[(Display)(NeXT) (LaserWriter 16/600)]{A length product length le{A length product exch 0 exch getinterval eq{pop true exit}if}{pop}ifelse}forall}{false}ifelse end{{gsave TR -.1 .1 TR 1 1 scale Rx Ry false RMat{BDot}imagemask grestore}}{{gsave TR -.1 .1 TR Rx Ry scale 1 1 false RMat{BDot} imagemask grestore}}ifelse B/QV{gsave newpath transform round exch round exch itransform moveto Rx 0 rlineto 0 Ry neg rlineto Rx neg 0 rlineto fill grestore}B/a{moveto}B/delta 0 N/tail{A/delta X 0 rmoveto}B/M{S p delta add tail}B/b{S p tail}B/c{-4 M}B/d{-3 M}B/e{-2 M}B/f{-1 M}B/g{0 M} B/h{1 M}B/i{2 M}B/j{3 M}B/k{4 M}B/w{0 rmoveto}B/l{p -4 w}B/m{p -3 w}B/n{ p -2 w}B/o{p -1 w}B/q{p 1 w}B/r{p 2 w}B/s{p 3 w}B/t{p 4 w}B/x{0 S rmoveto}B/y{3 2 roll p a}B/bos{/SS save N}B/eos{SS restore}B end %%EndProcSet %%BeginProcSet: 8r.enc % @@psencodingfile@{ % author = "S. Rahtz, P. MacKay, Alan Jeffrey, B. Horn, K. Berry", % version = "0.6", % date = "1 July 1998", % filename = "8r.enc", % email = "tex-fonts@@tug.org", % docstring = "Encoding for TrueType or Type 1 fonts % to be used with TeX." % @} % % Idea is to have all the characters normally included in Type 1 fonts % available for typesetting. This is effectively the characters in Adobe % Standard Encoding + ISO Latin 1 + extra characters from Lucida. % % Character code assignments were made as follows: % % (1) the Windows ANSI characters are almost all in their Windows ANSI % positions, because some Windows users cannot easily reencode the % fonts, and it makes no difference on other systems. The only Windows % ANSI characters not available are those that make no sense for % typesetting -- rubout (127 decimal), nobreakspace (160), softhyphen % (173). quotesingle and grave are moved just because it's such an % irritation not having them in TeX positions. % % (2) Remaining characters are assigned arbitrarily to the lower part % of the range, avoiding 0, 10 and 13 in case we meet dumb software. % % (3) Y&Y Lucida Bright includes some extra text characters; in the % hopes that other PostScript fonts, perhaps created for public % consumption, will include them, they are included starting at 0x12. % % (4) Remaining positions left undefined are for use in (hopefully) % upward-compatible revisions, if someday more characters are generally % available. % % (5) hyphen appears twice for compatibility with both % ASCII and Windows. % /TeXBase1Encoding [ % 0x00 (encoded characters from Adobe Standard not in Windows 3.1) /.notdef /dotaccent /fi /fl /fraction /hungarumlaut /Lslash /lslash /ogonek /ring /.notdef /breve /minus /.notdef % These are the only two remaining unencoded characters, so may as % well include them. /Zcaron /zcaron % 0x10 /caron /dotlessi % (unusual TeX characters available in, e.g., Lucida Bright) /dotlessj /ff /ffi /ffl /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef % very contentious; it's so painful not having quoteleft and quoteright % at 96 and 145 that we move the things normally found there to here. /grave /quotesingle % 0x20 (ASCII begins) /space /exclam /quotedbl /numbersign /dollar /percent /ampersand /quoteright /parenleft /parenright /asterisk /plus /comma /hyphen /period /slash % 0x30 /zero /one /two /three /four /five /six /seven /eight /nine /colon /semicolon /less /equal /greater /question % 0x40 /at /A /B /C /D /E /F /G /H /I /J /K /L /M /N /O % 0x50 /P /Q /R /S /T /U /V /W /X /Y /Z /bracketleft /backslash /bracketright /asciicircum /underscore % 0x60 /quoteleft /a /b /c /d /e /f /g /h /i /j /k /l /m /n /o % 0x70 /p /q /r /s /t /u /v /w /x /y /z /braceleft /bar /braceright /asciitilde /.notdef % rubout; ASCII ends % 0x80 /.notdef /.notdef /quotesinglbase /florin /quotedblbase /ellipsis /dagger /daggerdbl /circumflex /perthousand /Scaron /guilsinglleft /OE /.notdef /.notdef /.notdef % 0x90 /.notdef /.notdef /.notdef /quotedblleft /quotedblright /bullet /endash /emdash /tilde /trademark /scaron /guilsinglright /oe /.notdef /.notdef /Ydieresis % 0xA0 /.notdef % nobreakspace /exclamdown /cent /sterling /currency /yen /brokenbar /section /dieresis /copyright /ordfeminine /guillemotleft /logicalnot /hyphen % Y&Y (also at 45); Windows' softhyphen /registered /macron % 0xD0 /degree /plusminus /twosuperior /threesuperior /acute /mu /paragraph /periodcentered /cedilla /onesuperior /ordmasculine /guillemotright /onequarter /onehalf /threequarters /questiondown % 0xC0 /Agrave /Aacute /Acircumflex /Atilde /Adieresis /Aring /AE /Ccedilla /Egrave /Eacute /Ecircumflex /Edieresis /Igrave /Iacute /Icircumflex /Idieresis % 0xD0 /Eth /Ntilde /Ograve /Oacute /Ocircumflex /Otilde /Odieresis /multiply /Oslash /Ugrave /Uacute /Ucircumflex /Udieresis /Yacute /Thorn /germandbls % 0xE0 /agrave /aacute /acircumflex /atilde /adieresis /aring /ae /ccedilla /egrave /eacute /ecircumflex /edieresis /igrave /iacute /icircumflex /idieresis % 0xF0 /eth /ntilde /ograve /oacute /ocircumflex /otilde /odieresis /divide /oslash /ugrave /uacute /ucircumflex /udieresis /yacute /thorn /ydieresis ] def %%EndProcSet %%BeginProcSet: texps.pro %! TeXDict begin/rf{findfont dup length 1 add dict begin{1 index/FID ne 2 index/UniqueID ne and{def}{pop pop}ifelse}forall[1 index 0 6 -1 roll exec 0 exch 5 -1 roll VResolution Resolution div mul neg 0 0]/Metrics exch def dict begin Encoding{exch dup type/integertype ne{pop pop 1 sub dup 0 le{pop}{[}ifelse}{FontMatrix 0 get div Metrics 0 get div def} ifelse}forall Metrics/Metrics currentdict end def[2 index currentdict end definefont 3 -1 roll makefont/setfont cvx]cvx def}def/ObliqueSlant{ dup sin S cos div neg}B/SlantFont{4 index mul add}def/ExtendFont{3 -1 roll mul exch}def/ReEncodeFont{CharStrings rcheck{/Encoding false def dup[exch{dup CharStrings exch known not{pop/.notdef/Encoding true def} if}forall Encoding{]exch pop}{cleartomark}ifelse}if/Encoding exch def} def end %%EndProcSet %%BeginProcSet: special.pro %! TeXDict begin/SDict 200 dict N SDict begin/@SpecialDefaults{/hs 612 N /vs 792 N/ho 0 N/vo 0 N/hsc 1 N/vsc 1 N/ang 0 N/CLIP 0 N/rwiSeen false N /rhiSeen false N/letter{}N/note{}N/a4{}N/legal{}N}B/@scaleunit 100 N /@hscale{@scaleunit div/hsc X}B/@vscale{@scaleunit div/vsc X}B/@hsize{ /hs X/CLIP 1 N}B/@vsize{/vs X/CLIP 1 N}B/@clip{/CLIP 2 N}B/@hoffset{/ho X}B/@voffset{/vo X}B/@angle{/ang X}B/@rwi{10 div/rwi X/rwiSeen true N}B /@rhi{10 div/rhi X/rhiSeen true N}B/@llx{/llx X}B/@lly{/lly X}B/@urx{ /urx X}B/@ury{/ury X}B/magscale true def end/@MacSetUp{userdict/md known {userdict/md get type/dicttype eq{userdict begin md length 10 add md maxlength ge{/md md dup length 20 add dict copy def}if end md begin /letter{}N/note{}N/legal{}N/od{txpose 1 0 mtx defaultmatrix dtransform S atan/pa X newpath clippath mark{transform{itransform moveto}}{transform{ itransform lineto}}{6 -2 roll transform 6 -2 roll transform 6 -2 roll transform{itransform 6 2 roll itransform 6 2 roll itransform 6 2 roll curveto}}{{closepath}}pathforall newpath counttomark array astore/gc xdf pop ct 39 0 put 10 fz 0 fs 2 F/|______Courier fnt invertflag{PaintBlack} if}N/txpose{pxs pys scale ppr aload pop por{noflips{pop S neg S TR pop 1 -1 scale}if xflip yflip and{pop S neg S TR 180 rotate 1 -1 scale ppr 3 get ppr 1 get neg sub neg ppr 2 get ppr 0 get neg sub neg TR}if xflip yflip not and{pop S neg S TR pop 180 rotate ppr 3 get ppr 1 get neg sub neg 0 TR}if yflip xflip not and{ppr 1 get neg ppr 0 get neg TR}if}{ noflips{TR pop pop 270 rotate 1 -1 scale}if xflip yflip and{TR pop pop 90 rotate 1 -1 scale ppr 3 get ppr 1 get neg sub neg ppr 2 get ppr 0 get neg sub neg TR}if xflip yflip not and{TR pop pop 90 rotate ppr 3 get ppr 1 get neg sub neg 0 TR}if yflip xflip not and{TR pop pop 270 rotate ppr 2 get ppr 0 get neg sub neg 0 S TR}if}ifelse scaleby96{ppr aload pop 4 -1 roll add 2 div 3 1 roll add 2 div 2 copy TR .96 dup scale neg S neg S TR}if}N/cp{pop pop showpage pm restore}N end}if}if}N/normalscale{ Resolution 72 div VResolution 72 div neg scale magscale{DVImag dup scale }if 0 setgray}N/psfts{S 65781.76 div N}N/startTexFig{/psf$SavedState save N userdict maxlength dict begin/magscale true def normalscale currentpoint TR/psf$ury psfts/psf$urx psfts/psf$lly psfts/psf$llx psfts /psf$y psfts/psf$x psfts currentpoint/psf$cy X/psf$cx X/psf$sx psf$x psf$urx psf$llx sub div N/psf$sy psf$y psf$ury psf$lly sub div N psf$sx psf$sy scale psf$cx psf$sx div psf$llx sub psf$cy psf$sy div psf$ury sub TR/showpage{}N/erasepage{}N/setpagedevice{pop}N/copypage{}N/p 3 def @MacSetUp}N/doclip{psf$llx psf$lly psf$urx psf$ury currentpoint 6 2 roll newpath 4 copy 4 2 roll moveto 6 -1 roll S lineto S lineto S lineto closepath clip newpath moveto}N/endTexFig{end psf$SavedState restore}N /@beginspecial{SDict begin/SpecialSave save N gsave normalscale currentpoint TR @SpecialDefaults count/ocount X/dcount countdictstack N} N/@setspecial{CLIP 1 eq{newpath 0 0 moveto hs 0 rlineto 0 vs rlineto hs neg 0 rlineto closepath clip}if ho vo TR hsc vsc scale ang rotate rwiSeen{rwi urx llx sub div rhiSeen{rhi ury lly sub div}{dup}ifelse scale llx neg lly neg TR}{rhiSeen{rhi ury lly sub div dup scale llx neg lly neg TR}if}ifelse CLIP 2 eq{newpath llx lly moveto urx lly lineto urx ury lineto llx ury lineto closepath clip}if/showpage{}N/erasepage{}N /setpagedevice{pop}N/copypage{}N newpath}N/@endspecial{count ocount sub{ pop}repeat countdictstack dcount sub{end}repeat grestore SpecialSave restore end}N/@defspecial{SDict begin}N/@fedspecial{end}B/li{lineto}B /rl{rlineto}B/rc{rcurveto}B/np{/SaveX currentpoint/SaveY X N 1 setlinecap newpath}N/st{stroke SaveX SaveY moveto}N/fil{fill SaveX SaveY moveto}N/ellipse{/endangle X/startangle X/yrad X/xrad X/savematrix matrix currentmatrix N TR xrad yrad scale 0 0 1 startangle endangle arc savematrix setmatrix}N end %%EndProcSet %%BeginProcSet: hps.pro %! /HPSdict 20 dict dup begin/braindeaddistill 50 def/rfch{dup length 1 sub 1 exch getinterval}bind def/splituri{dup(#)search{exch pop}{()exch} ifelse dup(file:)anchorsearch{pop exch pop 3 -1 roll pop false}{pop 3 -1 roll exch pop true}ifelse}bind def/lookuptarget{exch rfch dup /TargetAnchors where{pop TargetAnchors dup 3 -1 roll known{exch get true }{pop(target unknown:)print == false}ifelse}{pop pop (target dictionary unknown\012)print false}ifelse}bind def/savecount 0 def/stackstopped{count counttomark sub/savecount exch store stopped count savecount sub 1 sub dup 0 gt{{exch pop}repeat}{pop}ifelse}bind def /tempstring 256 string def/targetvalidate{1 index dup length 255 gt exch dup(/)search{pop pop pop exch pop true exch}{pop}ifelse cvn tempstring cvs token pop pop length 0 ne or not}bind def/targetdump-hook where{pop} {/targetdump-hook{dup mark exch gsave initmat setmatrix{{mark/Dest 4 2 roll targetvalidate{aload pop exch pop/Page 3 1 roll/View exch[exch /FitH exch]/DEST pdfmark}{cleartomark}ifelse}forall}stackstopped pop grestore}bind def}ifelse/baseurl{mark exch 1 dict dup 3 -1 roll/Base exch put/URI exch/DOCVIEW{pdfmark}stackstopped pop}bind def /externalhack systemdict/PDF known def/oldstyle true def/initmat matrix currentmatrix def/actiondict 2 dict dup/Subtype/URI put def /weblinkhandler{dup 3 1 roll mark 4 1 roll/Title 4 1 roll splituri 3 -1 roll dup length 0 gt{cvn/Dest exch 4 2 roll}{pop}ifelse{externalhack{ /HTTPFile exch}{actiondict dup 3 -1 roll/URI exch put/Action exch} ifelse}{externalhack{/HTTPFile exch}{/File exch/Action/GoToR}ifelse} ifelse counttomark 2 sub -1 roll aload pop/Rect 4 1 roll/Border 3 1 roll /Color exch oldstyle{/LNK}{/Subtype/Link/ANN}ifelse gsave initmat setmatrix{pdfmark}stackstopped grestore}bind def/externalhandler where{ pop}{/externalhandler{2 copy{weblinkhandler}exec{/externalhack externalhack not store 2 copy{weblinkhandler}exec{/externalhack externalhack not store/oldstyle false store 2 copy{weblinkhandler}exec{ (WARNING: external refs disabled\012)print/externalhandler{pop pop}bind store externalhandler}{pop pop}ifelse}{pop pop/externalhack externalhack not store}ifelse}{pop pop/externalhandler{weblinkhandler pop}bind store} ifelse}bind def}ifelse/pdfmnew{dup type/stringtype eq{externalhandler}{ exch dup rfch exch 3 -1 roll lookuptarget{mark 4 1 roll/Title 4 1 roll aload pop exch pop/Page 3 1 roll/View exch[exch/FitH exch]5 -1 roll aload pop/Rect 4 1 roll/Border 3 1 roll/Color exch/LNK gsave initmat setmatrix pdfmark grestore}{pop pop}ifelse}ifelse}bind def/pdfmold{dup type/stringtype eq{externalhandler}{exch dup rfch exch 3 -1 roll lookuptarget{mark 4 1 roll/Title 4 1 roll aload pop exch pop/Page 3 1 roll/View exch[exch/FitH exch]5 -1 roll aload pop pop 0 3 getinterval /Rect 3 1 roll/Border exch/LNK gsave initmat setmatrix pdfmark grestore} {pop pop}ifelse}ifelse}bind def/pdfm where{pop}{/pdfm /currentdistillerparams where{pop currentdistillerparams dup /CoreDistVersion known{/CoreDistVersion get}{0}ifelse dup braindeaddistill le{(WARNING: switching to old pdfm because version =) print ==/pdfmold}{pop/pdfmnew}ifelse load}{/pdfmark where{pop{dup type /stringtype eq{externalhandler}{2 copy mark 3 1 roll{pdfmnew} stackstopped{2 copy mark 3 1 roll{pdfmold}stackstopped{ (WARNING: pdfm disabled\012)print/pdfm{pop pop}store}{ (WARNING: new pdfm failed, switching to old pdfm\012)print/pdfm/pdfmold load store}ifelse}{/pdfm/pdfmnew load store}ifelse pop pop}ifelse}}{{ pop pop}}ifelse}ifelse bind def}ifelse end def %%EndProcSet %%BeginFont: CMR10 %!PS-AdobeFont-1.1: CMR10 1.00B %%CreationDate: 1992 Feb 19 19:54:52 % Copyright (C) 1997 American Mathematical Society. All Rights Reserved. 11 dict begin /FontInfo 7 dict dup begin /version (1.00B) readonly def /Notice (Copyright (C) 1997 American Mathematical Society. All Rights Reserved) readonly def /FullName (CMR10) readonly def /FamilyName (Computer Modern) readonly def /Weight (Medium) readonly def /ItalicAngle 0 def /isFixedPitch false def end readonly def /FontName /CMR10 def /PaintType 0 def /FontType 1 def /FontMatrix [0.001 0 0 0.001 0 0] readonly def /Encoding 256 array 0 1 255 {1 index exch /.notdef put} for dup 49 /one put readonly def /FontBBox{-251 -250 1009 969}readonly def /UniqueID 5000793 def currentdict end currentfile eexec D9D66F633B846A97B686A97E45A3D0AA052A014267B7904EB3C0D3BD0B83D891 016CA6CA4B712ADEB258FAAB9A130EE605E61F77FC1B738ABC7C51CD46EF8171 9098D5FEE67660E69A7AB91B58F29A4D79E57022F783EB0FBBB6D4F4EC35014F D2DECBA99459A4C59DF0C6EBA150284454E707DC2100C15B76B4C19B84363758 469A6C558785B226332152109871A9883487DD7710949204DDCF837E6A8708B8 2BDBF16FBC7512FAA308A093FE5CF7158F1163BC1F3352E22A1452E73FECA8A4 87100FB1FFC4C8AF409B2067537220E605DA0852CA49839E1386AF9D7A1A455F D1F017CE45884D76EF2CB9BC5821FD25365DDEA6E45F332B5F68A44AD8A530F0 92A36FAC8D27F9087AFEEA2096F839A2BC4B937F24E080EF7C0F9374A18D565C 295A05210DB96A23175AC59A9BD0147A310EF49C551A417E0A22703F94FF7B75 409A5D417DA6730A69E310FA6A4229FC7E4F620B0FC4C63C50E99E179EB51E4C 4BC45217722F1E8E40F1E1428E792EAFE05C5A50D38C52114DFCD24D54027CBF 2512DD116F0463DE4052A7AD53B641A27E81E481947884CE35661B49153FA19E 0A2A860C7B61558671303DE6AE06A80E4E450E17067676E6BBB42A9A24ACBC3E B0CA7B7A3BFEA84FED39CCFB6D545BB2BCC49E5E16976407AB9D94556CD4F008 24EF579B6800B6DC3AAF840B3FC6822872368E3B4274DD06CA36AF8F6346C11B 43C772CC242F3B212C4BD7018D71A1A74C9A94ED0093A5FB6557F4E0751047AF D72098ECA301B8AE68110F983796E581F106144951DF5B750432A230FDA3B575 5A38B5E7972AABC12306A01A99FCF8189D71B8DBF49550BAEA9CF1B97CBFC7CC 96498ECC938B1A1710B670657DE923A659DB8757147B140A48067328E7E3F9C3 7D1888B284904301450CE0BC15EEEA00E48CCD6388F3FC3C8578EF9A20A0E06E 4F7ADDAF0E7D1E182D115BF1AD931977325AD391E72E2B13CC108E3726C11099 E2000623188AAAC9F3E233EB253BDD8B0A4759A66A113E066238B0086AC1B634 5ABFF90E4B5ED3FA69C22541981B2BFC9710AEF6B50A8BB53431C7B4D380D721 639E005D6B4688EE16BFF48443E7C9E5FB5BC5883E271CB0342893C0BBC0A879 B7220832FB50103F72F8B5D98CF223DB1D0EE09EE454D9496C392F12478835E1 762DF62F2BCF601F3355828AB3963623C4B9BDBBC761B9DE9EDE67C74277FECB B3AAEE9240011A2BC34C4879B3673E7EEB374A3FB8ED01FB5FB85AFBC1F7299A 8371255D51560E1946A50092C8E48F3BF180229FF21A1A79020E4BEB512EABF1 02AA111461557961E3B891E4FC323C61D497CCCE9D2586EB93DE4D6FB682B960 B36D5C4AB832F0F8D8CFBA86753A9A919B814D506A80B2A8399C9396D9C94C4B 74FD9890373C583561A49FBED4F520EFC18DBA2E1BFE377A7B11B3684EFA80F5 E9122A94423BC3A5B27D8A4FC17EE6DD29 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 cleartomark %%EndFont TeXDict begin 39158280 55380996 1000 600 600 (test.dvi) @start /Fa 206[42 49[{}1 83.022 /CMR10 rf end %%EndProlog %%BeginSetup %%Feature: *Resolution 600dpi TeXDict begin %%BeginPaperSize: a4 a4 %%EndPaperSize end HPSdict begin /TargetAnchors 0 dict dup begin end targetdump-hook def end TeXDict begin %%EndSetup %%Page: 1 1 TeXDict begin HPSdict begin 1 0 bop 639 444 990 4 v 639 1326 4 883 v 667 1302 a @beginspecial 37 @llx 156 @lly 576 @urx 637 @ury 1119 @rwi @setspecial %%BeginDocument: diagram.eps %!PS-Adobe-3.0 EPSF-3.0 %%Creator: Tk Canvas Widget %%For: Peter Flynn,Silmaril Consultants,+353 86 807 8172,+353 21 454 6305 %%Title: Window .c %%CreationDate: Tue May 1 01:35:12 2001 %%BoundingBox: 37 156 576 637 %%Pages: 1 %%DocumentData: Clean7Bit %%Orientation: Portrait %%DocumentNeededResources: font Times-Roman %%EndComments %%BeginProlog 50 dict begin % This is a standard prolog for Postscript generated by Tk's canvas % widget. % RCS: @(#) $Id: tkCanvPs.c,v 1.4 1998/09/22 18:57:16 stanton Exp $ % The definitions below just define all of the variables used in % any of the procedures here. This is needed for obscure reasons % explained on p. 716 of the Postscript manual (Section H.2.7, % "Initializing Variables," in the section on Encapsulated Postscript). /baseline 0 def /stipimage 0 def /height 0 def /justify 0 def /lineLength 0 def /spacing 0 def /stipple 0 def /strings 0 def /xoffset 0 def /yoffset 0 def /tmpstip null def % Define the array ISOLatin1Encoding (which specifies how characters are % encoded for ISO-8859-1 fonts), if it isn't already present (Postscript % level 2 is supposed to define it, but level 1 doesn't). systemdict /ISOLatin1Encoding known not { /ISOLatin1Encoding [ /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /exclam /quotedbl /numbersign /dollar /percent /ampersand /quoteright /parenleft /parenright /asterisk /plus /comma /minus /period /slash /zero /one /two /three /four /five /six /seven /eight /nine /colon /semicolon /less /equal /greater /question /at /A /B /C /D /E /F /G /H /I /J /K /L /M /N /O /P /Q /R /S /T /U /V /W /X /Y /Z /bracketleft /backslash /bracketright /asciicircum /underscore /quoteleft /a /b /c /d /e /f /g /h /i /j /k /l /m /n /o /p /q /r /s /t /u /v /w /x /y /z /braceleft /bar /braceright /asciitilde /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /dotlessi /grave /acute /circumflex /tilde /macron /breve /dotaccent /dieresis /space /ring /cedilla /space /hungarumlaut /ogonek /caron /space /exclamdown /cent /sterling /currency /yen /brokenbar /section /dieresis /copyright /ordfeminine /guillemotleft /logicalnot /hyphen /registered /macron /degree /plusminus /twosuperior /threesuperior /acute /mu /paragraph /periodcentered /cedillar /onesuperior /ordmasculine /guillemotright /onequarter /onehalf /threequarters /questiondown /Agrave /Aacute /Acircumflex /Atilde /Adieresis /Aring /AE /Ccedilla /Egrave /Eacute /Ecircumflex /Edieresis /Igrave /Iacute /Icircumflex /Idieresis /Eth /Ntilde /Ograve /Oacute /Ocircumflex /Otilde /Odieresis /multiply /Oslash /Ugrave /Uacute /Ucircumflex /Udieresis /Yacute /Thorn /germandbls /agrave /aacute /acircumflex /atilde /adieresis /aring /ae /ccedilla /egrave /eacute /ecircumflex /edieresis /igrave /iacute /icircumflex /idieresis /eth /ntilde /ograve /oacute /ocircumflex /otilde /odieresis /divide /oslash /ugrave /uacute /ucircumflex /udieresis /yacute /thorn /ydieresis ] def } if % font ISOEncode font % This procedure changes the encoding of a font from the default % Postscript encoding to ISOLatin1. It's typically invoked just % before invoking "setfont". The body of this procedure comes from % Section 5.6.1 of the Postscript book. /ISOEncode { dup length dict begin {1 index /FID ne {def} {pop pop} ifelse} forall /Encoding ISOLatin1Encoding def currentdict end % I'm not sure why it's necessary to use "definefont" on this new % font, but it seems to be important; just use the name "Temporary" % for the font. /Temporary exch definefont } bind def % StrokeClip % % This procedure converts the current path into a clip area under % the assumption of stroking. It's a bit tricky because some Postscript % interpreters get errors during strokepath for dashed lines. If % this happens then turn off dashes and try again. /StrokeClip { {strokepath} stopped { (This Postscript printer gets limitcheck overflows when) = (stippling dashed lines; lines will be printed solid instead.) = [] 0 setdash strokepath} if clip } bind def % desiredSize EvenPixels closestSize % % The procedure below is used for stippling. Given the optimal size % of a dot in a stipple pattern in the current user coordinate system, % compute the closest size that is an exact multiple of the device's % pixel size. This allows stipple patterns to be displayed without % aliasing effects. /EvenPixels { % Compute exact number of device pixels per stipple dot. dup 0 matrix currentmatrix dtransform dup mul exch dup mul add sqrt % Round to an integer, make sure the number is at least 1, and compute % user coord distance corresponding to this. dup round dup 1 lt {pop 1} if exch div mul } bind def % width height string StippleFill -- % % Given a path already set up and a clipping region generated from % it, this procedure will fill the clipping region with a stipple % pattern. "String" contains a proper image description of the % stipple pattern and "width" and "height" give its dimensions. Each % stipple dot is assumed to be about one unit across in the current % user coordinate system. This procedure trashes the graphics state. /StippleFill { % The following code is needed to work around a NeWSprint bug. /tmpstip 1 index def % Change the scaling so that one user unit in user coordinates % corresponds to the size of one stipple dot. 1 EvenPixels dup scale % Compute the bounding box occupied by the path (which is now % the clipping region), and round the lower coordinates down % to the nearest starting point for the stipple pattern. Be % careful about negative numbers, since the rounding works % differently on them. pathbbox 4 2 roll 5 index div dup 0 lt {1 sub} if cvi 5 index mul 4 1 roll 6 index div dup 0 lt {1 sub} if cvi 6 index mul 3 2 roll % Stack now: width height string y1 y2 x1 x2 % Below is a doubly-nested for loop to iterate across this area % in units of the stipple pattern size, going up columns then % across rows, blasting out a stipple-pattern-sized rectangle at % each position 6 index exch { 2 index 5 index 3 index { % Stack now: width height string y1 y2 x y gsave 1 index exch translate 5 index 5 index true matrix tmpstip imagemask grestore } for pop } for pop pop pop pop pop } bind def % -- AdjustColor -- % Given a color value already set for output by the caller, adjusts % that value to a grayscale or mono value if requested by the CL % variable. /AdjustColor { CL 2 lt { currentgray CL 0 eq { .5 lt {0} {1} ifelse } if setgray } if } bind def % x y strings spacing xoffset yoffset justify stipple DrawText -- % This procedure does all of the real work of drawing text. The % color and font must already have been set by the caller, and the % following arguments must be on the stack: % % x, y - Coordinates at which to draw text. % strings - An array of strings, one for each line of the text item, % in order from top to bottom. % spacing - Spacing between lines. % xoffset - Horizontal offset for text bbox relative to x and y: 0 for % nw/w/sw anchor, -0.5 for n/center/s, and -1.0 for ne/e/se. % yoffset - Vertical offset for text bbox relative to x and y: 0 for % nw/n/ne anchor, +0.5 for w/center/e, and +1.0 for sw/s/se. % justify - 0 for left justification, 0.5 for center, 1 for right justify. % stipple - Boolean value indicating whether or not text is to be % drawn in stippled fashion. If text is stippled, % procedure StippleText must have been defined to call % StippleFill in the right way. % % Also, when this procedure is invoked, the color and font must already % have been set for the text. /DrawText { /stipple exch def /justify exch def /yoffset exch def /xoffset exch def /spacing exch def /strings exch def % First scan through all of the text to find the widest line. /lineLength 0 def strings { stringwidth pop dup lineLength gt {/lineLength exch def} {pop} ifelse newpath } forall % Compute the baseline offset and the actual font height. 0 0 moveto (TXygqPZ) false charpath pathbbox dup /baseline exch def exch pop exch sub /height exch def pop newpath % Translate coordinates first so that the origin is at the upper-left % corner of the text's bounding box. Remember that x and y for % positioning are still on the stack. translate lineLength xoffset mul strings length 1 sub spacing mul height add yoffset mul translate % Now use the baseline and justification information to translate so % that the origin is at the baseline and positioning point for the % first line of text. justify lineLength mul baseline neg translate % Iterate over each of the lines to output it. For each line, % compute its width again so it can be properly justified, then % display it. strings { dup stringwidth pop justify neg mul 0 moveto stipple { % The text is stippled, so turn it into a path and print % by calling StippledText, which in turn calls StippleFill. % Unfortunately, many Postscript interpreters will get % overflow errors if we try to do the whole string at % once, so do it a character at a time. gsave /char (X) def { char 0 3 -1 roll put currentpoint gsave char true charpath clip StippleText grestore char stringwidth translate moveto } forall grestore } {show} ifelse 0 spacing neg translate } forall } bind def %%EndProlog %%BeginSetup /CL 2 def %%IncludeResource: font Times-Roman %%EndSetup %%Page: 1 1 save 306.0 396.0 translate 0.9846 0.9846 scale -342 -243 translate 69 487 moveto 616 487 lineto 616 0 lineto 69 0 lineto closepath clip newpath gsave 178 85 moveto 178 471 lineto 3 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 179 86 moveto 502 86 lineto 3 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 178 85 moveto 562 471 lineto 3 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 179 440 moveto 353 440 lineto 353 85 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 179 264 moveto 487 264 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 413 85 moveto 413 321 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 413 322 moveto 489 322 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 265 352 [ (Spending) (Variance) ] 26 -0.5 0.5 0 false DrawText grestore gsave 265 433.423834996254 moveto 265 380.818181818 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke 265 438.0909090909 moveto 260.499 428.0899090909 lineto 264.5 429.867736240422 lineto 265.5 429.867736240422 lineto 269.501 428.0899090909 lineto 265 438.0909090909 lineto fill grestore gsave 265 269.604574094646 moveto 265 321.125 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke 265 264.9375 moveto 269.501 274.9385 lineto 265.5 273.160672850478 lineto 264.5 273.160672850478 lineto 260.499 274.9385 lineto 265 264.9375 lineto fill grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 363 447 [ (E) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 337 276 [ (D) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 403 332 [ (C) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 422 251 [ (B) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 574 474 [ (X) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 363 96 [ (F) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 424 96 [ (A) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 519 292 [ (Efficiency Variance) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 162 440 [ (120) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 164 382 [ (100) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 166 322 [ (80) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 166 264 [ (60) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 167 204 [ (40) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 166 146 [ (20) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 168 76 [ (0) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 235 71 [ (10) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 295 71 [ (20) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 353 73 [ (30) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 413 73 [ (40) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 471 72 [ (50) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 325 29.0000000000001 [ (Volume \050Direct labour Hours\051) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 324 9.00000000000006 [ (\050thousands\051) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 108 312 [ (\243) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 109 293 [ (\050thousands\051) ] 17 -0.5 0.5 0 false DrawText grestore gsave 471 355.2 moveto 471 327.567074094646 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke 471 322.9 moveto 475.501 332.901 lineto 471.5 331.123172850478 lineto 470.5 331.123172850478 lineto 466.499 332.901 lineto 471 322.9 lineto fill grestore gsave 471 257.832925905354 moveto 471 234 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke 471 262.5 moveto 466.499 252.499 lineto 470.5 254.276827149522 lineto 471.5 254.276827149522 lineto 475.501 252.499 lineto 471 262.5 lineto fill grestore gsave 179 382 moveto 188 382 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 178 322 moveto 187 322 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 179 204 moveto 188 204 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 178 146 moveto 188 146 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 235 86 moveto 235 97 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 295 97 moveto 295 85 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 471 99 moveto 471 86 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore restore showpage %%Trailer end %%EOF %%EndDocument @endspecial 1625 1326 V 639 1329 990 4 v 1656 443 890 4 v 1656 1326 4 884 v 1018 w @beginspecial 287 @llx 406 @lly 337 @urx 456 @ury 1000 @rwi @clip @setspecial %%BeginDocument: diagram.eps %!PS-Adobe-3.0 EPSF-3.0 %%Creator: Tk Canvas Widget %%For: Peter Flynn,Silmaril Consultants,+353 86 807 8172,+353 21 454 6305 %%Title: Window .c %%CreationDate: Tue May 1 01:35:12 2001 %%BoundingBox: 37 156 576 637 %%Pages: 1 %%DocumentData: Clean7Bit %%Orientation: Portrait %%DocumentNeededResources: font Times-Roman %%EndComments %%BeginProlog 50 dict begin % This is a standard prolog for Postscript generated by Tk's canvas % widget. % RCS: @(#) $Id: tkCanvPs.c,v 1.4 1998/09/22 18:57:16 stanton Exp $ % The definitions below just define all of the variables used in % any of the procedures here. This is needed for obscure reasons % explained on p. 716 of the Postscript manual (Section H.2.7, % "Initializing Variables," in the section on Encapsulated Postscript). /baseline 0 def /stipimage 0 def /height 0 def /justify 0 def /lineLength 0 def /spacing 0 def /stipple 0 def /strings 0 def /xoffset 0 def /yoffset 0 def /tmpstip null def % Define the array ISOLatin1Encoding (which specifies how characters are % encoded for ISO-8859-1 fonts), if it isn't already present (Postscript % level 2 is supposed to define it, but level 1 doesn't). systemdict /ISOLatin1Encoding known not { /ISOLatin1Encoding [ /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /exclam /quotedbl /numbersign /dollar /percent /ampersand /quoteright /parenleft /parenright /asterisk /plus /comma /minus /period /slash /zero /one /two /three /four /five /six /seven /eight /nine /colon /semicolon /less /equal /greater /question /at /A /B /C /D /E /F /G /H /I /J /K /L /M /N /O /P /Q /R /S /T /U /V /W /X /Y /Z /bracketleft /backslash /bracketright /asciicircum /underscore /quoteleft /a /b /c /d /e /f /g /h /i /j /k /l /m /n /o /p /q /r /s /t /u /v /w /x /y /z /braceleft /bar /braceright /asciitilde /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /space /dotlessi /grave /acute /circumflex /tilde /macron /breve /dotaccent /dieresis /space /ring /cedilla /space /hungarumlaut /ogonek /caron /space /exclamdown /cent /sterling /currency /yen /brokenbar /section /dieresis /copyright /ordfeminine /guillemotleft /logicalnot /hyphen /registered /macron /degree /plusminus /twosuperior /threesuperior /acute /mu /paragraph /periodcentered /cedillar /onesuperior /ordmasculine /guillemotright /onequarter /onehalf /threequarters /questiondown /Agrave /Aacute /Acircumflex /Atilde /Adieresis /Aring /AE /Ccedilla /Egrave /Eacute /Ecircumflex /Edieresis /Igrave /Iacute /Icircumflex /Idieresis /Eth /Ntilde /Ograve /Oacute /Ocircumflex /Otilde /Odieresis /multiply /Oslash /Ugrave /Uacute /Ucircumflex /Udieresis /Yacute /Thorn /germandbls /agrave /aacute /acircumflex /atilde /adieresis /aring /ae /ccedilla /egrave /eacute /ecircumflex /edieresis /igrave /iacute /icircumflex /idieresis /eth /ntilde /ograve /oacute /ocircumflex /otilde /odieresis /divide /oslash /ugrave /uacute /ucircumflex /udieresis /yacute /thorn /ydieresis ] def } if % font ISOEncode font % This procedure changes the encoding of a font from the default % Postscript encoding to ISOLatin1. It's typically invoked just % before invoking "setfont". The body of this procedure comes from % Section 5.6.1 of the Postscript book. /ISOEncode { dup length dict begin {1 index /FID ne {def} {pop pop} ifelse} forall /Encoding ISOLatin1Encoding def currentdict end % I'm not sure why it's necessary to use "definefont" on this new % font, but it seems to be important; just use the name "Temporary" % for the font. /Temporary exch definefont } bind def % StrokeClip % % This procedure converts the current path into a clip area under % the assumption of stroking. It's a bit tricky because some Postscript % interpreters get errors during strokepath for dashed lines. If % this happens then turn off dashes and try again. /StrokeClip { {strokepath} stopped { (This Postscript printer gets limitcheck overflows when) = (stippling dashed lines; lines will be printed solid instead.) = [] 0 setdash strokepath} if clip } bind def % desiredSize EvenPixels closestSize % % The procedure below is used for stippling. Given the optimal size % of a dot in a stipple pattern in the current user coordinate system, % compute the closest size that is an exact multiple of the device's % pixel size. This allows stipple patterns to be displayed without % aliasing effects. /EvenPixels { % Compute exact number of device pixels per stipple dot. dup 0 matrix currentmatrix dtransform dup mul exch dup mul add sqrt % Round to an integer, make sure the number is at least 1, and compute % user coord distance corresponding to this. dup round dup 1 lt {pop 1} if exch div mul } bind def % width height string StippleFill -- % % Given a path already set up and a clipping region generated from % it, this procedure will fill the clipping region with a stipple % pattern. "String" contains a proper image description of the % stipple pattern and "width" and "height" give its dimensions. Each % stipple dot is assumed to be about one unit across in the current % user coordinate system. This procedure trashes the graphics state. /StippleFill { % The following code is needed to work around a NeWSprint bug. /tmpstip 1 index def % Change the scaling so that one user unit in user coordinates % corresponds to the size of one stipple dot. 1 EvenPixels dup scale % Compute the bounding box occupied by the path (which is now % the clipping region), and round the lower coordinates down % to the nearest starting point for the stipple pattern. Be % careful about negative numbers, since the rounding works % differently on them. pathbbox 4 2 roll 5 index div dup 0 lt {1 sub} if cvi 5 index mul 4 1 roll 6 index div dup 0 lt {1 sub} if cvi 6 index mul 3 2 roll % Stack now: width height string y1 y2 x1 x2 % Below is a doubly-nested for loop to iterate across this area % in units of the stipple pattern size, going up columns then % across rows, blasting out a stipple-pattern-sized rectangle at % each position 6 index exch { 2 index 5 index 3 index { % Stack now: width height string y1 y2 x y gsave 1 index exch translate 5 index 5 index true matrix tmpstip imagemask grestore } for pop } for pop pop pop pop pop } bind def % -- AdjustColor -- % Given a color value already set for output by the caller, adjusts % that value to a grayscale or mono value if requested by the CL % variable. /AdjustColor { CL 2 lt { currentgray CL 0 eq { .5 lt {0} {1} ifelse } if setgray } if } bind def % x y strings spacing xoffset yoffset justify stipple DrawText -- % This procedure does all of the real work of drawing text. The % color and font must already have been set by the caller, and the % following arguments must be on the stack: % % x, y - Coordinates at which to draw text. % strings - An array of strings, one for each line of the text item, % in order from top to bottom. % spacing - Spacing between lines. % xoffset - Horizontal offset for text bbox relative to x and y: 0 for % nw/w/sw anchor, -0.5 for n/center/s, and -1.0 for ne/e/se. % yoffset - Vertical offset for text bbox relative to x and y: 0 for % nw/n/ne anchor, +0.5 for w/center/e, and +1.0 for sw/s/se. % justify - 0 for left justification, 0.5 for center, 1 for right justify. % stipple - Boolean value indicating whether or not text is to be % drawn in stippled fashion. If text is stippled, % procedure StippleText must have been defined to call % StippleFill in the right way. % % Also, when this procedure is invoked, the color and font must already % have been set for the text. /DrawText { /stipple exch def /justify exch def /yoffset exch def /xoffset exch def /spacing exch def /strings exch def % First scan through all of the text to find the widest line. /lineLength 0 def strings { stringwidth pop dup lineLength gt {/lineLength exch def} {pop} ifelse newpath } forall % Compute the baseline offset and the actual font height. 0 0 moveto (TXygqPZ) false charpath pathbbox dup /baseline exch def exch pop exch sub /height exch def pop newpath % Translate coordinates first so that the origin is at the upper-left % corner of the text's bounding box. Remember that x and y for % positioning are still on the stack. translate lineLength xoffset mul strings length 1 sub spacing mul height add yoffset mul translate % Now use the baseline and justification information to translate so % that the origin is at the baseline and positioning point for the % first line of text. justify lineLength mul baseline neg translate % Iterate over each of the lines to output it. For each line, % compute its width again so it can be properly justified, then % display it. strings { dup stringwidth pop justify neg mul 0 moveto stipple { % The text is stippled, so turn it into a path and print % by calling StippledText, which in turn calls StippleFill. % Unfortunately, many Postscript interpreters will get % overflow errors if we try to do the whole string at % once, so do it a character at a time. gsave /char (X) def { char 0 3 -1 roll put currentpoint gsave char true charpath clip StippleText grestore char stringwidth translate moveto } forall grestore } {show} ifelse 0 spacing neg translate } forall } bind def %%EndProlog %%BeginSetup /CL 2 def %%IncludeResource: font Times-Roman %%EndSetup %%Page: 1 1 save 306.0 396.0 translate 0.9846 0.9846 scale -342 -243 translate 69 487 moveto 616 487 lineto 616 0 lineto 69 0 lineto closepath clip newpath gsave 178 85 moveto 178 471 lineto 3 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 179 86 moveto 502 86 lineto 3 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 178 85 moveto 562 471 lineto 3 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 179 440 moveto 353 440 lineto 353 85 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 179 264 moveto 487 264 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 413 85 moveto 413 321 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 413 322 moveto 489 322 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 265 352 [ (Spending) (Variance) ] 26 -0.5 0.5 0 false DrawText grestore gsave 265 433.423834996254 moveto 265 380.818181818 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke 265 438.0909090909 moveto 260.499 428.0899090909 lineto 264.5 429.867736240422 lineto 265.5 429.867736240422 lineto 269.501 428.0899090909 lineto 265 438.0909090909 lineto fill grestore gsave 265 269.604574094646 moveto 265 321.125 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke 265 264.9375 moveto 269.501 274.9385 lineto 265.5 273.160672850478 lineto 264.5 273.160672850478 lineto 260.499 274.9385 lineto 265 264.9375 lineto fill grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 363 447 [ (E) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 337 276 [ (D) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 403 332 [ (C) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 422 251 [ (B) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 574 474 [ (X) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 363 96 [ (F) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 424 96 [ (A) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 24 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 519 292 [ (Efficiency Variance) ] 26 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 162 440 [ (120) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 164 382 [ (100) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 166 322 [ (80) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 166 264 [ (60) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 167 204 [ (40) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 166 146 [ (20) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 168 76 [ (0) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 235 71 [ (10) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 295 71 [ (20) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 353 73 [ (30) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 413 73 [ (40) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 471 72 [ (50) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 325 29.0000000000001 [ (Volume \050Direct labour Hours\051) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 324 9.00000000000006 [ (\050thousands\051) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 108 312 [ (\243) ] 17 -0.5 0.5 0 false DrawText grestore gsave /Times-Roman findfont 16 scalefont ISOEncode setfont 0.000 0.000 0.000 setrgbcolor AdjustColor 109 293 [ (\050thousands\051) ] 17 -0.5 0.5 0 false DrawText grestore gsave 471 355.2 moveto 471 327.567074094646 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke 471 322.9 moveto 475.501 332.901 lineto 471.5 331.123172850478 lineto 470.5 331.123172850478 lineto 466.499 332.901 lineto 471 322.9 lineto fill grestore gsave 471 257.832925905354 moveto 471 234 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke 471 262.5 moveto 466.499 252.499 lineto 470.5 254.276827149522 lineto 471.5 254.276827149522 lineto 475.501 252.499 lineto 471 262.5 lineto fill grestore gsave 179 382 moveto 188 382 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 178 322 moveto 187 322 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 179 204 moveto 188 204 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 178 146 moveto 188 146 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 235 86 moveto 235 97 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 295 97 moveto 295 85 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore gsave 471 99 moveto 471 86 lineto 1 setlinewidth 0 setlinecap 0 setlinejoin 0.000 0.000 0.000 setrgbcolor AdjustColor stroke grestore restore showpage %%Trailer end %%EOF %%EndDocument @endspecial 2543 1326 V 1656 1329 890 4 v 1926 5255 a Fa(1)p eop end end %%Trailer end userdict /end-hook known{end-hook}if %%EOF