home *** CD-ROM | disk | FTP | other *** search
- %%BeginFile: pdf.prc
- %%Copyright: Copyright 1987-1994 Adobe Systems Incorporated. All Rights Reserved.
- /initialize {
- PDF begin
- PDFVars begin
- newpath
- } bd
- /terminate {
- end
- end
- } bd
- /setstrokeadjust isdefined?
- {
- true setstrokeadjust
- /m/moveto ld
- /l/lineto ld
- /c/curveto ld
- }
- {
- /pl {
- transform
- 0.25 sub round 0.25 add exch
- 0.25 sub round 0.25 add exch
- itransform
- } bd
- /m { pl moveto } bd
- /l { pl lineto } bd
- /c { pl curveto } bd
- }
- ifelse
- /v { currentpoint 6 2 roll c } bd
- /y { 2 copy c } bd
- /h/closepath ld
- /d/setdash ld
- /j/setlinejoin ld
- /J/setlinecap ld
- /M/setmiterlimit ld
- /w/setlinewidth ld
- /cf currentflat def
- /i {
- dup 0 eq { pop cf } if
- setflat
- } bd
- /ilp { /_lp /none dd } bd
- /sfc {
- _lp /fill ne {
- _sfcs
- _sfc
- /_lp /fill dd
- } if
- } bd
- /ssc {
- _lp /stroke ne {
- _sscs
- _ssc
- /_lp /stroke dd
- } if
- } bd
- /n {
- _doClip 1 ge {
- _doClip 1 eq { clip } { eoclip } ifelse
- /_doClip 0 dd
- } if
- newpath
- } bd
- /f {
- _doClip 1 ge
- {
- gsave sfc fill grestore
- _doClip 1 eq { clip } { eoclip } ifelse
- newpath
- ilp
- /_doClip 0 dd
- }
- { sfc fill }
- ifelse
- } bd
- /f* {
- _doClip 1 ge
- {
- gsave sfc eofill grestore
- _doClip 1 eq { clip } { eoclip } ifelse
- newpath
- ilp
- /_doClip 0 dd
- }
- { sfc eofill }
- ifelse
- } bd
- /S {
- _doClip 1 ge
- {
- gsave ssc stroke grestore
- _doClip 1 eq { clip } { eoclip } ifelse
- newpath
- ilp
- /_doClip 0 dd
- }
- { ssc stroke }
- ifelse
- } bd
- /s { h S } bd
- /B {
- _doClip dup 1 ge
- gsave f grestore
- {
- gsave S grestore
- 1 eq { clip } { eoclip } ifelse
- newpath
- ilp
- /_doClip 0 dd
- }
- { pop S }
- ifelse
- } bd
- /b { h B } bd
- /B* {
- _doClip dup 1 ge
- gsave f* grestore
- {
- gsave S grestore
- 1 eq { clip } { eoclip } ifelse
- newpath
- ilp
- /_doClip 0 dd
- }
- { pop S }
- ifelse
- } bd
- /b* { h B* } bd
- /W { /_doClip 1 dd } bd
- /W* { /_doClip 2 dd } bd
- /q/save ld
- /Q { restore ilp } bd
- Level2? not StartLoad {
- /cs
- {
- dup where { pop load } if
- /_sfcs { } dd
- dup type /arraytype eq
- { dup 0 get /Indexed eq { 1 } { 0 } ifelse get }
- if
- dup /DeviceCMYK eq
- {
- /_fc _f4 dd
- /_sfc { _fc aload pop setcmykcolor } dd
- }
- {
- dup /DeviceRGB eq
- {
- /_fc _f3 dd
- /_sfc { _fc aload pop setrgbcolor } dd
- }
- {
- /_fc _f1 dd
- /_sfc { _fc aload pop setgray } dd
- }
- ifelse
- }
- ifelse
- pop
- } bd
- /CS
- {
- dup where { pop load } if
- /_sscs { } dd
- dup type /arraytype eq
- { dup 0 get /Indexed eq { 1 } { 0 } ifelse get }
- if
- dup /DeviceCMYK eq
- {
- /_sc _s4 dd
- /_ssc { _sc aload pop setcmykcolor } dd
- }
- {
- dup /DeviceRGB eq
- {
- /_sc _s3 dd
- /_ssc { _sc aload pop setrgbcolor } dd
- }
- %%% /Pattern not impl'd
- {
- /_sc _s1 dd
- /_ssc { _sc aload pop setgray } dd
- }
- ifelse
- }
- ifelse
- pop
- } bd
- /ri { pop } bd
- } EndLoad
- Level2? StartLoad {
- /cs
- {
- dup where { pop load } if
- dup /_fcs xdd
- /_sfcs { _fcs setcolorspace } dd
- dup type /arraytype eq
- { dup 0 get /Indexed eq { 1 } { 0 } ifelse get }
- if
- dup /DeviceCMYK eq
- { /_fc _f4 dd }
- {
- dup /DeviceRGB eq dup /CIEBasedABC eq or
- { /_fc _f3 dd }
- { /_fc _f1 dd }
- ifelse
- }
- ifelse
- pop
- /_sfc { _fc aload pop setcolor } dd
- } bd
- /CS
- {
- dup where { pop load } if
- dup /_scs xdd
- /_sscs { _scs setcolorspace } dd
- dup type /arraytype eq
- { dup 0 get /Indexed eq { 1 } { 0 } ifelse get }
- if
- dup /DeviceCMYK eq
- { /_sc _s4 dd }
- {
- dup /DeviceRGB eq dup /CIEBasedABC eq or
- { /_sc _s3 dd }
- { /_sc _s1 dd }
- ifelse
- }
- ifelse
- pop
- /_ssc { _sc aload pop setcolor } dd
- } bd
- /ri {
- /findcolorrendering isdefined?
- {
- findcolorrendering pop
- dup /ColorRendering resourcestatus
- {
- pop pop
- /ColorRendering findresource
- setcolorrendering
- }
- { pop }
- ifelse
- }
- { pop }
- ifelse
- } bd
- } EndLoad
- /sc
- {
- _fc astore pop
- ilp
- } bd
- /SC
- {
- _sc astore pop
- ilp
- } bd
- /g { /DefaultGray cs sc } bd
- /rg { /DefaultRGB cs sc } bd
- /k { /DeviceCMYK cs sc } bd
- /pc { /DeviceGray cs pop 0.5 sc } bd
- /G { /DefaultGray CS SC } bd
- /RG { /DefaultRGB CS SC } bd
- /K { /DeviceCMYK CS SC } bd
- /PC { /DeviceGray CS pop 0.5 SC } bd
- /cm { _mtx astore concat } bd
- /re {
- 4 2 roll m
- 1 index 0 rlineto
- 0 exch rlineto
- neg 0 rlineto
- h
- } bd
- /RC/rectclip ld
- /EF/execform ld
- /PS { cvx exec } bd
- /initgs {
- /DefaultGray where
- { pop }
- { /DefaultGray /DeviceGray dd }
- ifelse
- /DefaultRGB where
- { pop }
- { /DefaultRGB /DeviceRGB dd }
- ifelse
- 0 g 0 G
- []0 d 0 j 0 J 10 M 1 w
- } bd
- %%EndFile
-