7.23.huaidai.ps

来自「是multiuser detection 这本书的习题解答, 很有用的书.」· PS 代码 · 共 500 行 · 第 1/3 页

%!PS (but not EPSF; comments have been disabled)
%DVIPSCommandLine: dvips -o 7.23.huaidai.ps 7.23.huaidai.dvi
%DVIPSParameters: dpi=600, compressed, comments removed
%DVIPSSource:  TeX output 1999.05.06:2204
/TeXDict 250 dict def TeXDict begin /N{def}def /B{bind def}N /S{exch}N
/X{S N}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{dup dup 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 /IE 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 IE N
end dup{/foo setfont}2 array copy cvx N load 0 nn put /ctr 0 N[}B /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 dup definefont setfont}B /ch-width{ch-data dup
length 5 sub get}B /ch-height{ch-data dup length 4 sub get}B /ch-xoff{
128 ch-data dup length 3 sub get sub}B /ch-yoff{ch-data dup length 2 sub
get 127 sub}B /ch-dx{ch-data dup length 1 sub get}B /ch-image{ch-data
dup 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 /sf 0 N /CharBuilder{save 3 1 roll S dup
/base get 2 index get S /BitMaps get S get /ch-data X pop /ctr 0 N ch-dx
0 ch-xoff ch-yoff ch-height sub ch-xoff ch-width add ch-yoff
setcachedevice ch-width ch-height true[1 0 0 -1 -.1 ch-xoff sub ch-yoff
.1 sub]/id ch-image N /rw ch-width 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 dup 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 dup gp add
/gp X adv}B /nd{/cp 0 N rw exit}B /lsh{rw cp 2 copy get dup 0 eq{pop 1}{
dup 255 eq{pop 254}{dup dup add 255 and S 1 and or}ifelse}ifelse put 1
adv}B /rsh{rw cp 2 copy get dup 0 eq{pop 128}{dup 255 eq{pop 127}{dup 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}]dup{bind pop}forall N /D{/cc X dup type /stringtype ne{]
}if nn /base get cc ctr put nn /BitMaps get S ctr S sf 1 ne{dup dup
length 1 sub dup 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 dup 1 get dup mul exch 0 get dup 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
/IE 256 array N 0 1 255{IE S 1 string dup 0 3 index put cvn put}for
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 /rulex 0 N /ruley 0 N /v{/ruley X /rulex X V}B /V
{}B /RV statusdict begin /product where{pop product dup length 7 ge{0 7
getinterval dup(Display)eq exch 0 4 getinterval(NeXT)eq or}{pop false}
ifelse}{false}ifelse end{{gsave TR -.1 .1 TR 1 1 scale rulex ruley false
RMat{BDot}imagemask grestore}}{{gsave TR -.1 .1 TR rulex ruley scale 1 1
false RMat{BDot}imagemask grestore}}ifelse B /QV{gsave newpath transform
round exch round exch itransform moveto rulex 0 rlineto 0 ruley neg
rlineto rulex neg 0 rlineto fill grestore}B /a{moveto}B /delta 0 N /tail
{dup /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
TeXDict begin 40258431 52099146 1000 600 600 (7.23.huaidai.dvi)
@start /Fa 1 114 df<1B301B78A21BF8A21BF01A01A21BE01A03A21BC01A07A21B801A
0FA21B0062A21A1E1A3EA21A3C1A7CA21A781AF8A262A21901A2621903A2621907A26219
0FA297C7FC61A2191E193EA2193C197CA2197819F8A2611801A2611803A261A21807A261
180FA296C8FC60A2181E183EA2183C187C131001301678017016F813F860000116011203
486C5E000F1603121DD838FE5E00701607126000C05FEA407F0000160FA26D6C92C9FC5F
A2171E6D6C143EA2173C6D6C147CA2177817F86D7E5F16016D7E5F1603A26D6C5C1607A2
6D6C5C160FA294CAFC027F5BA2161EEC3F80163EA2163C91381FC07CA2167891380FE0F8
A25E15E1EC07F15E15F3EC03FB5E15FFA26E5BA36E90CBFCA35D157EA2157C153C15384D
96788353>113 D E /Fb 2 50 df<B812C0A32A037A9137>0 D<D93F80EC07F0D9FFF0EC
3FFC000301FC91B5FC4801FF903901F80780D80F80903A8007C001C03D1E003FC00F8000
E0486D6C48C71270003890260FF03E143048902607F83C14386E6C48141800606D6C5A00
E06D6C48141C48027F150C5E153F6F7E6F7E82151F6C6F141C0060DA3DFE1418DB78FF14
3800704A6C7E003001016D6C1370003849486C6C13F06C903B07C00FF001E06C903B0F80
07FC07C02807807E0003B512806CB44801001400C601F0EC3FFCD93F80EC07F03E1F7C9D
47>49 D E /Fc 4 101 df<124012F012FC127FEA1FC0EA07F0EA01FCEA007FEB1FC0EB
07F0EB01FCEB007FEC1FC0EC07F0EC01FCEC007FED1FC0ED07F0ED01FCED007FEE1FC016
07161FEE7F00ED01FCED07F0ED1FC0037FC7FCEC01FCEC07F0EC1FC0027FC8FCEB01FCEB
07F0EB1FC0017FC9FCEA01FCEA07F0EA1FC0007FCAFC12FC12F012402A2B7AA537>62
D<90263FFFFC90381FFF80A2D900FEC73803F80018E04AEC07804DC7FC0101151C5F4A14
E04C5A01034A5A040EC8FC4A5B5E010714E04B5A9138E00780030EC9FC010F131F157F4A
487E14C190391FC71FC014CEEC9C0F02F07F90383FE00702C07FEC0003825B6F7E137E6F
7E13FE167F5B707E1201161F4981831203B539E001FFFEA2392D7CAC3C>75
D<000FB8FCA23B1FC003F8003F0100151F001C4A130E123C003801071406123000704A13
0EA20060010F140C12E0485CA2141FC715005DA2143FA292C8FCA25CA2147EA214FEA25C
A21301A25CA21303A25CA21307A25C130F131F001FB512F0A2302D7FAC29>84
D<151FEC03FFA2EC003FA2153EA2157EA2157CA215FCA215F8A21401EB07E190381FF9F0
EB7C1DEBF80FEA01F03903E007E0EA07C0120FEA1F8015C0EA3F00140F5A007E1480A214
1F12FE481400A2EC3F021506143E5AEC7E0E007CEBFE0C14FC0101131C393E07BE18391F
0E1E38390FFC0FF03903F003C0202F7DAD24>100 D E /Fd 3 113
df<007FB912E0BA12F0A26C18E03C04789A4D>0 D<19E0F003F0180FF03FE0F0FF809438
03FE00EF0FF8EF3FE0EFFF80DC03FEC7FCEE0FF8EE3FE0EEFF80DB03FEC8FCED1FF8ED7F
E0913801FF80DA07FEC9FCEC1FF0EC7FC04948CAFCEB07FCEB1FF0EB7FC04848CBFCEA07
FCEA1FF0EA7FC048CCFCA2EA7FC0EA1FF0EA07FCEA01FF38007FC0EB1FF0EB07FCEB01FF
9038007FC0EC1FF0EC07FC913801FF809138007FE0ED1FF8ED07FE923800FF80EE3FE0EE
0FF8EE03FE933800FF80EF3FE0EF0FF8EF03FE943800FF80F03FE0F00FF01803F000E019
00B0007FB912E0BA12F0A26C18E03C4E78BE4D>20 D<1B0C1B1E1B3EA21B7CA21BF8A2F2
01F0A2F203E0A2F207C0A2F20F80A2F21F00A21A3EA262A262A24F5AA2621903A24F5AA2
4F5AA24FC7FCA2193EA261A261A24E5AA24E5AA24E5AA24E5AA2010C4CC8FC133C017C16
3EEA01FE00035F487E001E5F00387FD8707F4B5A00E07FD8003F4B5A80011F4B5AA26E4A
5A130F6E4AC9FC13076E143E13036E5C13016E5C7F6F5B027F1301A26F485A143F6F485A
141F6F485A140F6F48CAFC1407EDFC3E14035E15FE02015B15FF6E5BA26F5AA26F5AA26F
5AA26FCBFC150E4F647A8353>112 D E /Fe 3 51 df<EC0380B3A4B812FCA3C7D80380
C7FCB3A42E2F7CA737>43 D<130C133C137CEA03FC12FFEAFC7C1200B3B113FE387FFFFE
A2172C7AAB23>49 D<EB7F803801FFF0380780FC380E003F48EB1F8048EB0FC05A0060EB
07E012F000FC14F07E1403A3007C1307C7FCA215E0140F15C0141F1580EC3F00147E147C
5C495A495A495A495A011EC7FC5B5B4913305B485A4848136048C7FC000E14E0001FB5FC
5A4814C0B6FCA21C2C7DAB23>I E /Ff 8 83 df<EE03F8EE1FFF93387C0F80923901E0
03E09239078001F0ED0E004BEB00F85D4B14FC5D4A5A5D14034AC8FC1406020E1401140C
021C15F814180238EC03F014300270EC07E01460EF0FC002E015804AEC1F00173E010190
3807FE7C9139801FFFF892381807E092381FFFF80103903807FCFC91C8127EA2835B0106
1680171F18C0130E130CA2173F131C1318A30138157F01301680A3017015FF1800A24C5A
13F05F16035F0001150701B85D01984A5A4C5AD8039C4A5A010E4AC7FC010614FE903907
8001F83A0701C003F03A0600F01FC0DA3FFFC8FCEC0FF0000E90CAFC120CA3121C1218A3
12381230A312701260A312E0A236597DC537>12 D<01F8EB03FCD803FEEB1FFFD8071F90
387C0FC03B0E0F80E007E0001C9038C3C003271807C70013F002CE1301003801DC14F800
3013D8EB0FF800705B00605BA200E0491303D8C01F15F05C12001607133F91C713E0A216
0F5B017E15C0A2161F13FE491580A2163F1201491500A25E120349147EA216FE1207495C
A21501120F495CEA0380C81203A25EA21507A25EA2150FA25EA2151FA25EA2153FA293C7
FC150E2D417DAB30>17 D<121EEA7F80A2EAFFC0A4EA7F80A2EA1E000A0A78891B>58
D<F001C0F007E0181FF07FC0943801FF00EF07FCEF1FF0EF7FC04C48C7FCEE0FFCEE3FF0
EEFFC0030390C8FCED0FF8ED3FE0EDFF80DA03FEC9FCEC1FF8EC7FE0903801FF80D907FE
CAFCEB1FF0EB7FC04848CBFCEA07FCEA1FF0EA7FC048CCFCA2EA7FC0EA1FF0EA07FCEA01
FF38007FC0EB1FF0EB07FE903801FF809038007FE0EC1FF8EC03FE913800FF80ED3FE0ED
0FF8ED03FF030013C0EE3FF0EE0FFCEE01FF9338007FC0EF1FF0EF07FCEF01FF9438007F
C0F01FE01807F001C03B3878B44C>60 D<91B912F8A3020001C0C7123F6F48EC07F003FF
1503190193C9FCA21A705C5DA3020317605DA314075D18C01701020F4B13005DA2170302
1F92C8FC4B5BA25F023F141E4B13FE92B5FCA24A5CED8000173CA202FF141892C7FCA217
384915305CA21770010315604A91C9FCA313075CA3130F5CA3131F5CA2133FA313FFB612
F8A345447CC33F>70 D<91B600E049B512C0A3020001E0C8383FF800DB7F80ED1FE003FF
94C7FC1A3E93C9127862F101C04A4C5A4B4BC8FC191C6102035E4B5DF003804EC9FC0207
150E4B14386060020F4A5A4B0107CAFC170E5F021F14784B13F84C7E1603023F130F4B48
7E163BEEE1FF91387FC1C1DB83807FED8700159CDAFFB86D7E5D03C06D7E5D4990C7FC4A
6E7EA2717E13034A811707A201076F7E5C717EA2130F4A6E7FA2727E131F5C727E133F85
4A82D9FFE04B7EB600E0010FB512E05FA252447CC353>75 D<91B500C0020FB5128082A2
DA007F9239007FE00070ED1F8074C7FCDBEFF8150E15CF03C7160C70151C1401DB83FE15
18A2DB81FF1538140303001630831A704A6D7E02061760163F7114E0140E020C6D6C5CA2
706C1301141C021801075D83190302386D7E023094C8FC1601715B147002606DEB8006A2
94387FC00E14E04A023F130C18E0191C0101ED1FF04A1618170FF0F838130391C83807FC
30A2943803FE705B01060301136018FF19E0010E81010C5F187FA2131C0118705A133818
1F137801FC70C9FCEA03FFB512F884180651447CC34E>78 D<91B712F018FF19E0020090
39C0003FF86F48EB07FC03FFEC01FEF0007F93C8EA3F801AC0F11FE05C5D1AF0A214035D
A30207EE3FE05DA2F17FC0020F17804B15FF1A004E5A021F4B5A4B4A5AF00FE04E5A023F
037FC7FC4BEB03FCEF1FF092B612804A4AC8FC923980007F80EF0FC0EF07F002FF6E7E92
C77F1701845B4A1400A2170113035CA2170313075CA24D5A130F5CA3011F18185CA2013F
4C13381A304A6F1370D9FFE0020314E0B600E0ED01C00501EB0380943900FE0F00CBEA3F
FEF007F045467CC34A>82 D E /Fg 38 122 df<B712C0A3220379B931>22
D<140C141C1438147014E0EB01C01303EB0780EB0F00A2131E5BA25B13F85B12015B1203
A2485AA3485AA348C7FCA35AA2123EA2127EA4127CA312FCB3A2127CA3127EA4123EA212
3FA27EA36C7EA36C7EA36C7EA212017F12007F13787FA27F7FA2EB0780EB03C01301EB00
E014701438141C140C166476CA26>40 D<12C07E12707E7E7E120F6C7E6C7EA26C7E6C7E
A21378137C133C133E131E131FA2EB0F80A3EB07C0A3EB03E0A314F0A21301A214F8A413
00A314FCB3A214F8A31301A414F0A21303A214E0A3EB07C0A3EB0F80A3EB1F00A2131E13
3E133C137C13785BA2485A485AA2485A48C7FC120E5A5A5A5A5A16647BCA26>I<16C04B
7EB3AB007FBAFCBB1280A26C1900C8D801E0C9FCB3AB6F5A41407BB84C>43
D<121EEA7F8012FF13C0A213E0A3127FEA1E601200A413E013C0A312011380120313005A
1206120E5A5A5A12600B1D78891B>I<B612C0A61A067F9721>I<121EEA7F80A2EAFFC0A4
EA7F80A2EA1E000A0A78891B>I<143014F013011303131F13FFB5FC13E713071200B3B3
B0497E497E007FB6FCA3204278C131>49 D<ED0380A21507150FA2151F153FA2157F15FF
A25CEC03BF153F14071406140C141C141814301470146014C013011480EB03005B13065B
131C13185B1370136013E0485A5B120390C7FC1206120E120C5A123812305A12E0B812C0
A3C8383F8000ADEDFFE0027FEBFFC0A32A437DC231>52 D<007FBAFCBB1280A3CEFCB0BB
1280A36C190041187BA44C>61 D<16C04B7EA34B7EA34B7EA34B7EA3ED19FEA3ED30FFA2
03707FED607FA203E07FEDC03FA2020180ED801FA2DA03007F160FA20206801607A24A6D
7EA34A6D7EA34A6D7EA20270810260147FA202E08191B7FCA249820280C7121FA249C87F