%!PS-Adobe-2.0 EPSF-1.2 %%Creator: BGI by Borland International %%Title: BGI Graphics %%BoundingBox: 24 184 587 607 %***************************************************************** % File: preamble.bgi % Postscript preamble file for BGI Postscript driver % (c) Copyright 1989 Borland International % Last Update: 02-11-91 %***************************************************************** %%EndComments save /dic 12 dict def /RES { dic begin /cn exch def /new exch def /bf exch def /bd bf findfont def /fo bd maxlength dict def bd { exch dup /FID ne { dup /Encoding eq { exch dup length array copy fo 3 1 roll put } { exch fo 3 1 roll put } ifelse } { pop pop } ifelse } forall fo /FontName new put cn aload pop cn length 2 idiv { fo /Encoding get 3 1 roll put } repeat new fo definefont pop end } def % 1-30-90 /pcVector [ 16#00 /circumflex 16#01 /grave 16#02 /dieresis 16#03 /tilde 16#04 /acute 16#05 /cedilla 16#06 /ring 16#07 /slash 16#08 /caron 16#80 /Ccedilla 16#81 /udieresis 16#82 /eacute 16#83 /acircumflex 16#84 /adieresis 16#85 /agrave 16#86 /aring 16#87 /ccedilla 16#88 /ecircumflex 16#89 /edieresis 16#8a /egrave 16#8b /idieresis 16#8c /icircumflex 16#8d /igrave 16#8e /Adieresis 16#8f /Aring 16#90 /Eacute 16#91 /ae 16#92 /AE 16#93 /ocircumflex 16#94 /odieresis 16#95 /ograve 16#96 /ucircumflex 16#97 /ugrave 16#98 /ydieresis 16#99 /Odieresis 16#9a /Udieresis 16#9b /oslash 16#9c /sterling 16#9d /Oslash 16#9f /florin 16#a0 /aacute 16#a1 /iacute 16#a2 /oacute 16#a3 /uacute 16#a4 /ntilde 16#a5 /Ntilde 16#a6 /ordfeminine 16#a7 /ordmasculine 16#a8 /questiondown 16#ad /exclamdown 16#ae /guillemotleft 16#af /guillemotright 16#b0 /space 16#b1 /space 16#b2 /space 16#b3 /space 16#b7 /idieresis 16#b9 /Agrave 16#ba /currency 16#bb /sterling 16#bc /Ecircumflex 16#bd /section 16#be /Acircumflex 16#bf /Egrave 16#c0 /yen 16#c2 /cent 16#c3 /Ugrave 16#c8 /atilde 16#cb /space 16#d1 /Icircumflex 16#d2 /atilde 16#d3 /otilde 16#d4 /scaron 16#d5 /zcaron 16#d6 /Ydieresis 16#da /Atilde 16#df /Ocircumflex 16#e0 /a 16#e1 /germandbls 16#e2 /c 16#e3 /p 16#e4 /s 16#e5 /s 16#e6 /m 16#e7 /t 16#e9 /t 16#ea /o 16#eb /d 16#ec /i 16#ed /Oslash 16#ee /e 16#f0 /Aacute 16#f1 /germandbls ] def % end 1-30-90 /OP { bgiFill 0 ne bgiRes 0 eq and bgiFill 1 eq or % 1 = SolidFill { 1 CurrentFill ne { level0 } if bgiFillColor % stack: (color) dup /CurrentColor exch def % set color bgiRes 1 eq { bgiGrayTable exch get setgray } { setbgicolor } ifelse }{ % stack: - 0 bgiFill eq % 0 = HollowFill { }{ bgiFill dup 15 gt { pop }{ % stack: bgiFill dup bgiRes 0 ne exch 9 ne and { level0 bgiPatTable exch get setpatterndict begin /bstring exch def /onbits 0 def /offbits 0 def %9.375 0 /spot load setscreen 18.75 0 /spot load setscreen {} settransfer offbits offbits onbits add div end setgray }{ pop level0 % for pattern 9 0.3 setgray } ifelse } ifelse } ifelse } ifelse /CurrentFill bgiFill def newpath } bind def /toStack { bgiMono bgiFill bgiColor bgiFillColor bgiSize bgiFont bgiAttrib bgiOrient bgiRes x0Clip y0Clip x1Clip y1Clip } def /fromStack { /y1Clip exch def /x1Clip exch def /y0Clip exch def /x0Clip exch def /bgiRes exch def /bgiOrient exch def /bgiAttrib exch def /bgiFont exch def /bgiSize exch def /bgiFillColor exch def /bgiColor exch def /bgiFill exch def /bgiMono exch def } def /level0 { toStack Memory0 restore fromStack /Memory0 save def newpath x0Clip y0Clip moveto x0Clip y1Clip lineto x1Clip y1Clip lineto x1Clip y0Clip lineto closepath clip newpath /Memory1 save def /CurrentFont -1 def /CurrentColor 0 def } def /CL { closepath dup 1 eq { DO } if dup 2 eq { gsave 0 CurrentFill ne % 0 = Hollow fill { fill } if grestore DO } if 3 eq { 0 CurrentFill ne % 0 = Hollow fill { fill } if } if } bind def /DO % draw outline { bgiMono false eq { % color printer bgiColor setbgicolor } { 0.0 setgray } ifelse stroke } def /setpatterndict 18 dict def /spot { 1 add 4 mul cvi exch 1 add 4 mul cvi /xbit exch def /ybit exch def bstring ybit xbit -3 bitshift add get 1 7 xbit 7 and sub bitshift and 0 ne { /onbits onbits 1 add def 1} { /offbits offbits 1 add def 0} ifelse } bind def /bgiFontTable [ [ /AvantGarde-Book -96 58 739] [ /AvantGarde-BookOblique -96 58 739] [ /AvantGarde-Demi -92 90 739] [ /AvantGarde-DemiOblique -92 90 39] [ /Bookman-Demi -121 106 725] [ /Bookman-DemiItalic -106 106 732] [ /Bookman-Light -125 60 717] [ /Bookman-LightItalic -110 60 717] [ /Courier -82 40 624] [ /Courier-Bold -85 100 674] [ /Courier-BoldOblique -85 100 674] [ /Courier-Oblique -82 40 624] [ /Helvetica -97 73 729] [ /Helvetica-Bold -106 73 729] [ /Helvetica-BoldOblique -106 105 729] [ /Helvetica-Oblique -106 73 729] [ /Helvetica-Narrow -97 73 729] [ /Helvetica-Narrow-Bold -106 73 729] [ /Helvetica-Narrow-BoldOblique -106 73 729] [ /Helvetica-Narrow-Oblique -97 73 729] [ /NewCenturySchlbk-Bold -103 106 737] [ /NewCenturySchlbk-BoldItalic -102 54 737] [ /NewCenturySchlbk-Italic -102 42 737] [ /NewCenturySchlbk-Roman -103 61 737] [ /Palatino-Bold -98 44 719] [ /Palatino-BoldItalic -98 54 726] [ /Palatino-Italic -138 50 733] [ /Palatino-Roman -141 38 723] [ /Symbol -98 54 720] [ /Times-Bold -99 95 670] [ /Times-BoldItalic -98 54 682] [ /Times-Italic -96 48 684] [ /Times-Roman -109 49 682] [ /ZapfChancery-MediumItalic -120 50 678] [ /ZapfDingbats -98 54 720] ] def /bgiPatTable [ <0000000000000000> <0102040810204080> <8142241818244281> <8000080080000800> <8800220088002200> <081c22c180010204> <0001020400402010> ] def /bgiGrayTable [ 1.00 0.11 0.59 0.70 0.30 0.41 0.40 0.90 0.75 0.40 0.73 0.80 0.53 0.60 0.93 0.00 ] def /bgiColorTable [ [1 1 1] % bright white [0 0 1] % blue [0 1 0] % green [0 1 1] % cyan [1 0 0] % red [1 0 1] % magenta [0.67 0.33 0] % brown [0.9 0.9 0.9] % light gray (white) [0.75 0.75 0.75] % dark gray [0.33 0.33 1] % lightblue [0.33 1 0.33] % lightgreen [0.33 1 1] % lightcyan [1 0.33 0.33] % lightred [1 0.33 1] % lightmagenta [1 1 0.33] % yellow [0 0 0] % black [0.9 0.9 0.9] % light gray (color 7 on color printers) ] def /MT /moveto load def /LT /lineto load def /CP /closepath load def /NP /newpath load def /SD /setdash load def /SG /setgray load def /TR /translate load def /LW /setlinewidth load def /DL { moveto lineto DO } bind def /TW { 20 div exch 20 div exch moveto 20 div exch 20 div exch lineto DO } bind def /TB { 20 div 4 1 roll 20 div 4 1 roll 20 div 4 1 roll 20 div 4 1 roll DB } bind def /SC { /y1Clip exch def /x1Clip exch def /y0Clip exch def /x0Clip exch def level0 } bind def /ellipsedict 12 dict def ellipsedict /mtrx matrix put /SA % stack: x y xrad yrad start delta { % add an arc to the current path ellipsedict begin /delta exch 60.0 div def /startangle exch 60.0 div def /yrad exch def /xrad exch def /y exch def /x exch def /endangle startangle delta add def /savematrix mtrx currentmatrix def x y translate xrad yrad scale 0 0 1 delta 0 gt {startangle endangle arc } {startangle endangle arcn} ifelse savematrix setmatrix end } bind def /DOARC % stack: x y xrad yrad start end { % add an arc to the current path ellipsedict begin /endangle exch def /startangle exch def bgiOrient 0 ne { exch } if /yrad exch def /xrad exch def /y exch def /x exch def /savematrix mtrx currentmatrix def x y translate xrad yrad scale 0 0 1 startangle endangle arc savematrix setmatrix end } bind def /FE % stack: x y xrad yrad for ellipse { gsave OP 0 360 DOARC 3 CL grestore DO } bind def /DB % stack: x1 y1 x0 y0 color { OP /y0 exch def /x0 exch def /y1 exch def /x1 exch def newpath x0 y0 moveto x0 y1 lineto x1 y1 lineto x1 y0 lineto 3 CL } bind def /DF % stack: (attrib) (size) (font) { /bgiFont exch def % dup 6 eq {pop 7} if /bgiSize exch def /bgiAttrib exch def } bind def /FP % stack: (fill #) { dup 15 le { /bgiFill exch def }{ pop } ifelse } bind def /CO { % stack: (color) (fill color) dup 15 le { /bgiFillColor exch def} {pop} ifelse dup 15 le { /bgiColor exch def} {pop} ifelse } bind def /ST % start text % stack: - { CurrentSize bgiSize ne CurrentFont bgiFont ne or { currentpoint toStack Memory1 restore fromStack moveto /Memory1 save def /CurrentColor 0 def bgiFont dup /CurrentFont exch def % 1-4-90 don't reencode Symbol or ZapfDingbats fonts; dup dup 34 ne exch 28 ne and /bRES exch def % end 1-4-90 dup dup 8 ge exch 15 le and { dup 8 eq % courier { 0.93 } { dup 9 eq % courier-bold { 0.94 } { dup 11 eq % courier-bolditalic (1.02 expansion) { 0.95 } { dup 10 eq % courier-italic { 0.95 } { dup 12 eq % helvetica { 0.93 } { dup 13 eq % helvetica-bold { 0.96 } { dup 14 eq % helvetica-bolditalic { 0.93 } { dup 15 eq % helvetica-italic (1.02 expansion) { 0.96 } { 1 } ifelse } ifelse } ifelse } ifelse } ifelse } ifelse } ifelse } ifelse } { dup 32 eq % times-roman { 1 } { dup 29 eq % times-bold (1.02 expansion) { 0.95 } { dup 30 eq % times-boldoblique { 0.91 } { dup 31 eq %times-italic { 0.92 } { 1 % everything else } ifelse } ifelse } ifelse } ifelse } ifelse /CurrentCompress exch def bgiFontTable exch get % stack: [(font name) offset thick] dup 0 get % stack: array fontname exch dup 1 get /CurrentUnderlineOffset exch def dup 2 get /CurrentUnderlineThickness exch def 3 get /CurrentAscender exch bgiSize mul 1000.0 div def % 1-4-89 bRES { /thisFont pcVector RES /thisFont } if % end 1-4-89 findfont bgiSize dup /CurrentSize exch def scalefont setfont } if % set the text color or gray scale bgiMono false eq { % color printer stack: color setbgicolor } { % mono printer 0 eq % stack: color { 1.0 setgray} { 0.0 setgray} ifelse } ifelse } bind def /setbgicolor { dup 7 eq bgiMono not and { pop 16 } if bgiColorTable exch get % stack: [r g b] dup 0 get % stack: [r g b] r exch dup 1 get % stack: r [rgb] g exch 2 get % stack: r g b setrgbcolor } bind def /SH % stack: string tdir rot justx justy { /justy exch def /justx exch def 90 mul /rot exch def 0 ne % tdir is on the stack % (this will move into driver) { /justx 2 def } if dup stringwidth pop CurrentCompress mul /sx exch def sx justx mul -0.5 mul justy 0 eq { 0 % baseline aligned } { justy 1 eq { CurrentAscender 2 div neg % center aligned } { CurrentAscender neg % top aligned } ifelse } ifelse % underlining gsave rot rotate rmoveto bgiAttrib 4 and 0 ne % true if underlined, false otherwise { currentpoint CurrentUnderlineOffset CurrentSize mul 1000.0 div add /yval exch def /xval exch def bshow xval yval moveto sx xval add yval lineto CurrentUnderlineThickness CurrentSize mul 1000.0 div setlinewidth stroke } { bshow } ifelse grestore } bind def /bshow { CurrentCompress 1 eq { show } { dup length /len exch def len 0 ne { dup stringwidth pop /wid exch def CurrentCompress wid mul % (factor * wid) wid sub % (factor * wid) - wid len div % stack: string per_char_amt exch 0 exch ashow } if } ifelse } bind def /colorsetup { % exchange colors 0 and 15 bgiColorTable 0 get % stack: [r g b] bgiColorTable 15 get exch bgiColorTable 0 put bgiColorTable 15 put } bind def % ---- initialization /CurrentFill 1 def /CurrentFont -1 def /CurrentSize -1 def /CurrentColor 15 def /bgiMono 0 def /bgiFill 1 def /bgiColor 15 def /bgiFillColor 15 def /bgiSize 10 def /bgiFont 1 def /bgiOrient 0 def /bgiRes 1 def /bgiAttrib 0 def 1.415 setmiterlimit 0.5 setlinewidth /Memory0 save def /Memory1 save def 0 0 moveto %%EndProlog 24 184 587 607 SC /bgiRes 0 def /bgiMono false def /bgiOrient 0 def 0 15 0 DF 611 0 0 791 SC 1 255 CO 587 184 24 607 SC 1 0 CO 1 FP 587 184 24 607 DB 15 0 CO [] 0 SD .75 LW 15 15 CO 0 FP 0 FP [] 0 SD .75 LW 15 0 CO 1 FP 493 234 91 580 DB 91 230 91 580 DL [] 0 SD .75 LW 91 230 91 234 DL [] 0 SD .75 LW 163 229 MT 0 15 12 DF 163 229 MT 1 ST (3)0 0 0 2 SH 208 230 208 234 DL [] 0 SD .75 LW 247 229 MT 247 229 MT 1 ST (6)0 0 0 2 SH 292 230 292 234 DL [] 0 SD .75 LW 331 229 MT 331 229 MT 1 ST (9)0 0 0 2 SH 376 230 376 234 DL [] 0 SD .75 LW 411 229 MT 411 229 MT 1 ST (12)0 0 0 2 SH 493 230 493 580 DL [] 0 SD .75 LW 218 212 MT 218 212 MT 1 ST (Number of Workstations)0 0 0 2 SH 493 234 87 234 DL [] 0 SD .75 LW 78 240 MT 78 240 MT 1 ST (0)0 0 0 2 SH [] 0 SD .75 LW 493 278 91 278 DL [] 0 SD .75 LW 91 278 87 278 DL [] 0 SD .75 LW 66 283 MT 66 283 MT 1 ST (0.2)0 0 0 2 SH [] 0 SD .75 LW 493 321 91 321 DL [] 0 SD .75 LW 91 321 87 321 DL [] 0 SD .75 LW 66 326 MT 66 326 MT 1 ST (0.4)0 0 0 2 SH [] 0 SD .75 LW 493 364 91 364 DL [] 0 SD .75 LW 91 364 87 364 DL [] 0 SD .75 LW 66 370 MT 66 370 MT 1 ST (0.6)0 0 0 2 SH [] 0 SD .75 LW 493 407 91 407 DL [] 0 SD .75 LW 91 407 87 407 DL [] 0 SD .75 LW 66 413 MT 66 413 MT 1 ST (0.8)0 0 0 2 SH [] 0 SD .75 LW 493 451 91 451 DL [] 0 SD .75 LW 91 451 87 451 DL [] 0 SD .75 LW 78 456 MT 78 456 MT 1 ST (1)0 0 0 2 SH [] 0 SD .75 LW 493 493 91 493 DL [] 0 SD .75 LW 91 493 87 493 DL [] 0 SD .75 LW 66 499 MT 66 499 MT 1 ST (1.2)0 0 0 2 SH [] 0 SD .75 LW 493 537 91 537 DL [] 0 SD .75 LW 91 537 87 537 DL [] 0 SD .75 LW 66 542 MT 66 542 MT 1 ST (1.4)0 0 0 2 SH 493 580 87 580 DL [] 0 SD .75 LW 66 585 MT 66 585 MT 1 ST (1.6)0 0 0 2 SH 493 234 87 234 DL [] 0 SD .75 LW 48 434 MT 48 434 MT 1 ST (Speedup)3 1 0 2 SH 493 234 87 234 DL 493 234 493 234 DL 6 FP 15 12 CO 141 234 MT 158 234 141 487 DB 141 487 141 234 DL 158 487 141 487 DL 158 234 158 487 DL 141 234 158 234 DL 158 234 MT 15 12 CO 14 FP 15 8 CO 158 234 MT 174 234 158 479 DB 158 479 158 234 DL 174 479 158 479 DL 174 234 174 479 DL 158 234 174 234 DL 174 234 MT 15 8 CO 13 FP 15 9 CO 174 234 MT 190 234 174 457 DB 174 457 174 234 DL 190 457 174 457 DL 190 234 190 457 DL 174 234 190 234 DL 190 234 MT 15 9 CO 6 FP 15 12 CO 225 234 MT 242 234 225 506 DB 225 506 225 234 DL 242 506 225 506 DL 242 234 242 506 DL 225 234 242 234 DL 242 234 MT 15 12 CO 14 FP 15 8 CO 242 234 MT 258 234 242 490 DB 242 490 242 234 DL 258 490 242 490 DL 258 234 258 490 DL 242 234 258 234 DL 258 234 MT 15 8 CO 13 FP 15 9 CO 258 234 MT 274 234 258 464 DB 258 464 258 234 DL 274 464 258 464 DL 274 234 274 464 DL 258 234 274 234 DL 274 234 MT 15 9 CO 6 FP 15 12 CO 309 234 MT 326 234 309 519 DB 309 519 309 234 DL 326 519 309 519 DL 326 234 326 519 DL 309 234 326 234 DL 326 234 MT 15 12 CO 14 FP 15 8 CO 326 234 MT 342 234 326 528 DB 326 528 326 234 DL 342 528 326 528 DL 342 234 342 528 DL 326 234 342 234 DL 342 234 MT 15 8 CO 13 FP 15 9 CO 342 234 MT 358 234 342 539 DB 342 539 342 234 DL 358 539 342 539 DL 358 234 358 539 DL 342 234 358 234 DL 358 234 MT 15 9 CO 6 FP 15 12 CO 393 234 MT 409 234 393 513 DB 393 513 393 234 DL 409 513 393 513 DL 409 234 409 513 DL 393 234 409 234 DL 409 234 MT 15 12 CO 14 FP 15 8 CO 409 234 MT 426 234 409 535 DB 409 535 409 234 DL 426 535 409 535 DL 426 234 426 535 DL 409 234 426 234 DL 426 234 MT 15 8 CO 13 FP 15 9 CO 426 234 MT 442 234 426 545 DB 426 545 426 234 DL 442 545 426 545 DL 442 234 442 545 DL 426 234 442 234 DL 442 234 MT 15 9 CO 493 234 91 234 DL [] 0 SD .75 LW 15 15 CO 0 FP 0 FP [] 0 SD .75 LW 15 0 CO 1 FP 573 469 502 580 DB 6 FP 15 12 CO 508 566 MT 535 566 508 580 DB 508 580 508 566 DL 535 580 508 580 DL 535 566 535 580 DL 508 566 535 566 DL 535 566 MT 15 12 CO 508 562 MT 508 562 MT 1 ST (Matrix)0 0 0 2 SH 14 FP 15 8 CO 508 530 MT 535 530 508 544 DB 508 544 508 530 DL 535 544 508 544 DL 535 530 535 544 DL 508 530 535 530 DL 535 530 MT 15 8 CO 508 527 MT 508 527 MT 1 ST (Harmonic)0 0 0 2 SH 13 FP 15 9 CO 508 495 MT 535 495 508 509 DB 508 509 508 495 DL 535 509 508 509 DL 535 495 535 509 DL 508 495 535 495 DL 535 495 MT 15 9 CO 508 491 MT 508 491 MT 1 ST (Bessel)0 0 0 2 SH showpage restore %%Trailer