Advertisement
Guest User

yyworks.ps

a guest
Mar 18th, 2012
39
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 57.96 KB | None | 0 0
  1. %!PS-Adobe-2.0
  2. %%Creator: dvips 5.528 Copyright 1986, 1994 Radical Eye Software
  3. %%Title: Y.dvi
  4. %%CreationDate: Fri Jun 10 20:09:05 1994
  5. %%Pages: 10
  6. %%PageOrder: Ascend
  7. %%BoundingBox: 0 0 612 792
  8. %%EndComments
  9. %DVIPSCommandLine: dvips -oY2.ps -p2 -n10 Y.dvi
  10. %DVIPSParameters: dpi=300, comments removed
  11. %DVIPSSource: TeX output 1991.09.26:1012
  12. %%BeginProcSet: tex.pro
  13. /TeXDict 250 dict def TeXDict begin /N{def}def /B{bind def}N /S{exch}N
  14. /X{S N}B /TR{translate}N /isls false N /vsize 11 72 mul N /hsize 8.5 72
  15. mul N /landplus90{false}def /@rigin{isls{[0 landplus90{1 -1}{-1 1}
  16. ifelse 0 0 0]concat}if 72 Resolution div 72 VResolution div neg scale
  17. isls{landplus90{VResolution 72 div vsize mul 0 exch}{Resolution -72 div
  18. hsize mul 0}ifelse TR}if Resolution VResolution vsize -72 div 1 add mul
  19. TR matrix currentmatrix dup dup 4 get round 4 exch put dup dup 5 get
  20. round 5 exch put setmatrix}N /@landscape{/isls true N}B /@manualfeed{
  21. statusdict /manualfeed true put}B /@copies{/#copies X}B /FMat[1 0 0 -1 0
  22. 0]N /FBB[0 0 0 0]N /nn 0 N /IE 0 N /ctr 0 N /df-tail{/nn 8 dict N nn
  23. begin /FontType 3 N /FontMatrix fntrx N /FontBBox FBB N string /base X
  24. array /BitMaps X /BuildChar{CharBuilder}N /Encoding IE N end dup{/foo
  25. setfont}2 array copy cvx N load 0 nn put /ctr 0 N[}B /df{/sf 1 N /fntrx
  26. FMat N df-tail}B /dfs{div /sf X /fntrx[sf 0 0 sf neg 0 0]N df-tail}B /E{
  27. pop nn dup definefont setfont}B /ch-width{ch-data dup length 5 sub get}
  28. B /ch-height{ch-data dup length 4 sub get}B /ch-xoff{128 ch-data dup
  29. length 3 sub get sub}B /ch-yoff{ch-data dup length 2 sub get 127 sub}B
  30. /ch-dx{ch-data dup length 1 sub get}B /ch-image{ch-data dup type
  31. /stringtype ne{ctr get /ctr ctr 1 add N}if}B /id 0 N /rw 0 N /rc 0 N /gp
  32. 0 N /cp 0 N /G 0 N /sf 0 N /CharBuilder{save 3 1 roll S dup /base get 2
  33. index get S /BitMaps get S get /ch-data X pop /ctr 0 N ch-dx 0 ch-xoff
  34. ch-yoff ch-height sub ch-xoff ch-width add ch-yoff setcachedevice
  35. ch-width ch-height true[1 0 0 -1 -.1 ch-xoff sub ch-yoff .1 add]{
  36. ch-image}imagemask restore}B /D{/cc X dup type /stringtype ne{]}if nn
  37. /base get cc ctr put nn /BitMaps get S ctr S sf 1 ne{dup dup length 1
  38. sub dup 2 index S get sf div put}if put /ctr ctr 1 add N}B /I{cc 1 add D
  39. }B /bop{userdict /bop-hook known{bop-hook}if /SI save N @rigin 0 0
  40. moveto /V matrix currentmatrix dup 1 get dup mul exch 0 get dup mul add
  41. .99 lt{/QV}{/RV}ifelse load def pop pop}N /eop{SI restore showpage
  42. userdict /eop-hook known{eop-hook}if}N /@start{userdict /start-hook
  43. known{start-hook}if pop /VResolution X /Resolution X 1000 div /DVImag X
  44. /IE 256 array N 0 1 255{IE S 1 string dup 0 3 index put cvn put}for
  45. 65781.76 div /vsize X 65781.76 div /hsize X}N /p{show}N /RMat[1 0 0 -1 0
  46. 0]N /BDot 260 string N /rulex 0 N /ruley 0 N /v{/ruley X /rulex X V}B /V
  47. {}B /RV statusdict begin /product where{pop product dup length 7 ge{0 7
  48. getinterval dup(Display)eq exch 0 4 getinterval(NeXT)eq or}{pop false}
  49. ifelse}{false}ifelse end{{gsave TR -.1 -.1 TR 1 1 scale rulex ruley
  50. false RMat{BDot}imagemask grestore}}{{gsave TR -.1 -.1 TR rulex ruley
  51. scale 1 1 false RMat{BDot}imagemask grestore}}ifelse B /QV{gsave
  52. transform round exch round exch itransform moveto rulex 0 rlineto 0
  53. ruley neg rlineto rulex neg 0 rlineto fill grestore}B /a{moveto}B /delta
  54. 0 N /tail{dup /delta X 0 rmoveto}B /M{S p delta add tail}B /b{S p tail}
  55. 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{
  56. 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
  57. -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{
  58. 3 2 roll p a}B /bos{/SS save N}B /eos{SS restore}B end
  59. %%EndProcSet
  60. TeXDict begin 40258431 52099146 1000 300 300
  61. (/a/santa/aten/matthias/LS/why-y/Y.dvi) @start /Fa 1
  62. 50 df<0F001E003BC061806060804040310040801A0020800E0020800E0020800E002080
  63. 0B0020401180404020C0C030C07B800F001E001B0D7E8C21>49 D
  64. E /Fb 4 52 df<0F0030C0606060604020C030C030C030C030C030C030C030C030C03040
  65. 206060606030C00F000C137E9211>48 D<0C001C00EC000C000C000C000C000C000C000C
  66. 000C000C000C000C000C000C000C000C00FFC00A137D9211>I<1F0060C06060F070F030
  67. 603000700070006000C001C00180020004000810101020207FE0FFE00C137E9211>I<0F
  68. C030707038703870380038003000E00FC0007000380018001C601CF01CF018E03860701F
  69. C00E137F9211>I E /Fc 1 49 df<03C00FF01FF83C3C381C700E700E700EE007E007E0
  70. 07E007E007E007E007E007E007E007E007E007E007700E700E700E381C3C3C1FF80FF007
  71. E0101D7E9B15>48 D E /Fd 10 111 df<003FC00001F0300003C0380007C07C000F807C
  72. 000F807C000F8038000F8000000F8000000F8000000F800000FFFFFC00FFFFFC000F807C
  73. 000F807C000F807C000F807C000F807C000F807C000F807C000F807C000F807C000F807C
  74. 000F807C000F807C000F807C000F807C007FE1FF807FE1FF80191D809C1B>12
  75. D<0FF8001C1E003E0F803E07803E07C01C07C00007C0007FC007E7C01F07C03C07C07C07
  76. C0F807C0F807C0F807C0780BC03E13F80FE1F815127F9117>97 D<FF0000FF00001F0000
  77. 1F00001F00001F00001F00001F00001F00001F00001F00001F3F801FE1E01F80701F0078
  78. 1F003C1F003C1F003E1F003E1F003E1F003E1F003E1F003E1F003C1F003C1F00781F8070
  79. 1EC1E01C3F00171D7F9C1B>I<000FF0000FF00001F00001F00001F00001F00001F00001
  80. F00001F00001F00001F001F9F00F07F01C03F03C01F07801F07801F0F801F0F801F0F801
  81. F0F801F0F801F0F801F07801F07801F03C01F01C03F00F0FFE03F9FE171D7E9C1B>100
  82. D<01FC000F07001C03803C01C07801C07801E0F801E0F801E0FFFFE0F80000F80000F800
  83. 007800007C00603C00601E00C00F038001FC0013127F9116>I<007F0001E38003C7C007
  84. 87C00F87C00F83800F80000F80000F80000F80000F8000FFF800FFF8000F80000F80000F
  85. 80000F80000F80000F80000F80000F80000F80000F80000F80000F80000F80000F80007F
  86. F8007FF800121D809C0F>I<1E003F003F003F003F001E00000000000000000000000000
  87. FF00FF001F001F001F001F001F001F001F001F001F001F001F001F001F001F00FFE0FFE0
  88. 0B1E7F9D0E>105 D<FF00FF001F001F001F001F001F001F001F001F001F001F001F001F
  89. 001F001F001F001F001F001F001F001F001F001F001F001F001F00FFE0FFE00B1D7F9C0E
  90. >108 D<FF0FC07E00FF31E18F001F40F207801F80FC07C01F80FC07C01F00F807C01F00
  91. F807C01F00F807C01F00F807C01F00F807C01F00F807C01F00F807C01F00F807C01F00F8
  92. 07C01F00F807C01F00F807C0FFE7FF3FF8FFE7FF3FF825127F9128>I<FF0FC0FF31E01F
  93. 40F01F80F81F80F81F00F81F00F81F00F81F00F81F00F81F00F81F00F81F00F81F00F81F
  94. 00F81F00F8FFE7FFFFE7FF18127F911B>I E /Fe 25 121 df<0001FC000703000C0300
  95. 1C07001C0300180000380000380000380000380000700007FFFC00701C00701C00701C00
  96. E03800E03800E03800E03800E07001C07001C07001C07001C0E201C0E201C0E20380E403
  97. 8064038038038000030000070000060000C60000E40000CC00007000001825819C17>12
  98. D<FFC0FFC0FFC00A037D890F>45 D<00020006000C001C007C039C003800380038003800
  99. 7000700070007000E000E000E000E001C001C001C001C003800380038003800780FFF00F
  100. 1C7C9B15>49 D<01E006180808100C100C200C400C401C8018E038E070C1E003C007800F
  101. 001C0038003080308031001E000000000000000000000030007800F00060000E1E789D15
  102. >63 D<FFC00FE00E0007800E0006000F0004000700080007001800078010000380200003
  103. 80400003C0800001C1800001C1000001E2000000E4000000EC000000F800000070000000
  104. 70000000E0000000E0000000E0000000E0000001C0000001C0000001C0000001C0000003
  105. 8000003FF800001B1C789B1F>89 D<03CC063C0C3C181C3838303870387038E070E070E0
  106. 70E070E0E2C0E2C0E261E462643C380F127B9115>97 D<3F00070007000E000E000E000E
  107. 001C001C001C001C0039C03E60383038307038703870387038E070E070E070E060E0E0C0
  108. C0C1C0618063003C000D1D7B9C13>I<01F007080C08181C3838300070007000E000E000
  109. E000E000E000E008E010602030C01F000E127B9113>I<001F8000038000038000070000
  110. 0700000700000700000E00000E00000E00000E0003DC00063C000C3C00181C0038380030
  111. 3800703800703800E07000E07000E07000E07000E0E200C0E200C0E20061E4006264003C
  112. 3800111D7B9C15>I<01E007100C1018083810701070607F80E000E000E000E000E000E0
  113. 086010602030C01F000D127B9113>I<0003C0000670000C70001C60001C00001C000038
  114. 0000380000380000380000380003FF8000700000700000700000700000700000E00000E0
  115. 0000E00000E00000E00001C00001C00001C00001C00001C0000380000380000380000300
  116. 00030000070000C60000E60000CC00007800001425819C0D>I<00F3018F030F06070E0E
  117. 0C0E1C0E1C0E381C381C381C381C383830383038187818F00F700070007000E000E0C0C0
  118. E1C0C3007E00101A7D9113>I<0FC00001C00001C0000380000380000380000380000700
  119. 000700000700000700000E78000E8C000F0E000E0E001C0E001C0E001C0E001C0E00381C
  120. 00381C00381C00383800703880703880707080707100E03200601C00111D7D9C15>I<01
  121. 800380010000000000000000000000000000001C002600470047008E008E000E001C001C
  122. 001C0038003800710071007100720072003C00091C7C9B0D>I<0FC00001C00001C00003
  123. 80000380000380000380000700000700000700000700000E0F000E11000E23800E43801C
  124. 83001C80001D00001E00003F800039C00038E00038E00070E20070E20070E20070E400E0
  125. 6400603800111D7D9C13>107 D<1F800380038007000700070007000E000E000E000E00
  126. 1C001C001C001C0038003800380038007000700070007000E400E400E400E40068003800
  127. 091D7C9C0B>I<3C1E0780266318C04683A0E04703C0E08E0380E08E0380E00E0380E00E
  128. 0380E01C0701C01C0701C01C0701C01C070380380E0388380E0388380E0708380E071070
  129. 1C0320300C01C01D127C9122>I<3C3C002646004687004707008E07008E07000E07000E
  130. 07001C0E001C0E001C0E001C1C00381C40381C40383840383880701900300E0012127C91
  131. 17>I<01E007180C0C180C380C300E700E700EE01CE01CE01CE018E038E030E06060C031
  132. 801E000F127B9115>I<07870004D98008E0C008E0C011C0E011C0E001C0E001C0E00381
  133. C00381C00381C00381800703800703000707000706000E8C000E70000E00000E00001C00
  134. 001C00001C00001C00003C0000FF8000131A7F9115>I<3C3C26C2468747078E068E000E
  135. 000E001C001C001C001C0038003800380038007000300010127C9112>114
  136. D<01F006080C080C1C18181C001F001FC00FF007F0007800386030E030C030806060C01F
  137. 000E127D9111>I<00C001C001C001C00380038003800380FFE00700070007000E000E00
  138. 0E000E001C001C001C001C00384038403840388019000E000B1A7D990E>I<1E03002707
  139. 00470700470700870E00870E000E0E000E0E001C1C001C1C001C1C001C1C003838803838
  140. 801838801839001C5900078E0011127C9116>I<070E0019910010E38020E38041C30041
  141. C00001C00001C000038000038000038000038000070200670200E70400CB04008B080070
  142. F00011127D9113>120 D E /Ff 11 88 df<03000780078007000F000F000F000E000E00
  143. 0E000E000C000C000C000C00180018001800180010001000000000000000000000007000
  144. 7000F0006000091E7C9D0C>33 D<000400080030006000C0008001800300060006000C00
  145. 0C001800180038003000300070007000600060006000E000E000E000E000E000E000E000
  146. E0006000600060006000200030003000180008000C00040002000E2A7C9E10>40
  147. D<0100008000400060002000300010001800180018001C000C000C000C000C000C000C00
  148. 0C000C001C001C001C0018001800380038003000300070006000E000C001C00180030003
  149. 0006000C0018003000600080000E2A809E10>I<7070F06004047C830C>46
  150. D<00F800038E000606000C03000C03001803803803803803803003807003807003807003
  151. 80700380E00700E00700E00700E00700E00700E00600E00E00C00E00C00E00C00C00C01C
  152. 00C0180060300060600030C0001F0000111D7C9B15>48 D<0018007003F00C7000700070
  153. 007000E000E000E000E000E000E001C001C001C001C001C001C003800380038003800380
  154. 038007000780FFF80D1C7C9B15>I<0FFF83FE00F800F800F000E000F0008000F0010000
  155. F0020000F0040001E0080001E0100001E0400001E0800001E1C00001E3C00003C5E00003
  156. C9E00003D1F00003E0F00003C0F00003C078000780780007803C0007803C0007801E0007
  157. 801E0007800F000F000F000F801F80FFF07FF01F1C7E9B20>75 D<0007F00000381C0000
  158. E00E0001C0030003800380070001C00E0001C01E0001E01C0000E03C0000E0380000E078
  159. 0000F0780000F0780000F0F00001E0F00001E0F00001E0F00001E0F00003C0F00003C0F0
  160. 0003C0700007807000070078000F0038001E003C001C001C0038000E00E0000383800000
  161. FE00001C1E7C9C20>79 D<0FFFF80000F80E0000F0078000F003C000F001C000F001E000
  162. F001E001E003C001E003C001E0038001E0070001E00E0001E03C0003FFE00003C0700003
  163. C0380003C03C0003C01C0003C01E0007803C0007803C0007803C0007803C0007803C0007
  164. 803C080F003C100F801C10FFF01C20000007C01D1D7E9B1F>82 D<003F0400C0CC018038
  165. 0300380600180E00180E00180E00181E00101E00001F00000F80000FF80007FF0003FF80
  166. 01FFC0003FE00003E00001E00000E00000E04000E04000E04000E04000C06001C0E00180
  167. F00300CC0E0083F800161E7E9C17>I<FFF0FFE0FF801F001F003C000F001F0018000F00
  168. 0F0010000F001F0010000F001F0020000F002F0020000F002F0060000F804F0040000780
  169. 4F80400007808780800007808780800007810781000007810781000007820782000007C2
  170. 0782000003C407C4000003C403C4000003C803C8000003C803C8000003D803D0000003D0
  171. 03D0000003F003E0000001E003E0000001E001C0000001C001C0000001C0018000000180
  172. 01800000018001800000291D7B9B2B>87 D E /Fg 4 122 df<FFFFF003FFFFC007FFFC
  173. FFFFF807FFFFC00FFFFCFFFFF007FFFF8007FFF807FE00001FF00000FFC003F800001FC0
  174. 00003F0003F800001FC000003C0003F800001FC000003C0003F800001FC00000380003F8
  175. 00001FC00000700003F800001FC00000700003F800001FC00000E00003F800003FC00000
  176. E00003F800003FC00001C00003F800007FC00001C00003F800007FC00003800003F80000
  177. FFE00007800003F80000EFE00007000003F80001CFE0000E000003F80001CFE0000E0000
  178. 03F800038FE0001C000003F800078FE0001C000003F800070FE00038000003FC000E0FE0
  179. 0038000001FC000E0FE00070000001FC001C0FE00070000001FC001C0FE000E0000001FC
  180. 00380FE001E0000001FC00380FE001C0000001FC00700FE003C0000001FC00700FE00380
  181. 000001FC00E00FE00700000001FC01E00FE00700000001FC01C00FE00E00000001FC03C0
  182. 0FE00E00000001FC03800FE01C00000001FC07000FE01C00000001FC07000FE038000000
  183. 01FC0E000FE03800000001FC0E000FE07000000001FC1C000FF0F000000001FC1C0007F0
  184. E000000001FC380007F1C000000001FC380007F1C000000001FC700007F38000000001FC
  185. F00007F38000000001FCE00007F70000000001FFC00007F70000000000FFC00007FE0000
  186. 000000FF800007FE0000000000FF800007FC0000000000FF000007FC0000000000FF0000
  187. 07F80000000000FE000007F80000000000FE000007F00000000000FC000007E000000000
  188. 00FC000007E00000000000F8000007C00000000000F8000007C00000000000F000000780
  189. 0000000000E000000780000000004E3C6EBA56>87 D<7FFFFC00007FFF80FFFFFC0000FF
  190. FF807FFFF80000FFFF8001FF0000001FF80001FE0000000FC00000FE0000000F800000FF
  191. 0000000E000000FF0000001C0000007F0000003C0000007F800000780000007F800000F0
  192. 0000003F800000E00000003FC00001C00000003FC00003800000001FC00007800000001F
  193. E0000F000000001FE0000E000000001FE0001C000000000FE00038000000000FF0007800
  194. 0000000FF000F00000000007F000E00000000007F801C00000000007F803800000000003
  195. F807800000000003FC0F000000000003FC1E000000000003FC1C000000000001FE380000
  196. 00000001FE70000000000001FEF0000000000000FFE0000000000000FFC0000000000000
  197. FF800000000000007F000000000000007F000000000000007E00000000000000FE000000
  198. 00000000FE00000000000000FE00000000000000FC00000000000001FC00000000000001
  199. FC00000000000001FC00000000000001F800000000000003F800000000000003F8000000
  200. 00000003F800000000000003F000000000000007F000000000000007F000000000000007
  201. F000000000000007E00000000000000FE00000000000000FE00000000000001FE0000000
  202. 00000FFFFFC0000000001FFFFFC0000000000FFFFFC000000000393B6FBA40>89
  203. D<0003E0000000FFF0000001FFE0000000FFE000000007E000000007E000000007C00000
  204. 0007C000000007C000000007C00000000F800000000F800000000F800000000F80000000
  205. 1F000000001F000000001F000000001F000000003E000000003E000000003E000000003E
  206. 000000007C07F000007C1FFC00007C7C1E00007CE00F0000F9C0078000FB80078000FF00
  207. 078000FE0007C001FC0007C001FC0007C001F80007C001F00007C003F0000F8003F0000F
  208. 8003E0000F8003E0000F8007C0001F0007C0001F0007C0001F0007C0003E000F80003E00
  209. 0F80003E000F80007C000F80007C001F00007C001F0000F80E1F0000F80E1F0000F80E3E
  210. 0001F01C3E0001F01C3E0001F01C3E0001E0387C0001E0387C0001E0307C0001E0707C00
  211. 01E0E0F80000E1C0F800007F807000001E00273D7ABB2C>104 D<00F800000003FC0000
  212. 70070E0000F80E0F0000F80C0F0001F01C0F8001F0180F8001F0380F8001F0380F8003E0
  213. 701F0003E0701F0003E0701F0003E0E03E0007C0E03E0007C0007C0007C0007C0007C000
  214. 7C000F8000F8000F8000F8000F8000F8000F8001F0001F0001F0001F0001F0001F0001F0
  215. 001F0003E0003E0003E0003E0003E0003E0003E0003E0003E0007C0003E0007C0003E000
  216. 7C0003E000FC0003E001F80001E001F80001E003F80000F006F80000783DF000003FF9F0
  217. 00000FE1F000000001F000000003E000000003E000000003C0000E0007C0001F00078000
  218. 3F800F80003F800F00003F001E00003F003E00003C003C000038007800003800F000001C
  219. 03C000000E0F80000007FE00000003F8000000253879A52A>121
  220. D E /Fh 19 122 df<0000000C000000000000001E000000000000001E00000000000000
  221. 1E000000000000003F000000000000003F000000000000003F000000000000007F800000
  222. 000000007F800000000000007F80000000000000FFC0000000000000FFC0000000000000
  223. FFC00000000000019FE00000000000019FE00000000000039FF00000000000030FF00000
  224. 000000030FF00000000000070FF800000000000607F800000000000607F800000000000C
  225. 07FC00000000000C03FC00000000000C03FC00000000001803FE00000000001801FE0000
  226. 0000001801FE00000000003000FF00000000003000FF00000000003000FF000000000060
  227. 007F800000000060007F8000000000E0007FC000000000C0003FC000000000C0003FC000
  228. 000001C0003FE00000000180001FE00000000180001FE00000000380001FF000000003FF
  229. FFFFF000000003FFFFFFF000000007FFFFFFF800000006000007F800000006000007F800
  230. 00000C000007FC0000000C000003FC0000000C000003FC00000018000001FE0000001800
  231. 0001FE00000018000001FE00000030000000FF00000030000000FF00000070000000FF80
  232. 0000600000007F800000600000007F800000F00000007FC00003F80000007FC0000FFC00
  233. 0001FFE000FFFFC0003FFFFFC0FFFFC0003FFFFFC0FFFFC0003FFFFFC03A3D7DBC41>65
  234. D<FFFFFFFFFFFE00FFFFFFFFFFFE00FFFFFFFFFFFE0000FFC00007FE00007F800000FE00
  235. 007F8000003F00007F8000001F00007F8000000F00007F8000000F00007F800000070000
  236. 7F8000000700007F8000000300007F8000000300007F8000000300007F8000000300007F
  237. 8000000380007F8000000180007F8000000180007F8000600180007F8000600180007F80
  238. 00600000007F8000600000007F8000600000007F8000600000007F8000E00000007F8000
  239. E00000007F8001E00000007F8007E00000007FFFFFE00000007FFFFFE00000007FFFFFE0
  240. 0000007F8007E00000007F8001E00000007F8000E00000007F8000E00000007F80006000
  241. 00007F8000600000007F8000600000007F8000600000007F8000600000007F8000600000
  242. 007F8000000000007F8000000000007F8000000000007F8000000000007F800000000000
  243. 7F8000000000007F8000000000007F8000000000007F8000000000007F8000000000007F
  244. 8000000000007F8000000000007F8000000000007F800000000000FFE000000000FFFFFF
  245. F0000000FFFFFFF0000000FFFFFFF0000000313B7EBA38>70 D<FFFFFFF00000FFFFFFF0
  246. 0000FFFFFFF0000000FFE0000000007F80000000007F80000000007F80000000007F8000
  247. 0000007F80000000007F80000000007F80000000007F80000000007F80000000007F8000
  248. 0000007F80000000007F80000000007F80000000007F80000000007F80000000007F8000
  249. 0000007F80000000007F80000000007F80000000007F80000000007F80000000007F8000
  250. 0000007F80000000007F80000000007F80000000007F80000000007F80000000007F8000
  251. 0000007F80000000007F80000000007F80000000007F80000000007F80000006007F8000
  252. 0006007F80000006007F80000006007F80000006007F8000000E007F8000000C007F8000
  253. 000C007F8000000C007F8000000C007F8000001C007F8000001C007F8000001C007F8000
  254. 003C007F8000007C007F8000007C007F800001FC007F800003F8007F80000FF800FFC000
  255. 7FF8FFFFFFFFFFF8FFFFFFFFFFF8FFFFFFFFFFF82F3B7EBA36>76
  256. D<FFFF8000000001FFFFFFFFC000000003FFFFFFFFC000000003FFFF00FFC000000003FF
  257. 00006FE000000006FE00006FE000000006FE00006FE000000006FE000067F00000000CFE
  258. 000067F00000000CFE000063F800000018FE000063F800000018FE000063F800000018FE
  259. 000061FC00000030FE000061FC00000030FE000060FE00000060FE000060FE00000060FE
  260. 000060FE00000060FE0000607F000000C0FE0000607F000000C0FE0000607F000000C0FE
  261. 0000603F80000180FE0000603F80000180FE0000601FC0000300FE0000601FC0000300FE
  262. 0000601FC0000300FE0000600FE0000600FE0000600FE0000600FE0000600FE0000600FE
  263. 00006007F0000C00FE00006007F0000C00FE00006003F8001800FE00006003F8001800FE
  264. 00006003F8001800FE00006001FC003000FE00006001FC003000FE00006000FE006000FE
  265. 00006000FE006000FE00006000FE006000FE000060007F00C000FE000060007F00C000FE
  266. 000060007F00C000FE000060003F818000FE000060003F818000FE000060001FC30000FE
  267. 000060001FC30000FE000060001FC30000FE000060000FE60000FE000060000FE60000FE
  268. 000060000FE60000FE0000600007FC0000FE0000600007FC0000FE0000600003F80000FE
  269. 0000600003F80000FE0000F00003F80000FE0001F80001F00000FE0007FE0001F00001FF
  270. 00FFFFF000E001FFFFFFFFFFF000E001FFFFFFFFFFF000E001FFFFFF483B7DBA4F>I<00
  271. 3FC0000001FFF8000007C07E00000E001F00001E000F80001F8007C0003FC003E0003FC0
  272. 03F0003FC003F0003FC001F0001F8001F8000F0001F800000001F800000001F800000001
  273. F800000001F80000001FF8000007FFF800003FF9F80000FF01F80003F801F80007F001F8
  274. 000FC001F8001F8001F8003F8001F8007F0001F8007F0001F8007E0001F80CFE0001F80C
  275. FE0001F80CFE0001F80CFE0003F80CFE0003F80C7E0006F80C7F0006F80C3F000C7C181F
  276. 80187E380FE0703FF003FFE01FE0007F800F8026287CA62B>97 D<01F800000000FFF800
  277. 000000FFF800000000FFF80000000007F80000000001F80000000001F80000000001F800
  278. 00000001F80000000001F80000000001F80000000001F80000000001F80000000001F800
  279. 00000001F80000000001F80000000001F80000000001F80000000001F80000000001F800
  280. 00000001F80000000001F80000000001F80FF0000001F83FFE000001F8F01F000001F9C0
  281. 07C00001FB0003E00001FE0001F00001FC0000F80001FC00007C0001F800007E0001F800
  282. 003E0001F800003F0001F800003F0001F800003F8001F800001F8001F800001F8001F800
  283. 001FC001F800001FC001F800001FC001F800001FC001F800001FC001F800001FC001F800
  284. 001FC001F800001FC001F800001FC001F800001F8001F800001F8001F800003F8001F800
  285. 003F0001F800003F0001F800007E0001F800007C0001FC0000FC0001FC0000F80001F600
  286. 01F00001E30003E00001E1C00FC00001C0F03F000001803FFC000000000FE000002A3D7E
  287. BB30>I<0003FE00001FFFC0003E01F000F8003801F0003C03E000FC07C001FE0FC001FE
  288. 0F8001FE1F8001FE3F0000FC3F0000787F0000007F0000007E0000007E000000FE000000
  289. FE000000FE000000FE000000FE000000FE000000FE000000FE000000FE0000007E000000
  290. 7F0000007F0000003F0000003F0000031F8000031F8000060FC0000607C0000C03E0000C
  291. 01F0003800F80070007E03C0001FFF800003FC0020287DA626>I<0003FC0000001FFF00
  292. 00007E07C00000F801E00001E000F00003E000780007C0007C000F80003E001F80003E00
  293. 1F00003F003F00001F003F00001F007F00001F007E00001F807E00001F80FE00001F80FE
  294. 00001F80FFFFFFFF80FFFFFFFF80FE00000000FE00000000FE00000000FE00000000FE00
  295. 0000007E000000007E000000007F000000007F000000003F000000003F000001801F8000
  296. 01800F800003000FC000030007C000060003E0000C0001F0001C000078007000003F01E0
  297. 00000FFF80000001FE000021287EA626>101 D<00003F000001FFC00003E0E0000781F0
  298. 000F83F8001F07F8003E07F8007E07F8007E03F0007C01E000FC000000FC000000FC0000
  299. 00FC000000FC000000FC000000FC000000FC000000FC000000FC000000FC000000FC0000
  300. 00FC000000FC0000FFFFFC00FFFFFC00FFFFFC0000FC000000FC000000FC000000FC0000
  301. 00FC000000FC000000FC000000FC000000FC000000FC000000FC000000FC000000FC0000
  302. 00FC000000FC000000FC000000FC000000FC000000FC000000FC000000FC000000FC0000
  303. 00FC000000FC000000FC000000FC000000FC000000FC000000FC000000FC000001FE0000
  304. 7FFFFC007FFFFC007FFFFC001D3D7FBC1A>I<01F800000000FFF800000000FFF8000000
  305. 00FFF80000000007F80000000001F80000000001F80000000001F80000000001F8000000
  306. 0001F80000000001F80000000001F80000000001F80000000001F80000000001F8000000
  307. 0001F80000000001F80000000001F80000000001F80000000001F80000000001F8000000
  308. 0001F80000000001F807F8000001F81FFE000001F8781F000001F8E00F800001F98007C0
  309. 0001FB0007E00001FB0003E00001FE0003F00001FC0003F00001FC0003F00001FC0003F0
  310. 0001F80003F00001F80003F00001F80003F00001F80003F00001F80003F00001F80003F0
  311. 0001F80003F00001F80003F00001F80003F00001F80003F00001F80003F00001F80003F0
  312. 0001F80003F00001F80003F00001F80003F00001F80003F00001F80003F00001F80003F0
  313. 0001F80003F00001F80003F00001F80003F00001F80003F00001F80003F00003FC0007F8
  314. 00FFFFF1FFFFE0FFFFF1FFFFE0FFFFF1FFFFE02B3C7EBB30>104
  315. D<01C00003E00007F0000FF8000FF8000FF80007F00003E00001C0000000000000000000
  316. 0000000000000000000000000000000000000000000000000001F8007FF8007FF8007FF8
  317. 0007F80001F80001F80001F80001F80001F80001F80001F80001F80001F80001F80001F8
  318. 0001F80001F80001F80001F80001F80001F80001F80001F80001F80001F80001F80001F8
  319. 0001F80001F80001F80001F80001F80001F80003FC00FFFFE0FFFFE0FFFFE0133A7FB917
  320. >I<01F800FFF800FFF800FFF80007F80001F80001F80001F80001F80001F80001F80001
  321. F80001F80001F80001F80001F80001F80001F80001F80001F80001F80001F80001F80001
  322. F80001F80001F80001F80001F80001F80001F80001F80001F80001F80001F80001F80001
  323. F80001F80001F80001F80001F80001F80001F80001F80001F80001F80001F80001F80001
  324. F80001F80001F80001F80001F80001F80001F80001F80001F80003FC00FFFFF0FFFFF0FF
  325. FFF0143C7FBB17>108 D<01F807F80000FFF81FFE0000FFF8781F0000FFF8E00F800007
  326. F98007C00001FB0007E00001FB0003E00001FE0003F00001FC0003F00001FC0003F00001
  327. FC0003F00001F80003F00001F80003F00001F80003F00001F80003F00001F80003F00001
  328. F80003F00001F80003F00001F80003F00001F80003F00001F80003F00001F80003F00001
  329. F80003F00001F80003F00001F80003F00001F80003F00001F80003F00001F80003F00001
  330. F80003F00001F80003F00001F80003F00001F80003F00001F80003F00001F80003F00003
  331. FC0007F800FFFFF1FFFFE0FFFFF1FFFFE0FFFFF1FFFFE02B267EA530>110
  332. D<0001FE0000000FFFC000003F03F00000F8007C0001F0003E0003E0001F0007C0000F80
  333. 0F800007C00F800007C01F000003E03F000003F03F000003F03F000003F07E000001F87E
  334. 000001F87E000001F8FE000001FCFE000001FCFE000001FCFE000001FCFE000001FCFE00
  335. 0001FCFE000001FCFE000001FCFE000001FC7E000001F87E000001F87F000003F83F0000
  336. 03F03F000003F01F000003E01F800007E00F800007C007C0000F8003E0001F0001F0003E
  337. 0000F8007C00003F03F000000FFFC0000001FE000026287EA62B>I<03F00F80FFF03FE0
  338. FFF070F0FFF0C1F807F183F801F303F801F603F801F601F001F6004001FC000001FC0000
  339. 01FC000001FC000001F8000001F8000001F8000001F8000001F8000001F8000001F80000
  340. 01F8000001F8000001F8000001F8000001F8000001F8000001F8000001F8000001F80000
  341. 01F8000001F8000001F8000001F8000001F8000003FC0000FFFFF800FFFFF800FFFFF800
  342. 1D267EA522>114 D<007F818003FFE3800F807F801E001F803800078038000780700003
  343. 8070000380F0000180F0000180F0000180F8000180F8000180FE0000007F8000007FFC00
  344. 003FFFC0001FFFF0000FFFFC0003FFFE0001FFFF00001FFF800000FF8000001FC040000F
  345. C0C00007E0C00003E0E00001E0E00001E0E00001E0E00001E0F00001E0F00001C0F80003
  346. C0FC000380FC000700F7000E00E3C03C00C0FFF800C03FC0001B287DA622>I<00180000
  347. 001800000018000000180000001800000038000000380000003800000038000000780000
  348. 0078000000F8000000F8000001F8000003F8000007F800001FFFFF00FFFFFF00FFFFFF00
  349. 01F8000001F8000001F8000001F8000001F8000001F8000001F8000001F8000001F80000
  350. 01F8000001F8000001F8000001F8000001F8000001F8000001F8000001F8000001F80000
  351. 01F8018001F8018001F8018001F8018001F8018001F8018001F8018001F8018001F80180
  352. 00F8018000F8030000FC0300007C0300003E0600001F0C00000FF8000003F00019367EB4
  353. 21>I<01F80003F000FFF801FFF000FFF801FFF000FFF801FFF00007F8000FF00001F800
  354. 03F00001F80003F00001F80003F00001F80003F00001F80003F00001F80003F00001F800
  355. 03F00001F80003F00001F80003F00001F80003F00001F80003F00001F80003F00001F800
  356. 03F00001F80003F00001F80003F00001F80003F00001F80003F00001F80003F00001F800
  357. 03F00001F80003F00001F80003F00001F80003F00001F80003F00001F80007F00001F800
  358. 07F00001F80007F00000F8000FF00000F8000FF00000FC001BF000007C001BFC00003E00
  359. 73FFE0001F81E3FFE0000FFF83FFE00001FE03F0002B277EA530>I<FFFF801FFFFFFF80
  360. 1FFFFFFF801FFF07FC0007F803F80003E003F80001C001F800018001F800018000FC0003
  361. 0000FC00030000FE000700007E000600007E000600003F000C00003F000C00003F801C00
  362. 001F801800001F801800000FC03000000FC03000000FE070000007E060000007E0600000
  363. 03F0C0000003F0C0000003F9C0000001F980000001F980000000FF00000000FF00000000
  364. FF000000007E000000007E000000003C000000003C000000003C00000000180000000018
  365. 0000000030000000003000000000300000000060000000006000000000C000001000C000
  366. 007C00C00000FE01800000FE01800000FE03000000FE070000007C06000000700C000000
  367. 38380000001FF000000007C000000028377EA42D>121 D E /Fi
  368. 63 122 df<007E0001C1800301800703C00E03C00E01800E00000E00000E00000E00000E
  369. 0000FFFFC00E01C00E01C00E01C00E01C00E01C00E01C00E01C00E01C00E01C00E01C00E
  370. 01C00E01C00E01C00E01C00E01C00E01C07F87F8151D809C17>12
  371. D<60F0F0F0F0F0F0F060606060606060606060606060000000000060F0F060041E7C9D0C
  372. >33 D<6060F0F0F8F86868080808080808101010102020404080800D0C7F9C15>I<60F0
  373. F8680808081010204080050C7C9C0C>39 D<004000800100020006000C000C0018001800
  374. 300030007000600060006000E000E000E000E000E000E000E000E000E000E000E000E000
  375. 600060006000700030003000180018000C000C00060002000100008000400A2A7D9E10>
  376. I<800040002000100018000C000C000600060003000300038001800180018001C001C001
  377. C001C001C001C001C001C001C001C001C001C0018001800180038003000300060006000C
  378. 000C00180010002000400080000A2A7E9E10>I<60F0F0701010101020204080040C7C83
  379. 0C>44 D<FFE0FFE00B0280890E>I<60F0F06004047C830C>I<03C00C301818300C300C70
  380. 0E60066006E007E007E007E007E007E007E007E007E007E007E007E007E0076006600670
  381. 0E300C300C18180C3007E0101D7E9B15>48 D<030007003F00C700070007000700070007
  382. 00070007000700070007000700070007000700070007000700070007000700070007000F
  383. 80FFF80D1C7C9B15>I<07C01830201C400C400EF00FF80FF807F8077007000F000E000E
  384. 001C001C00380070006000C00180030006010C01180110023FFE7FFEFFFE101C7E9B15>
  385. I<07E01830201C201C781E780E781E381E001C001C00180030006007E00030001C001C00
  386. 0E000F000F700FF80FF80FF80FF00E401C201C183007E0101D7E9B15>I<000C00000C00
  387. 001C00003C00003C00005C0000DC00009C00011C00031C00021C00041C000C1C00081C00
  388. 101C00301C00201C00401C00C01C00FFFFC0001C00001C00001C00001C00001C00001C00
  389. 001C0001FFC0121C7F9B15>I<300C3FF83FF03FC020002000200020002000200023E024
  390. 302818301C200E000E000F000F000F600FF00FF00FF00F800E401E401C2038187007C010
  391. 1D7E9B15>I<00F0030C06040C0E181E301E300C700070006000E3E0E430E818F00CF00E
  392. E006E007E007E007E007E007600760077006300E300C18180C3003E0101D7E9B15>I<40
  393. 00007FFF807FFF007FFF0040020080040080040080080000100000100000200000600000
  394. 400000C00000C00001C00001800001800003800003800003800003800007800007800007
  395. 8000078000078000078000030000111D7E9B15>I<03E00C301008200C20066006600660
  396. 067006780C3E083FB01FE007F007F818FC307E601E600FC007C003C003C003C003600260
  397. 04300C1C1007E0101D7E9B15>I<03C00C301818300C700C600EE006E006E007E007E007
  398. E007E0076007700F300F18170C2707C700060006000E300C780C78187010203030C00F80
  399. 101D7E9B15>I<60F0F0600000000000000000000060F0F06004127C910C>I<0FE0303840
  400. 1CE00EF00EF00EF00E000C001C0030006000C00080018001000100010001000100010000
  401. 00000000000000000003000780078003000F1D7E9C14>63 D<0006000000060000000600
  402. 00000F0000000F0000000F00000017800000178000001780000023C0000023C0000023C0
  403. 000041E0000041E0000041E0000080F0000080F0000180F8000100780001FFF80003007C
  404. 0002003C0002003C0006003E0004001E0004001E000C001F001E001F00FF80FFF01C1D7F
  405. 9C1F>65 D<FFFFC00F00F00F00380F003C0F001C0F001E0F001E0F001E0F001E0F001C0F
  406. 003C0F00780F01F00FFFE00F00780F003C0F001E0F000E0F000F0F000F0F000F0F000F0F
  407. 000F0F001E0F001E0F003C0F0078FFFFE0181C7E9B1D>I<001F808000E0618001801980
  408. 070007800E0003801C0003801C00018038000180780000807800008070000080F0000000
  409. F0000000F0000000F0000000F0000000F0000000F0000000F00000007000008078000080
  410. 78000080380000801C0001001C0001000E000200070004000180080000E03000001FC000
  411. 191E7E9C1E>I<FFFFC0000F00F0000F003C000F000E000F0007000F0007000F0003800F
  412. 0003C00F0001C00F0001C00F0001E00F0001E00F0001E00F0001E00F0001E00F0001E00F
  413. 0001E00F0001E00F0001C00F0001C00F0003C00F0003800F0007800F0007000F000E000F
  414. 001C000F007000FFFFC0001B1C7E9B20>I<FFFFFC0F003C0F000C0F00040F00040F0006
  415. 0F00020F00020F02020F02000F02000F02000F06000FFE000F06000F02000F02000F0200
  416. 0F02010F00010F00020F00020F00020F00060F00060F000C0F003CFFFFFC181C7E9B1C>
  417. I<FFFFF80F00780F00180F00080F00080F000C0F00040F00040F02040F02000F02000F02
  418. 000F06000FFE000F06000F02000F02000F02000F02000F00000F00000F00000F00000F00
  419. 000F00000F00000F8000FFF800161C7E9B1B>I<FFF3FFC00F003C000F003C000F003C00
  420. 0F003C000F003C000F003C000F003C000F003C000F003C000F003C000F003C000F003C00
  421. 0FFFFC000F003C000F003C000F003C000F003C000F003C000F003C000F003C000F003C00
  422. 0F003C000F003C000F003C000F003C000F003C00FFF3FFC01A1C7E9B1F>72
  423. D<FFF00F000F000F000F000F000F000F000F000F000F000F000F000F000F000F000F000F
  424. 000F000F000F000F000F000F000F000F000F00FFF00C1C7F9B0F>I<FFF8000F80000F00
  425. 000F00000F00000F00000F00000F00000F00000F00000F00000F00000F00000F00000F00
  426. 000F00000F00000F00000F00080F00080F00080F00180F00180F00100F00300F00700F01
  427. F0FFFFF0151C7E9B1A>76 D<FF8000FF800F8000F8000F8000F8000BC00178000BC00178
  428. 000BC001780009E002780009E002780008F004780008F004780008F00478000878087800
  429. 08780878000878087800083C107800083C107800083C107800081E207800081E20780008
  430. 1E207800080F407800080F40780008078078000807807800080780780008030078001C03
  431. 007800FF8307FF80211C7E9B26>I<FF007FC00F800E000F8004000BC0040009E0040009
  432. E0040008F0040008F8040008780400083C0400083C0400081E0400080F0400080F040008
  433. 0784000807C4000803C4000801E4000801E4000800F40008007C0008007C0008003C0008
  434. 003C0008001C0008000C001C000C00FF8004001A1C7E9B1F>I<003F800000E0E0000380
  435. 380007001C000E000E001C0007003C00078038000380780003C0780003C0700001C0F000
  436. 01E0F00001E0F00001E0F00001E0F00001E0F00001E0F00001E0F00001E0700001C07800
  437. 03C0780003C0380003803C0007801C0007000E000E0007001C000380380000E0E000003F
  438. 80001B1E7E9C20>I<FFFF00000F01E0000F0078000F003C000F001C000F001E000F001E
  439. 000F001E000F001E000F001C000F003C000F0078000F01E0000FFF00000F03C0000F00E0
  440. 000F00F0000F0078000F0078000F0078000F0078000F0078000F0078000F0078100F0078
  441. 100F0038100F003C20FFF01C20000007C01C1D7E9B1F>82 D<07E0801C19803005807003
  442. 80600180E00180E00080E00080E00080F00000F800007C00007FC0003FF8001FFE0007FF
  443. 0000FF80000F800007C00003C00001C08001C08001C08001C0C00180C00180E00300D002
  444. 00CC0C0083F800121E7E9C17>I<7FFFFFC0700F01C0600F00C0400F0040400F0040C00F
  445. 0020800F0020800F0020800F0020000F0000000F0000000F0000000F0000000F0000000F
  446. 0000000F0000000F0000000F0000000F0000000F0000000F0000000F0000000F0000000F
  447. 0000000F0000000F0000001F800003FFFC001B1C7F9B1E>I<FFE0FFE0FF1F001F003C1E
  448. 001E00180F001F00100F001F00100F001F001007801F00200780278020078027802003C0
  449. 27804003C043C04003C043C04003E043C04001E081E08001E081E08001E081E08000F100
  450. F10000F100F10000F100F100007900FA00007A007A00007A007A00003E007C00003C003C
  451. 00003C003C00003C003C00001800180000180018000018001800281D7F9B2B>87
  452. D<FFF007FC0F8001E00780008007C0018003C0010003E0020001F0020000F0040000F804
  453. 0000780800007C1800003C1000001E2000001F2000000F4000000FC00000078000000780
  454. 000007800000078000000780000007800000078000000780000007800000078000000780
  455. 00007FF8001E1C809B1F>89 D<08081010202040404040808080808080B0B0F8F8787830
  456. 300D0C7A9C15>92 D<1FC000307000783800781C00301C00001C00001C0001FC000F1C00
  457. 381C00701C00601C00E01C40E01C40E01C40603C40304E801F870012127E9115>97
  458. D<FC00001C00001C00001C00001C00001C00001C00001C00001C00001C00001C00001C7C
  459. 001D86001E03001C01801C01C01C00C01C00E01C00E01C00E01C00E01C00E01C00E01C00
  460. C01C01C01C01801E030019060010F800131D7F9C17>I<07E00C301878307870306000E0
  461. 00E000E000E000E000E00060007004300418080C3007C00E127E9112>I<003F00000700
  462. 00070000070000070000070000070000070000070000070000070003E7000C1700180F00
  463. 300700700700600700E00700E00700E00700E00700E00700E00700600700700700300700
  464. 180F000C370007C7E0131D7E9C17>I<03E00C301818300C700E6006E006FFFEE000E000
  465. E000E00060007002300218040C1803E00F127F9112>I<00F8018C071E061E0E0C0E000E
  466. 000E000E000E000E00FFE00E000E000E000E000E000E000E000E000E000E000E000E000E
  467. 000E000E000E007FE00F1D809C0D>I<00038003C4C00C38C01C3880181800381C00381C
  468. 00381C00381C001818001C38000C300013C0001000003000001800001FF8001FFF001FFF
  469. 803003806001C0C000C0C000C0C000C06001803003001C0E0007F800121C7F9215>I<FC
  470. 00001C00001C00001C00001C00001C00001C00001C00001C00001C00001C00001C7C001C
  471. 87001D03001E03801C03801C03801C03801C03801C03801C03801C03801C03801C03801C
  472. 03801C03801C03801C0380FF9FF0141D7F9C17>I<18003C003C00180000000000000000
  473. 00000000000000FC001C001C001C001C001C001C001C001C001C001C001C001C001C001C
  474. 001C001C00FF80091D7F9C0C>I<00C001E001E000C00000000000000000000000000000
  475. 0FE000E000E000E000E000E000E000E000E000E000E000E000E000E000E000E000E000E0
  476. 00E000E000E060E0F0C0F1C061803E000B25839C0D>I<FC00001C00001C00001C00001C
  477. 00001C00001C00001C00001C00001C00001C00001C3FC01C0F001C0C001C08001C10001C
  478. 20001C40001CE0001DE0001E70001C78001C38001C3C001C1C001C0E001C0F001C0F80FF
  479. 9FE0131D7F9C16>I<FC001C001C001C001C001C001C001C001C001C001C001C001C001C
  480. 001C001C001C001C001C001C001C001C001C001C001C001C001C001C00FF80091D7F9C0C
  481. >I<FC7E07E0001C838838001D019018001E01E01C001C01C01C001C01C01C001C01C01C
  482. 001C01C01C001C01C01C001C01C01C001C01C01C001C01C01C001C01C01C001C01C01C00
  483. 1C01C01C001C01C01C001C01C01C00FF8FF8FF8021127F9124>I<FC7C001C87001D0300
  484. 1E03801C03801C03801C03801C03801C03801C03801C03801C03801C03801C03801C0380
  485. 1C03801C0380FF9FF014127F9117>I<03F0000E1C00180600300300700380600180E001
  486. C0E001C0E001C0E001C0E001C0E001C06001807003803003001806000E1C0003F0001212
  487. 7F9115>I<FC7C001D86001E03001C01801C01C01C00C01C00E01C00E01C00E01C00E01C
  488. 00E01C00E01C01C01C01C01C01801E03001D06001CF8001C00001C00001C00001C00001C
  489. 00001C00001C0000FF8000131A7F9117>I<FCE01D301E781E781C301C001C001C001C00
  490. 1C001C001C001C001C001C001C001C00FFC00D127F9110>114 D<1F9030704030C010C0
  491. 10E010F8007F803FE00FF000F880388018C018C018E010D0608FC00D127F9110>I<0400
  492. 0400040004000C000C001C003C00FFE01C001C001C001C001C001C001C001C001C001C10
  493. 1C101C101C101C100C100E2003C00C1A7F9910>I<FC1F801C03801C03801C03801C0380
  494. 1C03801C03801C03801C03801C03801C03801C03801C03801C03801C07800C07800E1B80
  495. 03E3F014127F9117>I<FF07E03C03801C01001C01000E02000E02000704000704000704
  496. 0003880003880003D80001D00001D00000E00000E00000E00000400013127F9116>I<FF
  497. 3FCFE03C0F03801C0701801C0701001C0B01000E0B82000E0B82000E1182000711C40007
  498. 11C4000720C40003A0E80003A0E80003C0680001C0700001C0700001803000008020001B
  499. 127F911E>I<7F8FF00F03800F030007020003840001C80001D80000F000007000007800
  500. 00F800009C00010E00020E000607000403801E07C0FF0FF81512809116>I<FF07E03C03
  501. 801C01001C01000E02000E020007040007040007040003880003880003D80001D00001D0
  502. 0000E00000E00000E000004000004000008000008000F08000F10000F300006600003C00
  503. 00131A7F9116>I E end
  504. %%EndProlog
  505. %%BeginSetup
  506. %%Feature: *Resolution 300dpi
  507. TeXDict begin
  508.  
  509. %%EndSetup
  510. %%Page: 2 1
  511. 2 0 bop 75 275 a Fi(2)324 410 y Fh(A)28 b(Lecture)i(on)e(the)i
  512. Fg(Why)36 b Fh(of)29 b Fg(Y)407 590 y Fh(b)n(y)g(Matthias)h(F)-7
  513. b(elleise)q(n)p eop
  514. %%Page: 3 2
  515. 3 1 bop 75 275 a Ff(0.1.)31 b(\()p Fe(Y)22 b(Y)8 b Ff(\))14
  516. b(W)o(ORKS!)1297 b Fi(3)p 75 391 1725 2 v 75 477 a(Is)14
  517. b(this)g(the)h(function)e Fe(length)s Fi(?)p 75 515 821
  518. 2 v 75 755 2 241 v 93 571 a(\()p Fd(de\014ne)f Fe(length)139
  519. 621 y Fi(\()p Fd(lam)o(b)q(da)g Fi(\()p Fe(l)t Fi(\))178
  520. 670 y(\()p Fd(if)h Fi(\()p Fe(nul)r(l?)24 b(l)t Fi(\))14
  521. b Fc(0)236 720 y Fi(\()p Fe(add1)20 b Fi(\()p Fe(length)e
  522. Fi(\()p Fe(c)n(dr)g(l)t Fi(\)\)\)\)\)\))p 895 755 V 75
  523. 756 821 2 v 975 476 a(It)c(sure)h(is.)p 75 823 1725 2
  524. v 75 824 V 75 911 a(Supp)q(ose)g(\()p Fd(de\014ne)d Fi(.)7
  525. b(.)g(.)19 b(.)7 b(.)g(.)f(\))14 b(no)f(longer)h(w)o(orks.)75
  526. 961 y(Can)g(y)o(ou)f(describ)q(e)j(in)d(y)o(our)h(o)o(wn)f(w)o(ords)h
  527. (what)75 1011 y Fe(length)j Fi(do)q(es?)975 909 y(F)m(or)c(one,)h(the)h
  528. (b)q(o)q(dy)f(of)f Fe(length)k Fi(cannot)d(refer)h(to)975
  529. 959 y Fe(length)s Fi(.)p 75 1077 V 75 1078 V 75 1163
  530. a(Then)f(w)o(e)h(migh)o(t)c(as)j(w)o(ell)f(write)i(something)d(lik)o(e)
  531. 75 1213 y(this.)p 75 1243 821 2 v 75 1484 2 241 v 93
  532. 1299 a(\()p Fd(de\014ne)g Fe(length)139 1349 y Fi(\()p
  533. Fd(lam)o(b)q(da)g Fi(\()p Fe(l)t Fi(\))178 1398 y(\()p
  534. Fd(if)h Fi(\()p Fe(nul)r(l?)24 b(l)t Fi(\))14 b Fc(0)236
  535. 1448 y Fi(\()p Fe(add1)20 b Fi(\()p Fe(hukairs)e Fi(\()p
  536. Fe(c)n(dr)g(l)t Fi(\)\)\)\)\)\))p 895 1484 V 75 1485
  537. 821 2 v 975 1165 a(Y)m(es,)c(except)h(that)f(\()p Fd(de\014ne)e
  538. Fi(.)7 b(.)g(.)20 b(.)7 b(.)g(.)e(\))14 b(do)q(esn't)975
  539. 1215 y(w)o(ork)g(an)o(ymore.)p 75 1543 1725 2 v 75 1544
  540. V 75 1629 a(So)g(p)q(erhaps)h(something)d(more)h(lik)o(e)g(this?)p
  541. 75 1667 821 2 v 75 1858 2 191 v 93 1723 a(\()p Fd(lam)o(b)q(da)f
  542. Fi(\()p Fe(l)t Fi(\))139 1773 y(\()p Fd(if)h Fi(\()p
  543. Fe(nul)r(l?)24 b(l)t Fi(\))13 b Fc(0)197 1823 y Fi(\()p
  544. Fe(add1)20 b Fi(\()p Fe(hukairs)e Fi(\()p Fe(c)n(dr)g(l)t
  545. Fi(\)\)\)\)\))p 895 1858 V 75 1859 821 2 v 975 1629 a(Y)m(es,)c(that's)
  546. g(b)q(etter.)p 75 1917 1725 2 v 75 1918 V 75 2003 a(But)g(what)g(happ)q
  547. (ened)h(to)f(the)g(function?)235 b(It)14 b(is)g(no)f(longer)h(recursiv)
  548. o(e.)p 75 2069 V 75 2070 V 75 2155 a(And)g(what)g(do)q(es)h(it)e(do?)
  549. 506 b(It)14 b(measures)g(the)h(length)e(of)h(the)g(empt)o(y)f(list)g
  550. (and)975 2205 y(nothing)g(else.)p 75 2271 V 75 2272 V
  551. 75 2357 a(And)h(what)g(do)q(es)h Fe(huhairs)i Fi(do?)397
  552. b(Who)13 b(cares.)20 b(The)14 b(function)f(do)q(esn't)i(w)o(ork)e(for)
  553. 975 2407 y(non-empt)o(y)g(lists)g(in)h(an)o(y)f(case.)p
  554. 75 2473 V 75 2474 V 75 2559 a(Supp)q(ose)i(w)o(e)f(could)g(name)e(this)
  555. i(new)h(function.)75 2609 y(What)e(w)o(ould)h(b)q(e)g(a)g(go)q(o)q(d)f
  556. (name?)975 2559 y(W)m(e)g(think)h Fe(length)1266 2565
  557. y Fb(0)1299 2559 y Fi(is)g(great)g(b)q(ecause)h(the)975
  558. 2609 y(function)f(only)f(measures)h(lists)g(of)f(length)h(0.)p
  559. 75 2675 V eop
  560. %%Page: 4 3
  561. 4 2 bop 75 275 a Fi(4)p 75 391 1725 2 v 75 479 a(Ho)o(w)14
  562. b(w)o(ould)f(y)o(ou)g(write)h(a)g(function)f(that)75
  563. 529 y(measures)h(the)h(length)e(of)h(lists)g(that)f(con)o(tain)h(one)75
  564. 579 y(item?)975 479 y(W)m(ell,)e(w)o(e)i(could)g(try)g(the)h(follo)o
  565. (wing.)p 975 517 821 2 v 975 708 2 191 v 993 573 a(\()p
  566. Fd(lam)o(b)q(da)d Fi(\()p Fe(l)t Fi(\))1039 623 y(\()p
  567. Fd(if)h Fi(\()p Fe(nul)r(l?)24 b(l)t Fi(\))13 b Fc(0)1097
  568. 673 y Fi(\()p Fe(add1)20 b Fi(\()p Fe(length)1343 679
  569. y Fb(0)1376 673 y Fi(\()p Fe(c)n(dr)e(l)t Fi(\)\)\)\)\))p
  570. 1795 708 V 975 709 821 2 v 75 770 1725 2 v 75 771 V 75
  571. 861 a(Almost,)12 b(but)i(\()p Fd(de\014ne)e Fi(.)7 b(.)g(.)f(.)h(.)g(.)
  572. e(\))14 b(do)q(esn't)g(w)o(ork)g(for)75 911 y Fe(length)185
  573. 917 y Fb(0)204 911 y Fi(.)975 859 y(So?)k(Replace)c Fe(length)1319
  574. 865 y Fb(0)1352 859 y Fi(b)o(y)f(its)h(de\014nition.)p
  575. 975 897 821 2 v 975 1287 2 391 v 993 953 a(\()p Fd(lam)o(b)q(da)e
  576. Fi(\()p Fe(l)t Fi(\))1039 1003 y(\()p Fd(if)h Fi(\()p
  577. Fe(nul)r(l?)24 b(l)t Fi(\))13 b Fc(0)1097 1053 y Fi(\()p
  578. Fe(add1)1113 1102 y Fi(\(\()p Fd(lam)o(b)q(da)f Fi(\()p
  579. Fe(l)t Fi(\))1168 1152 y(\()p Fd(if)h Fi(\()p Fe(nul)r(l?)24
  580. b(l)t Fi(\))14 b Fc(0)1226 1202 y Fi(\()p Fe(add1)21
  581. b Fi(\()p Fe(hukairs)c Fi(\()p Fe(c)n(dr)h(l)t Fi(\)\)\)\)\))1129
  582. 1252 y(\()p Fe(c)n(dr)g(l)t Fi(\)\)\)\)\))p 1795 1287
  583. V 975 1288 821 2 v 75 1349 1725 2 v 75 1350 V 75 1438
  584. a(And)c(what's)g(a)f(go)q(o)q(d)h(name)f(for)g(this)h(function?)117
  585. b(That's)14 b(easy:)k Fe(length)1324 1444 y Fb(1)1343
  586. 1438 y Fi(.)p 75 1506 V 75 1507 V 75 1595 a(Is)c(this)g(the)h(function)
  587. e(that)h(w)o(ould)f(measure)h(the)75 1645 y(lengh)o(t)g(of)f(lists)h
  588. (that)g(con)o(tain)f(t)o(w)o(o)h(items?)p 75 1683 821
  589. 2 v 75 2372 2 690 v 93 1739 a(\()p Fd(lam)o(b)q(da)e
  590. Fi(\()p Fe(l)t Fi(\))139 1789 y(\()p Fd(if)h Fi(\()p
  591. Fe(nul)r(l?)24 b(l)t Fi(\))13 b Fc(0)197 1839 y Fi(\()p
  592. Fe(add1)213 1889 y Fi(\(\()p Fd(lam)o(b)q(da)f Fi(\()p
  593. Fe(l)t Fi(\))268 1938 y(\()p Fd(if)h Fi(\()p Fe(nul)r(l?)24
  594. b(l)t Fi(\))14 b Fc(0)326 1988 y Fi(\()p Fe(add1)342
  595. 2038 y Fi(\(\()p Fd(lam)o(b)q(da)f Fi(\()p Fe(l)t Fi(\))398
  596. 2088 y(\()p Fd(if)f Fi(\()p Fe(nul)r(l?)24 b(l)t Fi(\))14
  597. b Fc(0)455 2138 y Fi(\()p Fe(add1)472 2187 y Fi(\()p
  598. Fe(hukairs)488 2237 y Fi(\()p Fe(c)n(dr)k(l)t Fi(\)\)\)\)\))358
  599. 2287 y(\()p Fe(c)n(dr)g(l)t Fi(\)\)\)\)\))229 2337 y(\()p
  600. Fe(c)n(dr)g(l)t Fi(\)\)\)\)\))p 895 2372 V 75 2373 821
  601. 2 v 975 1595 a(Y)m(es,)c(this)g(is)g Fe(length)1296 1601
  602. y Fb(2)1315 1595 y Fi(.)j(W)m(e)d(just)g(expand)g(the)h(call)975
  603. 1645 y(to)f Fe(hukairs)j Fi(to)d(get)g(the)g(next)h(v)o(ersion)f(of)f
  604. Fe(length)s Fi(.)p 75 2434 1725 2 v 75 2435 V 75 2523
  605. a(No)o(w,)g(what)h(do)g(y)o(ou)f(think)g(recursion)j(is?)218
  606. b(What)13 b(do)h(y)o(ou)g(mean?)p 75 2591 V eop
  607. %%Page: 5 4
  608. 5 3 bop 75 275 a Ff(0.1.)31 b(\()p Fe(Y)22 b(Y)8 b Ff(\))14
  609. b(W)o(ORKS!)1297 b Fi(5)p 75 391 1725 2 v 75 479 a(W)m(ell,)12
  610. b(w)o(e)i(ha)o(v)o(e)g(seen)h(ho)o(w)f(to)f(measure)h(the)h(list)75
  611. 529 y(with)f(no)f(items,)g(with)g(one)h(item,)e(with)i(t)o(w)o(o,)f
  612. (and)75 579 y(so)h(on.)k(Ho)o(w)13 b(could)h(w)o(e)g(get)g(the)h
  613. (function)e Fe(length)75 629 y Fi(bac)o(k?)975 479 y(If)h(w)o(e)g
  614. (could)f(write)i(an)e Fe(in\014nite)k Fi(function,)d(w)o(e)975
  615. 529 y(could)g(write)g Fe(length)1299 535 y Fa(1)1334
  616. 529 y Fi(.)p 75 689 V 75 690 V 75 778 a(But)g(w)o(e)h(can't)e(write)i
  617. (an)e(in\014nite)h(function.)187 b(And)14 b(w)o(e)g(still)f(ha)o(v)o(e)
  618. h(all)f(these)i Fe(r)n(ep)n(etitions)h Fi(and)975 828
  619. y Fe(p)n(atterns)h Fi(in)c(these)j(functions.)p 75 897
  620. V 75 898 V 75 985 a(All)d(these)i(programs)e(con)o(tain)g(a)h(function)
  621. g(that)75 1035 y(lo)q(oks)f(lik)o(e)g Fe(length)s Fi(,)h(and)g(that's)g
  622. (not)f(righ)o(t.)975 985 y(No,)g(let's)h Fe(abstr)n(act)j
  623. Fi(out)d(these)i(patterns.)p 75 1104 V 75 1105 V 75 1193
  624. a(Is)e(this)g(the)h(righ)o(t)e(w)o(a)o(y)g(to)h(rewrite)h
  625. Fe(length)756 1199 y Fb(0)788 1193 y Fi(so)75 1243 y(that)f
  626. Fe(length)g Fi(reapp)q(ears?)p 75 1281 821 2 v 75 1571
  627. 2 291 v 93 1337 a(\(\()p Fd(lam)o(b)q(da)e Fi(\()p Fe(length)s
  628. Fi(\))155 1387 y(\()p Fd(lam)o(b)q(da)h Fi(\()p Fe(l)t
  629. Fi(\))194 1436 y(\()p Fd(if)g Fi(\()p Fe(nul)r(l?)24
  630. b(l)t Fi(\))14 b Fc(0)252 1486 y Fi(\()p Fe(add1)21 b
  631. Fi(\()p Fe(length)c Fi(\()p Fe(c)n(dr)h(l)t Fi(\)\)\)\)\)\))116
  632. 1536 y Fe(hukairs)s Fi(\))p 895 1571 V 75 1572 821 2
  633. v 975 1193 a(It's)c(w)o(orth)g(a)f(try)m(.)p 75 1633
  634. 1725 2 v 75 1634 V 75 1722 a(Rewrite)h Fe(length)337
  635. 1728 y Fb(1)370 1722 y Fi(in)f(the)i(same)e(st)o(yle.)p
  636. 975 1694 821 2 v 975 2184 2 490 v 993 1750 a(\(\()p Fd(lam)o(b)q(da)f
  637. Fi(\()p Fe(length)s Fi(\))1055 1800 y(\()p Fd(lam)o(b)q(da)h
  638. Fi(\()p Fe(l)t Fi(\))1094 1850 y(\()p Fd(if)g Fi(\()p
  639. Fe(nul)r(l?)24 b(l)t Fi(\))14 b Fc(0)1152 1899 y Fi(\()p
  640. Fe(add1)21 b Fi(\()p Fe(length)c Fi(\()p Fe(c)n(dr)h(l)t
  641. Fi(\)\)\)\)\)\))1016 1949 y(\(\()p Fd(lam)o(b)q(da)12
  642. b Fi(\()p Fe(length)s Fi(\))1071 1999 y(\()p Fd(lam)o(b)q(da)h
  643. Fi(\()p Fe(l)t Fi(\))1110 2049 y(\()p Fd(if)g Fi(\()p
  644. Fe(nul)r(l?)24 b(l)t Fi(\))14 b Fc(0)1168 2099 y Fi(\()p
  645. Fe(add1)21 b Fi(\()p Fe(length)c Fi(\()p Fe(c)n(dr)h(l)t
  646. Fi(\)\)\)\)\)\))1032 2148 y Fe(hukairs)s Fi(\)\))p 1795
  647. 2184 V 975 2185 821 2 v 75 2254 1725 2 v eop
  648. %%Page: 6 5
  649. 6 4 bop 75 275 a Fi(6)p 75 391 1725 2 v 75 479 a(And)14
  650. b Fe(length)273 485 y Fb(2)292 479 y Fi(.)p 975 451 821
  651. 2 v 975 1140 2 690 v 993 507 a(\(\()p Fd(lam)o(b)q(da)e
  652. Fi(\()p Fe(length)s Fi(\))1055 557 y(\()p Fd(lam)o(b)q(da)h
  653. Fi(\()p Fe(l)t Fi(\))1094 607 y(\()p Fd(if)g Fi(\()p
  654. Fe(nul)r(l?)24 b(l)t Fi(\))14 b Fc(0)1152 657 y Fi(\()p
  655. Fe(add1)21 b Fi(\()p Fe(length)c Fi(\()p Fe(c)n(dr)h(l)t
  656. Fi(\)\)\)\)\)\))1016 707 y(\(\()p Fd(lam)o(b)q(da)12
  657. b Fi(\()p Fe(length)s Fi(\))1071 757 y(\()p Fd(lam)o(b)q(da)h
  658. Fi(\()p Fe(l)t Fi(\))1110 806 y(\()p Fd(if)g Fi(\()p
  659. Fe(nul)r(l?)24 b(l)t Fi(\))14 b Fc(0)1168 856 y Fi(\()p
  660. Fe(add1)21 b Fi(\()p Fe(length)c Fi(\()p Fe(c)n(dr)h(l)t
  661. Fi(\)\)\)\)\)\))1032 906 y(\(\()p Fd(lam)o(b)q(da)13
  662. b Fi(\()p Fe(length)s Fi(\))1087 956 y(\()p Fd(lam)o(b)q(da)g
  663. Fi(\()p Fe(l)t Fi(\))1127 1006 y(\()p Fd(if)f Fi(\()p
  664. Fe(nul)r(l?)24 b(l)t Fi(\))14 b Fc(0)1184 1055 y Fi(\()p
  665. Fe(add1)21 b Fi(\()p Fe(length)c Fi(\()p Fe(c)n(dr)h(l)t
  666. Fi(\)\)\)\)\)\))1048 1105 y Fe(hukairs)s Fi(\)\)\))p
  667. 1795 1140 V 975 1141 821 2 v 75 1211 1725 2 v 75 1212
  668. V 75 1299 a(Close,)13 b(but)i(there)g(are)f(still)f(rep)q(etitions.)241
  669. b(T)m(rue.)18 b(Let's)d(get)f(rid)f(of)h(them.)p 75 1368
  670. V 75 1369 V 75 1457 a(Where)h(should)e(w)o(e)i(start?)469
  671. b(Name)13 b(the)h(function)g(that)g(tak)o(es)g Fe(length)j
  672. Fi(as)d(an)975 1507 y(argumen)o(t)f(and)g(that)h(returns)i(a)d
  673. (function)h(that)975 1556 y(lo)q(oks)f(lik)o(e)g Fe(length)s
  674. Fi(.)p 75 1625 V 75 1626 V 75 1714 a(What's)g(a)h(go)q(o)q(d)f(name)g
  675. (for)h(this)g(function?)195 b(What)13 b(ab)q(out)h Fe(mk-length)j
  676. Fi(for)d(\\mak)o(e)e Fe(length)s Fi("?)p 75 1783 V 75
  677. 1784 V 75 1871 a(Ok,)i(do)f(this)h(to)g Fe(length)451
  678. 1877 y Fb(0)470 1871 y Fi(.)493 b(No)14 b(problem.)p
  679. 975 1910 821 2 v 975 2250 2 341 v 993 1966 a(\(\()p Fd(lam)o(b)q(da)e
  680. Fi(\()p Fe(mk-length)s Fi(\))1055 2015 y(\()p Fe(mk-length)17
  681. b(hukairs)s Fi(\)\))1016 2065 y(\()p Fd(lam)o(b)q(da)12
  682. b Fi(\()p Fe(length)s Fi(\))1055 2115 y(\()p Fd(lam)o(b)q(da)h
  683. Fi(\()p Fe(l)t Fi(\))1094 2165 y(\()p Fd(if)g Fi(\()p
  684. Fe(nul)r(l?)24 b(l)t Fi(\))14 b Fc(0)1152 2215 y Fi(\()p
  685. Fe(add1)21 b Fi(\()p Fe(length)c Fi(\()p Fe(c)n(dr)h(l)t
  686. Fi(\)\)\)\)\)\)\))p 1795 2250 V 975 2251 821 2 v 75 2312
  687. 1725 2 v eop
  688. %%Page: 7 6
  689. 7 5 bop 75 275 a Ff(0.1.)31 b(\()p Fe(Y)22 b(Y)8 b Ff(\))14
  690. b(W)o(ORKS!)1297 b Fi(7)p 75 391 1725 2 v 75 472 a(Is)14
  691. b(this)g Fe(length)308 478 y Fb(1)327 472 y Fi(?)p 75
  692. 510 821 2 v 75 900 2 391 v 93 566 a(\(\()p Fd(lam)o(b)q(da)e
  693. Fi(\()p Fe(mk-length)s Fi(\))155 616 y(\()p Fe(mk-length)171
  694. 666 y Fi(\()p Fe(mk-length)17 b(hukairs)s Fi(\)\)\))116
  695. 716 y(\()p Fd(lam)o(b)q(da)12 b Fi(\()p Fe(length)s Fi(\))155
  696. 765 y(\()p Fd(lam)o(b)q(da)h Fi(\()p Fe(l)t Fi(\))194
  697. 815 y(\()p Fd(if)g Fi(\()p Fe(nul)r(l?)24 b(l)t Fi(\))14
  698. b Fc(0)252 865 y Fi(\()p Fe(add1)21 b Fi(\()p Fe(length)c
  699. Fi(\()p Fe(c)n(dr)h(l)t Fi(\)\)\)\)\)\)\))p 895 900 V
  700. 75 901 821 2 v 975 472 a(It)c(sure)h(is.)j(And)c(this)g(is)g
  701. Fe(length)1487 478 y Fb(2)1505 472 y Fi(.)p 975 510 V
  702. 975 950 2 441 v 993 566 a(\(\()p Fd(lam)o(b)q(da)e Fi(\()p
  703. Fe(mk-length)s Fi(\))1055 616 y(\()p Fe(mk-length)1071
  704. 666 y Fi(\()p Fe(mk-length)1087 716 y Fi(\()p Fe(mk-length)18
  705. b(hukairs)s Fi(\)\)\)\))1016 765 y(\()p Fd(lam)o(b)q(da)12
  706. b Fi(\()p Fe(length)s Fi(\))1055 815 y(\()p Fd(lam)o(b)q(da)h
  707. Fi(\()p Fe(l)t Fi(\))1094 865 y(\()p Fd(if)g Fi(\()p
  708. Fe(nul)r(l?)24 b(l)t Fi(\))14 b Fc(0)1152 915 y Fi(\()p
  709. Fe(add1)21 b Fi(\()p Fe(length)c Fi(\()p Fe(c)n(dr)h(l)t
  710. Fi(\)\)\)\)\)\)\))p 1795 950 V 975 951 821 2 v 75 1005
  711. 1725 2 v 75 1006 V 75 1086 a(Can)c(y)o(ou)f(do)h Fe(length)409
  712. 1092 y Fb(3)428 1086 y Fi(?)527 b(Here)15 b(w)o(e)f(go.)p
  713. 975 1124 821 2 v 975 1614 2 490 v 993 1180 a(\(\()p Fd(lam)o(b)q(da)e
  714. Fi(\()p Fe(mk-length)s Fi(\))1055 1230 y(\()p Fe(mk-length)1071
  715. 1280 y Fi(\()p Fe(mk-length)1087 1329 y Fi(\()p Fe(mk-length)1103
  716. 1379 y Fi(\()p Fe(mk-length)18 b(hukairs)s Fi(\)\)\)\)\))1016
  717. 1429 y(\()p Fd(lam)o(b)q(da)12 b Fi(\()p Fe(length)s
  718. Fi(\))1055 1479 y(\()p Fd(lam)o(b)q(da)h Fi(\()p Fe(l)t
  719. Fi(\))1094 1529 y(\()p Fd(if)g Fi(\()p Fe(nul)r(l?)24
  720. b(l)t Fi(\))14 b Fc(0)1152 1579 y Fi(\()p Fe(add1)21
  721. b Fi(\()p Fe(length)c Fi(\()p Fe(c)n(dr)h(l)t Fi(\)\)\)\)\)\)\))p
  722. 1795 1614 V 975 1615 821 2 v 75 1668 1725 2 v 75 1669
  723. V 75 1750 a(So)c(what)f(is)h(recursion?)514 b(It)14 b(is)g(lik)o(e)f
  724. (an)g(in\014nite)h(to)o(w)o(er)g(of)g(applications)e(of)975
  725. 1800 y Fe(mk-length)17 b Fi(to)d(an)f(arbitrary)h(function.)p
  726. 75 1861 V 75 1862 V 75 1943 a(Do)f(w)o(e)h(really)g(need)h(an)e
  727. (in\014nite)h(to)o(w)o(er?)244 b(Not)14 b(really)f(of)g(course.)19
  728. b(Ev)o(erytime)13 b(w)o(e)g(use)i Fe(length)975 1993
  729. y Fi(w)o(e)f(only)f(need)i(a)f(\014nite)g(n)o(um)o(b)q(er,)e(but)j(w)o
  730. (e)f(nev)o(er)975 2042 y(kno)o(w)f(ho)o(w)h(man)o(y)m(.)p
  731. 75 2104 V 75 2105 V 75 2186 a(Could)f(w)o(e)h(guess)h(ho)o(w)f(man)o(y)
  732. e(w)o(e)i(need?)245 b(Sure,)14 b(but)g(w)o(e)g(ma)o(y)e(not)i(guess)h
  733. (a)f(large)f(enough)975 2235 y(n)o(um)o(b)q(er.)p 75
  734. 2289 V 75 2290 V 75 2370 a(When)h(do)g(w)o(e)g(\014nd)g(out)g(that)g(w)
  735. o(e)g(didn't)f(guess)i(a)75 2420 y(large)f(enough)g(n)o(um)o(b)q(er?)
  736. 975 2370 y(When)g(w)o(e)g(apply)f(the)i(function)e Fe(hukairs)18
  737. b Fi(that)c(is)975 2420 y(passed)h(to)f(the)g(\014rst)h
  738. Fe(mk-length)s Fi(.)p 75 2482 V 75 2483 V 75 2563 a(What)e(if)h(w)o(e)g
  739. (could)f(create)j(another)e(application)75 2613 y(of)f
  740. Fe(mk-length)k Fi(to)d Fe(huhairs)j Fi(at)d(this)g(p)q(oin)o(t?)975
  741. 2563 y(That)g(w)o(ould)f(p)q(ostp)q(one)i(the)f(problem)f(b)o(y)g(one,)
  742. 975 2613 y(and)h(b)q(esides,)h(ho)o(w)e(could)h(w)o(e)g(do)f(that?)p
  743. 75 2675 V eop
  744. %%Page: 8 7
  745. 8 6 bop 75 275 a Fi(8)p 75 391 1725 2 v 75 477 a(W)m(ell,)12
  746. b(since)j(nob)q(o)q(dy)f(cares)h(what)e(function)h(w)o(e)75
  747. 526 y(pass)g(to)g Fe(mk-length)s Fi(,)g(w)o(e)g(could)g(pass)g(it)f
  748. Fe(mk-length)75 576 y Fi(initially)m(.)975 477 y(That's)h(the)g(righ)o
  749. (t)g(idea.)j(And)d(then)h(w)o(e)f(in)o(v)o(ok)o(e)975
  750. 526 y Fe(mk-length)j Fi(on)d Fe(huhairs)j Fi(and)d(the)g(result)h(of)e
  751. (this)975 576 y(on)h(the)g Fe(c)n(dr)k Fi(so)c(that)g(w)o(e)g(get)g
  752. (one)g(more)f(piece)i(of)975 626 y(the)f(to)o(w)o(er.)p
  753. 75 684 V 75 685 V 75 770 a(Then)g(this)g(is)g(still)f
  754. Fe(length)497 776 y Fb(0)516 770 y Fi(?)p 75 808 821
  755. 2 v 75 1149 2 341 v 93 864 a(\(\()p Fd(lam)o(b)q(da)f
  756. Fi(\()p Fe(mk-length)s Fi(\))155 914 y(\()p Fe(mk-length)17
  757. b(mk-length)s Fi(\)\))116 964 y(\()p Fd(lam)o(b)q(da)12
  758. b Fi(\()p Fe(mk-length)s Fi(\))155 1014 y(\()p Fd(lam)o(b)q(da)h
  759. Fi(\()p Fe(l)t Fi(\))194 1064 y(\()p Fd(if)g Fi(\()p
  760. Fe(nul)r(l?)24 b(l)t Fi(\))14 b Fc(0)252 1113 y Fi(\()p
  761. Fe(add1)21 b Fi(\()p Fe(mk-length)c Fi(\()p Fe(c)n(dr)h(l)t
  762. Fi(\)\)\)\)\)\)\))p 895 1149 V 75 1150 821 2 v 975 770
  763. a(Y)m(es.)g(And)d(when)f(w)o(e)g(apply)f Fe(mk-length)k
  764. Fi(once,)d(w)o(e)975 820 y(get)g Fe(length)1151 826 y
  765. Fb(1)1170 820 y Fi(.)p 975 858 V 975 1248 2 391 v 993
  766. 914 a(\(\()p Fd(lam)o(b)q(da)e Fi(\()p Fe(mk-length)s
  767. Fi(\))1055 964 y(\()p Fe(mk-length)17 b(mk-length)s Fi(\)\))1016
  768. 1014 y(\()p Fd(lam)o(b)q(da)12 b Fi(\()p Fe(mk-length)s
  769. Fi(\))1055 1064 y(\()p Fd(lam)o(b)q(da)h Fi(\()p Fe(l)t
  770. Fi(\))1094 1113 y(\()p Fd(if)g Fi(\()p Fe(nul)r(l?)24
  771. b(l)t Fi(\))14 b Fc(0)1152 1163 y Fi(\()p Fe(add1)21
  772. b Fi(\(\()p Fe(mk-length)c(hukairs)s Fi(\))1289 1213
  773. y(\()p Fe(c)n(dr)h(l)t Fi(\)\)\)\)\)\)\))p 1795 1248
  774. V 975 1249 821 2 v 75 1307 1725 2 v 75 1308 V 75 1393
  775. a(Could)13 b(w)o(e)h(do)g(this)g(more)f(than)h(once?)277
  776. b(Y)m(es,)14 b(just)g(k)o(eep)h(passing)e Fe(mk-length)k
  777. Fi(to)d(itself,)975 1443 y(and)g(w)o(e)g(can)g(do)g(this)g(as)g(often)f
  778. (as)h(w)o(e)h(need)f(to!)p 75 1501 V 75 1502 V 75 1587
  779. a(What)f(w)o(ould)h(y)o(ou)f(call)g Fe(this)k Fi(function?)p
  780. 75 1625 821 2 v 75 2016 2 391 v 93 1681 a(\(\()p Fd(lam)o(b)q(da)12
  781. b Fi(\()p Fe(mk-length)s Fi(\))155 1731 y(\()p Fe(mk-length)17
  782. b(mk-length)s Fi(\)\))116 1781 y(\()p Fd(lam)o(b)q(da)12
  783. b Fi(\()p Fe(mk-length)s Fi(\))155 1831 y(\()p Fd(lam)o(b)q(da)h
  784. Fi(\()p Fe(l)t Fi(\))194 1881 y(\()p Fd(if)g Fi(\()p
  785. Fe(nul)r(l?)24 b(l)t Fi(\))14 b Fc(0)252 1931 y Fi(\()p
  786. Fe(add1)21 b Fi(\(\()p Fe(mk-length)c(mk-length)s Fi(\))389
  787. 1980 y(\()p Fe(c)n(dr)h(l)t Fi(\)\)\)\)\)\)\))p 895 2016
  788. V 75 2017 821 2 v 975 1587 a(It)c(is)g Fe(length)s Fi(,)f(of)h(course.)
  789. p 75 2075 1725 2 v 75 2076 V 75 2161 a(Except)h(that)f(it)g(no)f
  790. (longer)h(con)o(tains)g(the)75 2211 y(function)g(that)g(lo)q(oks)f(lik)
  791. o(e)g Fe(length)s Fi(.)18 b(Can)c(w)o(e)g(\014x)75 2260
  792. y(that?)975 2161 y(W)m(e)f(could)h(extract)h(the)g(self-application)d
  793. (of)975 2211 y Fe(mk-length)17 b Fi(and)d(call)f(it)g
  794. Fe(length)s Fi(.)p 75 2318 V 75 2319 V 75 2404 a(Wh)o(y?)793
  795. b(Because)16 b(it)d(really)h(mak)o(es)e(the)j(function)e
  796. Fe(length)s Fi(.)p 75 2471 V 75 2472 V 75 2559 a(But)h(\()p
  797. Fe(mk-length)h(mk-length)p Fi(\))f(is)g(not)g(a)g(function.)75
  798. 2609 y(It)g(only)f(returns)j(a)d(function.)975 2557 y(So)h(what)f(do)h
  799. (w)o(e)g(do?)p 75 2675 V eop
  800. %%Page: 9 8
  801. 9 7 bop 75 275 a Ff(0.1.)31 b(\()p Fe(Y)22 b(Y)8 b Ff(\))14
  802. b(W)o(ORKS!)1297 b Fi(9)p 75 391 1725 2 v 75 479 a(Mak)o(e)14
  803. b(the)g(self-application)f(of)g Fe(mk-length)k Fi(in)o(to)c(a)75
  804. 529 y(function.)975 479 y(No)h(problem,)e(w)o(e)i(just)g(use)h(the)f
  805. (old)f(tric)o(k)h(of)975 529 y(wrapping)f(a)h Fd(lam)o(b)q(da)e
  806. Fi(around)i(the)h(application.)975 579 y(After)g(all,)d(the)i
  807. (self-application)f(do)q(es)h(return)h(a)975 629 y(function!)p
  808. 75 689 V 75 690 V 75 778 a(Whic)o(h)e(function?)600 b(The)14
  809. b(function)g Fe(length)s Fi(.)k(Remem)o(b)q(er?)p 75
  810. 847 V 75 848 V 75 936 a(Ok,)c(do)f(it!)p 975 908 821
  811. 2 v 975 1398 2 490 v 993 964 a(\(\()p Fd(lam)o(b)q(da)f
  812. Fi(\()p Fe(mk-length)s Fi(\))1055 1014 y(\()p Fe(mk-length)17
  813. b(mk-length)s Fi(\)\))1016 1063 y(\()p Fd(lam)o(b)q(da)12
  814. b Fi(\()p Fe(mk-length)s Fi(\))1055 1113 y(\()p Fd(lam)o(b)q(da)h
  815. Fi(\()p Fe(l)t Fi(\))1094 1163 y(\()p Fd(if)g Fi(\()p
  816. Fe(nul)r(l?)24 b(l)t Fi(\))14 b Fc(0)1152 1213 y Fi(\()p
  817. Fe(add1)1191 1263 y Fi(\(\()p Fd(lam)o(b)q(da)f Fi(\()p
  818. Fe(x)5 b Fi(\))1247 1313 y(\(\()p Fe(mk-length)17 b(mk-length)s
  819. Fi(\))d Fe(x)5 b Fi(\)\))1207 1362 y(\()p Fe(c)n(dr)19
  820. b(l)t Fi(\)\)\)\)\)\)\))p 1795 1398 V 975 1399 821 2
  821. v 75 1468 1725 2 v 75 1469 V 75 1556 a(Mo)o(v)o(e)14
  822. b(out)f(the)i(new)f(function)g(so)g(that)g(w)o(e)g(get)75
  823. 1606 y Fe(length)j Fi(bac)o(k.)p 975 1529 821 2 v 975
  824. 2018 2 490 v 993 1585 a(\(\()p Fd(lam)o(b)q(da)12 b Fi(\()p
  825. Fe(mk-length)s Fi(\))1055 1634 y(\()p Fe(mk-length)17
  826. b(mk-length)s Fi(\)\))1016 1684 y(\()p Fd(lam)o(b)q(da)12
  827. b Fi(\()p Fe(mk-length)s Fi(\))1055 1734 y(\(\()p Fd(lam)o(b)q(da)h
  828. Fi(\()p Fe(length)s Fi(\))1110 1784 y(\()p Fd(lam)o(b)q(da)g
  829. Fi(\()p Fe(l)t Fi(\))1150 1834 y(\()p Fd(if)f Fi(\()p
  830. Fe(nul)r(l?)24 b(l)t Fi(\))14 b Fc(0)1207 1884 y Fi(\()p
  831. Fe(add1)21 b Fi(\()p Fe(length)c Fi(\()p Fe(c)n(dr)h(l)t
  832. Fi(\)\)\)\)\)\))1071 1933 y(\()p Fd(lam)o(b)q(da)13 b
  833. Fi(\()p Fe(x)5 b Fi(\))1110 1983 y(\(\()p Fe(mk-length)18
  834. b(mk-length)s Fi(\))c Fe(x)5 b Fi(\)\)\)\)\))p 1795 2018
  835. V 975 2019 821 2 v 75 2088 1725 2 v 75 2089 V 75 2177
  836. a(Is)14 b(this)g(ok)g(to)f(do?)603 b(Y)m(es.)18 b(Think)c(ab)q(out)g
  837. (it.)j(W)m(e)d(alw)o(a)o(ys)f(did)g(the)975 2227 y(rev)o(erse:)20
  838. b(When)14 b(w)o(e)g(knew)g(what)g(the)h(argumen)o(t)975
  839. 2277 y(to)f(a)f(function)h(w)o(as,)f(w)o(e)h(pro)q(ceeded)i(with)e(the)
  840. 975 2327 y(function)g(b)q(o)q(dy)g(and)f(used)i(the)g(argumen)o(t)d(v)n
  841. (alue)975 2376 y(whenev)o(er)j(w)o(e)f(sa)o(w)g(the)h(parameter)e
  842. (name.)p 75 2445 V 75 2446 V 75 2534 a(Can)h(w)o(e)g(extract)h(the)f
  843. (function)g(that)g(lo)q(oks)f(lik)o(e)75 2584 y Fe(length)k
  844. Fi(and)d(giv)o(e)f(it)h(a)f(name?)975 2534 y(Y)m(es,)h(it)f(do)q(es)i
  845. (not)f(dep)q(end)h(on)f Fe(mk-length)j Fi(at)c(all!)p
  846. 75 2653 V eop
  847. %%Page: 10 9
  848. 10 8 bop 75 275 a Fi(10)p 75 391 1725 2 v 75 479 a(Is)14
  849. b(this)g(the)h(righ)o(t)e(function?)p 75 517 821 2 v
  850. 75 1057 2 540 v 93 573 a(\(\()p Fd(lam)o(b)q(da)f Fi(\()p
  851. Fe(le)s Fi(\))155 623 y(\(\()p Fd(lam)o(b)q(da)h Fi(\()p
  852. Fe(mk-length)s Fi(\))210 673 y(\()p Fe(mk-length)18 b(mk-length)s
  853. Fi(\)\))171 723 y(\()p Fd(lam)o(b)q(da)13 b Fi(\()p Fe(mk-length)s
  854. Fi(\))210 773 y(\()p Fe(le)k Fi(\()p Fd(lam)o(b)q(da)c
  855. Fi(\()p Fe(x)5 b Fi(\))312 822 y(\(\()p Fe(mk-length)18
  856. b(mk-length)s Fi(\))c Fe(x)5 b Fi(\)\)\)\)\)\))116 872
  857. y(\()p Fd(lam)o(b)q(da)12 b Fi(\()p Fe(length)s Fi(\))155
  858. 922 y(\()p Fd(lam)o(b)q(da)h Fi(\()p Fe(l)t Fi(\))194
  859. 972 y(\()p Fd(if)g Fi(\()p Fe(nul)r(l?)24 b(l)t Fi(\))14
  860. b Fc(0)252 1022 y Fi(\()p Fe(add1)21 b Fi(\()p Fe(length)c
  861. Fi(\()p Fe(c)n(dr)h(l)t Fi(\)\)\)\)\)\)\))p 895 1057
  862. V 75 1058 821 2 v 975 479 a(Y)m(es.)p 75 1119 1725 2
  863. v 75 1120 V 75 1207 a(What)13 b(did)h(w)o(e)g(actually)f(get)h(bac)o
  864. (k?)321 b(W)m(e)13 b(extracted)j(the)e Fe(old)19 b Fi(function)13
  865. b Fe(mk-length)s Fi(!)p 75 1276 V 75 1277 V 75 1365 a(Let's)h(separate)
  866. h(the)g(function)e(that)h(mak)o(es)f Fe(length)75 1415
  867. y Fi(from)f(the)j(function)e(that)h(lo)q(oks)f(lik)o(e)h
  868. Fe(length)s Fi(.)975 1365 y(That's)g(easy)m(.)p 975 1403
  869. 821 2 v 975 1744 2 341 v 993 1459 a(\()p Fd(lam)o(b)q(da)e
  870. Fi(\()p Fe(le)s Fi(\))1039 1509 y(\(\()p Fd(lam)o(b)q(da)h
  871. Fi(\()p Fe(mk-length)s Fi(\))1094 1559 y(\()p Fe(mk-length)k(mk-length)
  872. s Fi(\)\))1055 1609 y(\()p Fd(lam)o(b)q(da)c Fi(\()p
  873. Fe(mk-length)s Fi(\))1094 1658 y(\()p Fe(le)k Fi(\()p
  874. Fd(lam)o(b)q(da)c Fi(\()p Fe(x)5 b Fi(\))1196 1708 y(\(\()p
  875. Fe(mk-length)18 b(mk-length)s Fi(\))c Fe(x)5 b Fi(\)\)\)\)\)\))p
  876. 1795 1744 V 975 1745 821 2 v 75 1805 1725 2 v 75 1806
  877. V 75 1894 a(Do)q(es)14 b(this)g(function)g(ha)o(v)o(e)g(a)f(name?)306
  878. b(Y)m(es,)14 b(it)f(is)h(called)g(the)g(applicativ)o(e-order)g
  879. Fe(Y)975 1944 y Fi(com)o(binator.)i(A)o(t)e(least,)g(when)g(w)o(e)g
  880. (rewrite)h(it)f(a)975 1994 y(little)f(bit.)p 975 2024
  881. 821 2 v 975 2364 2 341 v 993 2080 a(\()p Fd(de\014ne)f
  882. Fe(Y)1039 2130 y Fi(\()p Fd(lam)o(b)q(da)g Fi(\()p Fe(le)s
  883. Fi(\))1078 2179 y(\(\()p Fd(lam)o(b)q(da)h Fi(\()p Fe(f)8
  884. b Fi(\))1133 2229 y(\()p Fe(le)17 b Fi(\()p Fd(lam)o(b)q(da)c
  885. Fi(\()p Fe(x)5 b Fi(\))14 b(\(\()p Fe(f)23 b(f)8 b Fi(\))14
  886. b Fe(x)5 b Fi(\)\)\)\))1094 2279 y(\()p Fd(lam)o(b)q(da)13
  887. b Fi(\()p Fe(f)8 b Fi(\))1133 2329 y(\()p Fe(le)17 b
  888. Fi(\()p Fd(lam)o(b)q(da)c Fi(\()p Fe(x)5 b Fi(\))14 b(\(\()p
  889. Fe(f)23 b(f)8 b Fi(\))14 b Fe(x)5 b Fi(\)\)\)\)\)\)\))p
  890. 1795 2364 V 975 2365 821 2 v 75 2426 1725 2 v 75 2427
  891. V 75 2517 a(Do)q(es)14 b(\()p Fd(de\014ne)f Fi(.)7 b(.)g(.)19
  892. b(.)7 b(.)g(.)e(\))14 b(w)o(ork)g(again?)975 2515 y(Sure,)g(no)o(w)g
  893. (that)g(w)o(e)g(kno)o(w)f(what)h(recursion)h(is.)p 75
  894. 2588 V eop
  895. %%Page: 11 10
  896. 11 9 bop 75 275 a Ff(0.1.)31 b(\()p Fe(Y)22 b(Y)8 b Ff(\))14
  897. b(W)o(ORKS!)1276 b Fi(11)p 75 391 1725 2 v 75 479 a(Do)13
  898. b(y)o(ou)h(no)o(w)f(kno)o(w)h(wh)o(y)f Fe(Y)22 b Fi(w)o(orks?)296
  899. b(Read)14 b(this)g(c)o(hapter)g(one)h(more)d(time)h(and)h(y)o(ou)975
  900. 529 y(will.)p 75 590 V 75 591 V 75 681 a(Do)q(es)g(\()p
  901. Fe(Y)22 b(Y)8 b Fi(\))14 b(w)o(ork,)f(to)q(o?)975 678
  902. y(And)h(ho)o(w)g(it)f(w)o(orks!!!)p 75 752 V eop
  903. %%Trailer
  904. end
  905. userdict /end-hook known{end-hook}if
  906. %%EOF
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement