ltning.eps

开放源码的编译器open watcom 1.6.0版的源代码

statusdict /product get (Lino) anchorsearch{pop pop true}{pop false}ifelse
and{userdict begin bdf end}{ndf}ifelse
fhnumcolors 1 ne {/yt save def} if
/customcolorimage{
aload pop
(_vc_Registration) eq
{
pop pop pop pop separationimage
}
{
/ik xdf /iy xdf /im xdf /ic xdf
ic im iy ik cmyk2gray /xt xdf
currenttransfer
{dup 1.0 exch sub xt mul add}concatprocs
st
image
}
ifelse
}ndf
fhnumcolors 1 ne {yt restore} if
fhnumcolors 3 ne {/yt save def} if
/customcolorimage{
aload pop
(_vc_Registration) eq
{
pop pop pop pop separationimage
}
{
/ik xdf /iy xdf /im xdf /ic xdf
1.0 dup ic ik add min sub	
1.0 dup im ik add min sub	
1.0 dup iy ik add min sub	
/ic xdf /iy xdf /im xdf
currentcolortransfer
4 1 roll	
{dup 1.0 exch sub ic mul add}concatprocs 4 1 roll	
{dup 1.0 exch sub iy mul add}concatprocs 4 1 roll	
{dup 1.0 exch sub im mul add}concatprocs 4 1 roll	
setcolortransfer
{/dummy xdf dummy}concatprocs{dummy}{dummy}true 3 colorimage
}
ifelse
}ndf
fhnumcolors 3 ne {yt restore} if
fhnumcolors 4 ne {/yt save def} if
/customcolorimage{
aload pop
(_vc_Registration) eq
{
pop pop pop pop separationimage
}
{
/ik xdf /iy xdf /im xdf /ic xdf
currentcolortransfer
{1.0 exch sub ik mul ik sub 1 add}concatprocs 4 1 roll
{1.0 exch sub iy mul iy sub 1 add}concatprocs 4 1 roll
{1.0 exch sub im mul im sub 1 add}concatprocs 4 1 roll
{1.0 exch sub ic mul ic sub 1 add}concatprocs 4 1 roll
setcolortransfer
{/dummy xdf dummy}concatprocs{dummy}{dummy}{dummy}
true 4 colorimage
}
ifelse
}ndf
fhnumcolors 4 ne {yt restore} if
/separationimage{image}ndf
/spotascmyk false ndf
/newcmykcustomcolor{6 packedarray}ndf
/inkoverprint false ndf
/setinkoverprint{pop}ndf		
/setspotcolor {		
spots exch get
dup 4 get (_vc_Registration) eq
{pop 1 exch sub setseparationgray}
{0 5 getinterval exch setcustomcolor}
ifelse
}ndf
/currentcolortransfer{currenttransfer dup dup dup}ndf
/setcolortransfer{st pop pop pop}ndf
/fas{}ndf
/sas{}ndf
/fhsetspreadsize{pop}ndf
/filler{fill}bdf			
/F{gsave {filler}fp grestore}bdf
/f{closepath F}bdf
/S{gsave {stroke}fp grestore}bdf
/s{closepath S}bdf
userdict /islevel2
systemdict /languagelevel known dup
{
pop systemdict /languagelevel get 2 ge
} if
put
islevel2 not
{
/currentcmykcolor
{
0 0 0 1 currentgray sub
} ndf
} if
/tc
{
gsave
setcmykcolor currentcmykcolor
grestore
} bind def
/testCMYKColorThrough
{
tc add add add 0 ne
} bind def
/fhiscomposite where not {
userdict /fhiscomposite
islevel2
{
gsave 1 1 1 1 setcmykcolor currentcmykcolor grestore
add add add 4 eq
}
{
1 0 0 0 testCMYKColorThrough
0 1 0 0 testCMYKColorThrough
0 0 1 0 testCMYKColorThrough
0 0 0 1 testCMYKColorThrough
and and and
} ifelse
put
}
{ pop }
ifelse
/bc4 [0 0 0 0] def	
/_lfp4 {
/yt xdf							
/xt xdf							
/ang xdf						
storerect
/taperfcn xdf
/k2 xdf /y2 xdf /m2 xdf /c2 xdf
/k1 xdf /y1 xdf /m1 xdf /c1 xdf
c1 c2 sub abs
m1 m2 sub abs
y1 y2 sub abs
k1 k2 sub abs
maxcolor						
calcgraysteps mul abs round		
height abs adjnumsteps			
dup 1 lt {pop 1} if				
1 sub /numsteps1 xdf
currentflat mark				
currentflat clipflatness		
/delta top bottom sub numsteps1 1 add div def	
/right right left sub def		
/botsv top delta sub def		
{
{
W
xt yt translate
ang rotate
xt neg yt neg translate
dup setflat				
/bottom botsv def
0 1 numsteps1			
{
numsteps1 dup 0 eq {pop pop 0.5} {div} ifelse 
taperfcn /frac xdf
bc4 0 c2 c1 sub frac mul c1 add put
bc4 1 m2 m1 sub frac mul m1 add put
bc4 2 y2 y1 sub frac mul y1 add put
bc4 3 k2 k1 sub frac mul k1 add put
bc4 vc
1 index setflat		
{
mark {newpath left bottom right delta rectfill}stopped
{cleartomark exch 1.3 mul dup setflat exch 2 copy gt{stop}if}
{cleartomark exit}ifelse
}loop
/bottom bottom delta sub def
}for
}
gsave stopped grestore
{exch pop 2 index exch 1.3 mul dup 100 gt{cleartomark setflat stop}if}
{exit}ifelse
}loop
cleartomark setflat
}bdf
/bcs [0 0] def	
/_lfs4 {
/yt xdf							
/xt xdf							
/ang xdf						
storerect
/taperfcn xdf
/tint2 xdf						
/tint1 xdf						
bcs exch 1 exch put				
tint1 tint2 sub abs				
bcs 1 get maxspot				
calcgraysteps mul abs round		
height abs adjnumsteps			
dup 2 lt {pop 2} if				
1 sub /numsteps1 xdf
currentflat mark				
currentflat clipflatness		
/delta top bottom sub numsteps1 1 add div def	
/right right left sub def		
/botsv top delta sub def		
{
{
W
xt yt translate
ang rotate
xt neg yt neg translate
dup setflat				
/bottom botsv def
0 1 numsteps1			
{
numsteps1 div taperfcn /frac xdf
bcs 0
1.0 tint2 tint1 sub frac mul tint1 add sub
put bcs vc
1 index setflat		
{
mark {newpath left bottom right delta rectfill}stopped
{cleartomark exch 1.3 mul dup setflat exch 2 copy gt{stop}if}
{cleartomark exit}ifelse
}loop
/bottom bottom delta sub def
}for
}
gsave stopped grestore
{exch pop 2 index exch 1.3 mul dup 100 gt{cleartomark setflat stop}if}
{exit}ifelse
}loop
cleartomark setflat
}bdf
/_rfs6 {
/tint2 xdf						
/tint1 xdf						
bcs exch 1 exch put				
/inrad xdf						
/radius xdf						
/yt xdf							
/xt xdf							
tint1 tint2 sub abs				
bcs 1 get maxspot				
calcgraysteps mul abs round		
radius inrad sub abs			
adjnumsteps						
dup 1 lt {pop 1} if				
1 sub /numsteps1 xdf
radius inrad sub numsteps1 dup 0 eq {pop} {div} ifelse	
2 div /halfstep xdf				
currentflat mark				
currentflat clipflatness		
{
{
dup setflat				
W 						
0 1 numsteps1			
{
dup /radindex xdf
numsteps1 dup 0 eq {pop pop 0.5} {div} ifelse 
/frac xdf
bcs 0
tint2 tint1 sub frac mul tint1 add
put bcs vc
1 index setflat		
{
newpath mark	
xt yt radius inrad sub 1 frac sub mul halfstep add inrad add 0 360
{	arc
radindex numsteps1 ne
inrad 0 gt or		
{
xt yt			
numsteps1 0 eq
{ inrad }	
{			
radindex 1 add numsteps1 div 1 exch sub
radius inrad sub mul halfstep add inrad add
}ifelse
dup xt add yt moveto
360 0 arcn
} if
fill
}stopped
{cleartomark exch 1.3 mul dup setflat exch 2 copy gt{stop}if}
{cleartomark exit}ifelse
}loop
}for
}
gsave stopped grestore
{exch pop 2 index exch 1.3 mul dup 100 gt{cleartomark setflat stop}if}
{exit}ifelse
}loop
cleartomark setflat
}bdf
/_rfp6 {
/k2 xdf /y2 xdf /m2 xdf /c2 xdf
/k1 xdf /y1 xdf /m1 xdf /c1 xdf
/inrad xdf						
/radius xdf						
/yt xdf							
/xt xdf							
c1 c2 sub abs
m1 m2 sub abs
y1 y2 sub abs
k1 k2 sub abs
maxcolor					
calcgraysteps mul abs round	
radius inrad sub abs		
adjnumsteps					
dup 1 lt {pop 1} if			
1 sub /numsteps1 xdf
radius inrad sub numsteps1 dup 0 eq {pop} {div} ifelse	
2 div /halfstep xdf			
currentflat mark			
currentflat clipflatness	
{
{
dup setflat			
W 					
0 1 numsteps1		
{
dup /radindex xdf
numsteps1 dup 0 eq {pop pop 0.5} {div} ifelse 
/frac xdf
bc4 0 c2 c1 sub frac mul c1 add put
bc4 1 m2 m1 sub frac mul m1 add put
bc4 2 y2 y1 sub frac mul y1 add put
bc4 3 k2 k1 sub frac mul k1 add put
bc4 vc
1 index setflat		
{
newpath mark	
xt yt radius inrad sub 1 frac sub mul halfstep add inrad add 0 360
{	arc
radindex numsteps1 ne
inrad 0 gt or		
{
xt yt			
numsteps1 0 eq
{ inrad }	
{			
radindex 1 add numsteps1 div 1 exch sub
radius inrad sub mul halfstep add inrad add
}ifelse
dup xt add yt moveto
360 0 arcn
} if
fill
}stopped
{cleartomark exch 1.3 mul dup setflat exch 2 copy gt{stop}if}
{cleartomark exit}ifelse
}loop
}for
}
gsave stopped grestore
{exch pop 2 index exch 1.3 mul dup 100 gt{cleartomark setflat stop}if}
{exit}ifelse
}loop
cleartomark setflat
}bdf
/lfp4{_lfp4}ndf
/lfs4{_lfs4}ndf
/rfs6{_rfs6}ndf
/rfp6{_rfp6}ndf
/cvc [0 0 0 1] def	
/vc{
AltsysDict /cvc 2 index put	
aload length dup 4 eq
{pop setcmykcolor}
{6 eq {sethexcolor} {setspotcolor}	ifelse }
ifelse
}bdf	
0 setseparationgray
/imgr {1692 1570.11 2287.28 2412 } def			
/bleed 0 def			
/clpr {1692 1570.11 2287.28 2412 } def			
/xs 1 def				
/ys 1 def				
/botx 0 def			
/overlap 0 def			
/wdist 18 def			
0 2 mul fhsetspreadsize	
0 0 ne {/df 0 def /clipflatness 0 def} if	
/maxsteps 256 def		
/forcemaxsteps false def	
/minsteps 0 def		
userdict begin /AGDOrigMtx matrix currentmatrix def end
vms
-1832 -1673 translate
/currentpacking defed{false setpacking}if 	
/spots[
1 0 0 0 (Process Cyan) false newcmykcustomcolor
0 1 0 0 (Process Magenta) false newcmykcustomcolor
0 0 1 0 (Process Yellow) false newcmykcustomcolor
0 0 0 1 (Process Black) false newcmykcustomcolor
]def
vms
0 i
1920.8197 2118 m
2072.8197 2118 L
2072.8197 1707 L
1920.8197 1707 L
1920.8197 2118 L
[0.8945 0.25 0.0742 0] vc
false setoverprint
f	
n
1836.8197 1965 m
1904.8197 1754 L
2127.8197 1776 L
2128.8197 2072 L
1836.8197 1965 L
h
[0.8867 0.1641 0.082 0] vc
0.8867 0.1641 0.082 0 0.3242 0.0977 0.0586 0 /normtaper load
 1848.89 1888.34 2179.34 2018.16  23 1982.82 1913 lfp4
[0.3242 0.0977 0.0586 0] vc
0.3242 0.0977 0.0586 0 0.2695 0.0781 0.0742 0 /normtaper load
 1848.89 1843.47 2179.34 1888.84  23 1982.82 1913 lfp4
[0.2695 0.0781 0.0742 0] vc
0.2695 0.0781 0.0742 0 0.3828 0.0234 0.082 0 /normtaper load
 1848.89 1729.99 2179.34 1843.97  23 1982.82 1913 lfp4
false setoverprint
n
1913.5697 1757.75 m
1914.9821 1757.8784 2024.0697 1767.25 2024.0697 1767.25 C
2124.3197 1777.5 L
2131.8197 1779.75 2132.5697 1775.75 2126.0697 1775.25 C
2023.3197 1764.25 L
1993.4374 1761.0509 1933.8197 1756.25 1914.8197 1754.5 C
1890.0697 1753 1905.3197 1757 1913.5697 1757.75 C
[0.2 0.6 1 0.8] vc
f	
n
2025.3566 2040.4445 m
2026.5511 2041.209 2079.8566 2058.9445 2079.8566 2058.9445 C
2124.6066 2071.9445 L
2132.1066 2074.1945 2135.1066 2069.9445 2128.6066 2069.4445 C
2032.3566 2035.6945 L
2003.9774 2025.7434 1952.8566 2002.4445 1934.6066 1998.4445 C
1909.8566 1996.9445 2019.1066 2036.4445 2025.3566 2040.4445 C
f	
n
2123.8197 1908 m
2123.5584 1909.3939 2125.8197 2018 2125.8197 2018 C
2124.8197 2065 L
2125.5431 2072.7967 2136.791 2077.214 2134.8197 2071 C
2132.9327 1964.8015 L
2132.3985 1934.7425 2129.9475 1796.4195 2126.8197 1778 C
2118.9391 1754.4903 2125.1872 1900.7067 2123.8197 1908 C
f	
n
2001.0953 1872 m
1945.0953 1770 L
1985.0953 1785 L
1932.0953 1674 L
2069.0953 1833 L
2022.0953 1818 L
2140.0953 1988 L
2057.0953 1951 L
2098.0953 2082 L
1910.8197 2013 L
1909.0953 1834 L
2001.0953 1872 L
h
[0.0039 0.5781 0.7539 0] vc
true setoverprint
0.0039 0.5781 0.7539 0 0.0039 0.5781 0.7539 0 /normtaper load
 1859.74 1940.67 2173.89 2046.97  23 2024.6 1878 lfp4
0.0039 0.5781 0.7539 0 0.0078 0.2969 0.3945 0 /normtaper load
 1859.74 1899.52 2173.89 1941.17  23 2024.6 1878 lfp4
[0.0078 0.2969 0.3945 0] vc
0.0078 0.2969 0.3945 0 0.0117 0.1484 0.5 0 /normtaper load
 1859.74 1870.13 2173.89 1900.02  23 2024.6 1878 lfp4
[0.0117 0.1484 0.5 0] vc
0.0117 0.1484 0.5 0 0 0 1 0 /normtaper load
 1859.74 1839.27 2173.89 1870.63  23 2024.6 1878 lfp4
[0 0 1 0] vc
0 0 1 0 0 0 1 0 /normtaper load
 1859.74 1726.11 2173.89 1839.77  23 2024.6 1878 lfp4
false setoverprint
n
1995.3197 2051 m
1996.5142 2051.7645 2049.8197 2069.5 2049.8197 2069.5 C
2094.5697 2082.5 L
2102.0697 2084.75 2105.0697 2080.5 2098.5697 2080 C
2002.3197 2046.25 L
1973.9405 2036.2989 1922.8197 2013 1904.5697 2009 C
1879.8197 2007.5 1989.0697 2047 1995.3197 2051 C
[0.2 0.6 1 0.8] vc
true setoverprint
f	
false setoverprint
n
1960.8197 1778.25 m
1982.8197 1785.25 L
1994.5697 1788.75 1992.3197 1785.5 1974.3197 1780 C
1966.0697 1777 L
1966.0697 1777 1960.0697 1774.5 1953.3197 1770.75 C
1928.0697 1762.5 1960.8197 1778.25 1960.8197 1778.25 C
h
0.2 0.6 1 0.8 0.2 0.6 1 0.8 /normtaper load
 1962.16 1761.8 1971.76 1802.23  -259 1966.93 1777.53 lfp4
0.2 0.6 1 0.8 0.1 0 0 0.3 /normtaper load
 1962.16 1752.83 1971.76 1762.3  -259 1966.93 1777.53 lfp4
false setoverprint
n
1943.8197 1707 m
1944.4539 1708.2683 1965.0697 1747 1965.0697 1747 C
1985.0697 1789.25 L
1987.5697 1809 1995.5697 1800.5 1979.8197 1769.25 C
1952.5697 1713.25 L
1948.6298 1705.1532 1940.5697 1690.5 1936.5697 1680.75 C
1920.0697 1658.5 1939.0697 1697.5 1943.8197 1707 C
[0.2 0.6 1 0.8] vc
f	
n
1908.8197 1960 m
1908.8819 2006.9169 L
1909.6052 2014.7137 1914.6696 2015.9032 1912.6982 2009.6892 C
1911.8197 1908.25 L
1911.5594 1878.189 1912.0697 1860.5 1910.0697 1841.5 C
1906.0697 1818.5 1908.8197 1960 1908.8197 1960 C
h
0.2 0.6 1 0.8 0.2 0.6 1 0.8 /normtaper load
 1907.9 1864.36 1913.15 2013.91  0 1910.52 1926.32 lfp4
0.2 0.6 1 0.8 0.1 0 0 0.3 /normtaper load
 1907.9 1854.75 1913.15 1864.86  0 1910.52 1926.32 lfp4
[0.1 0 0 0.3] vc
0.1 0 0 0.3 0.1 0 0 0.3 /normtaper load
 1907.9 1838.72 1913.15 1855.25  0 1910.52 1926.32 lfp4
false setoverprint
n
2068.3197 2010 m
2068.7898 2011.3379 2074.8166 2031.0011 2074.8166 2031.0011 C
2099.8197 2087.5 L
2104.3197 2098.75 2101.3197 2084.25 2097.8197 2074.75 C
2076.8197 2014.5 L
2073.8535 2005.9899 2064.3197 1956.25 2061.8197 1951.25 C
2048.8524 1930.1156 2065.0697 2000.75 2068.3197 2010 C
[0.2 0.6 1 0.8] vc
f	
n
1845.0697 1970.75 m
1846.369 1971.3184 1885.5697 1985.5 1885.5697 1985.5 C
1904.3197 1991 L
1911.8197 1993.25 1915.0697 1990.25 1908.5697 1989.75 C
1887.0697 1982.5 L
1859.218 1973.1082 1864.8197 1974.25 1846.0697 1967.25 C
1820.3197 1958.5 1837.0697 1967.25 1845.0697 1970.75 C
f	
n
2091.3197 1970.75 m
2143.3197 1989.5 L
2154.5697 1990.5 2144.5697 1986.5 2125.5697 1978.5 C
2099.8197 1968.75 L
2082.8412 1962.3212 2076.0697 1956 2058.0697 1947 C
2032.5697 1943.25 2091.3197 1970.75 2091.3197 1970.75 C
f	
n
1955.8197 1794.5 m
1956.4987 1795.7449 1967.5697 1815 1967.5697 1815 C
1998.0697 1869 L
2002.5697 1880.25 2006.3197 1877.25 2000.8197 1868 C
1964.0697 1801.5 L
1959.711 1793.6127 1953.0697 1781.5 1950.5697 1776.5 C
1936.3197 1753.25 1951.3197 1786.25 1955.8197 1794.5 C
f	
n
vmrs
0 i
1991.8197 1749 m
1992.7825 1750.0409 2018.5697 1779.75 2018.5697 1779.75 C
2061.6613 1826.0414 L
2081.3197 1845.25 2062.8197 1824 2056.5697 1815.5 C
1943.8197 1685.5 L
1939.2805 1680.2663 1935.8197 1676.75 1931.0697 1674 C
1924.8197 1669.5 1982.5697 1739 1991.8197 1749 C
[0.2 0.6 1 0.8] vc
false setoverprint
f	
n
2051.5697 1873 m
2052.4097 1874.1425 2105.5697 1946 2105.5697 1946 C
2140.5697 1989.75 L
2145.0697 2001 2135.5697 1978.5 2132.0697 1969 C
2064.5697 1877.75 L
2059.2121 1870.5073 2031.0697 1829.75 2023.0697 1818.5 C
2004.8197 1799.25 2045.3197 1864.5 2051.5697 1873 C
f	
n
1945.5697 1853.25 m
1998.2899 1873.1002 L
2012.5697 1875 2000.8197 1870.75 1980.0697 1863.5 C
1954.8197 1852.75 L
1938.1215 1845.6409 1923.3197 1837.5 1904.5697 1832.5 C
1880.0697 1827 1945.5697 1853.25 1945.5697 1853.25 C
f	
n
1957.0697 1855.5 m
1998.2255 1872.2621 L
2012.5053 1874.1619 2002.5697 1871.75 1982.0697 1862.5 C
1965.3197 1853.5 L
1949.3465 1844.9174 1943.0697 1841.75 1926.5697 1834.5 C
1901.3197 1826.25 1957.0697 1855.5 1957.0697 1855.5 C
f	
n
2036.0697 1825 m
2053.8197 1831 L
2067.3197 1835.75 2082.5697 1835.75 2060.5697 1830.25 C
2044.8197 1824.75 L
2044.8197 1824.75 2040.5697 1824 2023.8197 1816.5 C
2005.5697 1812 2036.0697 1825 2036.0697 1825 C
f	
n
1853.0697 1979.25 m
1854.4533 1979.5613 1883.3197 1987 1883.3197 1987 C
1899.0697 1990 L
1906.5697 1992.25 1914.3401 1991.3468 1907.8401 1990.8468 C
1866.5697 1979.5 L
1863.5556 1978.6713 1854.3197 1977.25 1850.0697 1974.5 C
1826.5697 1963.75 1843.0697 1977 1853.0697 1979.25 C
f	
n
1894.8197 1783 m
1894.3132 1784.3246 1865.8197 1871.25 1865.8197 1871.25 C
1843.0697 1951 L
1830.0697 1967.5 1839.0697 1966.75 1843.3197 1959 C
1869.8197 1875 L
1878.8652 1846.3276 1902.4589 1778.1286 1905.8197 1759.75 C
1906.3197 1742 1898.0697 1774.5 1894.8197 1783 C
f	
n
vmr
vmr
end
%%Trailer