$ od -c -N 50000 [_CD4_]<dragon>Modula>Modula2Fig3.sil!1
0000000    9   l 377 377  \0 206 002   P  \0 220 002   Q 016  \0 377 377
0000020   \0 344 001 342 001 004 001 351  \0  \0  \a   v   a   r       p
0000040    a   r 377 377  \0 344 001 254 001 017 001 255 016  \0 377 377
0000060  001 024 001   p 001   ; 001   y  \0  \0  \a   b   a   c   k   u
0000100    p   s 377 377 001 024  \0 362 001   S  \0 372  \0  \0 016   o
0000120    v   e   r   f   l   o   w       c   e   l   l   s  \0 377 377
0000140  001   ~ 002 006 001 177 002   6 016  \0 377 377  \0 332  \0 316
0000160   \0 333 001 031 016  \0 377 377 002 016 001   ` 002 025 001   g
0000200  006  \0 001   < 377 377 001 264  \0 370 001 273  \0 377 006  \0
0000220  001   < 377 377 001 020  \0 230 001 027  \0 237 006  \0 001   <
0000240  377 377 001 032  \0 234 001 033  \0 347 016  \0 377 377  \0 270
0000260  002   j 002 035 002   k 016  \0 377 377 001 332 002   Z 001 341
0000300  002   a 006  \0 001   > 377 377 001 202 002   2 001 211 002   9
0000320  006  \0 001   > 377 377  \0 330 002   F  \0 337 002   M 006  \0
0000340  001   > 377 377 001 022 001 376 001 031 002 005 006  \0 001   r
0000360  377 377 001   * 002 002 001   1 002  \t 006  \0 001   > 377 377
0000400  001   * 001 332 001   1 001 341 006  \0 001   > 377 377  \0 200
0000420  002  \n  \0 201 002   R 016  \0 377 377  \0 206 002   P  \0 207
0000440  002   _ 016  \0 377 377  \0   x 001 246  \0 216 001 247 016  \0
0000460  377 377  \0   x 001 246  \0   y 002   G 016  \0 377 377  \0   p
0000500  002   F  \0   x 002   G 016  \0 377 377  \0 200 002  \n  \0 216
0000520  002  \v 016  \0 377 377  \0   p 002   R  \0 201 002   S 016  \0
0000540  377 377  \0   p 002   ^  \0 206 002   _ 016  \0 377 377  \0   p
0000560  002   j  \0 216 002   k 016  \0 377 377  \0   8 002   X  \0   p
0000600  002   Y 016  \0 377 377  \0   8 002   L  \0   p 002   M 016  \0
0000620  377 377  \0   6 002   @  \0   p 002   A 016  \0 377 377  \0 210
0000640  001 242  \0 217 001 251 006  \0 001   > 377 377  \0 210 002 006
0000660   \0 217 002  \r 006  \0 001   > 377 377  \0 210 002   L  \0 217
0000700  002   S 006  \0 001   > 377 377  \0 210 002   f  \0 217 002   m
0000720  006  \0 001   > 377 377  \0   n 001 244  \0   s 001 253  \0  \0
0000740  001   L 377 377  \0 302 001 232  \0 303 002   J 016  \0 377 377
0000760   \0 312 001 214  \0 313 001 336 016  \0 377 377  \0 322 001   v
0001000   \0 323 002 006 016  \0 377 377  \0 332 001   h  \0 333 001 250
0001020  016  \0 377 377  \0 334 001 244  \0 343 001 253 006  \0 001   >
0001040  377 377  \0 334  \0 312  \0 343  \0 321 006  \0 001   > 377 377
0001060  001 016  \0   h 001 017 001 254 016  \0 377 377  \0 220  \0   6
0001100   \0 270  \0   7 016  \0 377 377  \0 020  \0   ( 002   :  \0   )
0001120  016  \0 377 377  \0 344 001 210  \0 362 001 211 016  \0 377 377
0001140   \0 344 001   |  \0 362 001   } 016  \0 377 377 001   H  \0   y
0001160  001 232  \0 202  \0  \0 023   p       e   x   t   e   r   n   a
0001200    l   l   y       c   a   l   l   e   d 377 377 001 336 002   n
0001220  002 024 002   w  \0  \0  \f   g   l   b   (   c   a   l   l   e
0001240    r   M   )  \0 377 377 001   H  \0 206 001 207  \0 217  \0  \0
0001260  016   p   1       c   a   l   l   e   d       b   y       p  \0
0001300  377 377  \0 226 002   x  \0 261 002 177  \0  \0 006   r   -   r
0001320    e   g   s  \0 377 377 001   H  \0   @ 001   t  \0   H  \0  \0
0001340   \b   M   o   d   u   l   e       M  \0 377 377 001   T  \0   N
0001360  001 233  \0   W  \0  \0  \v   P   R   O   C   E   D   U   R   E
0001400        p 377 377 001   d  \0   \ 001 257  \0   e  \0  \0  \f   P
0001420    R   O   C   E   D   U   R   E       p   1  \0 377 377  \0 020
0001440   \0   *  \0 021 002 230 016  \0 377 377  \0 020 002 210 002   :
0001460  002 211 016  \0 377 377  \0 304 002 212 001   U 002 223  \0  \0
0001500  037   F   i   g   u   r   e       3   .           R   u   n   t
0001520    i   m   e       O   r   g   a   n   i   z   a   t   i   o   n
0001540  377 377  \0 020 002 230 002   ; 002 231 016  \0 377 377 002   :
0001560   \0   * 002   ; 002 230 016  \0 377 377 001 216  \0 340 001 255
0001600   \0 351  \0  \0  \a   s   t   r   i   n   g   s 377 377 001 346
0001620  001   ( 002 005 001   1  \0  \0  \a   s   t   r   i   n   g   s
0001640  377 377 001 352 001 346 001 376 001 356  \0  \0 004   d   a   t
0001660    a  \0 377 377 001 224 001 210 001 250 001 220  \0  \0 004   d
0001700    a   t   a  \0 377 377  \0 346 002   6  \0 375 002   =  \0  \0
0001720  005   a   r   r   a   y 377 377  \0 350  \0 200 001 005  \0 210
0001740   \0  \0 006   r   e   c   o   r   d  \0 377 377  \0 354  \0 264
0001760  001 003  \0 273  \0  \0 005   a   r   r   a   y 377 377  \0   p
0002000  002   L  \0   q 002   p 016  \0 377 377  \0   6 002   p  \0   q
0002020  002   q 016  \0 377 377  \0   6 002   d  \0   p 002   e 016  \0
0002040  377 377  \0   X 002   L  \0   Y 002   p 016  \0 377 377  \0   p
0002060  002   @  \0   q 002   L 016  \0 377 377  \0   X 002   @  \0   Y
0002100  002   L 016  \0 377 377  \0   6 002   L  \0   7 002   p 016  \0
0002120  377 377  \0   6 002   @  \0   7 002   L 016  \0 377 377  \0   @
0002140  002   B  \0   M 002   J  \0  \0 002   P   C  \0 377 377  \0   @
0002160  002   N  \0   M 002   V  \0  \0 002   P   C  \0 377 377  \0   @
0002200  002   Z  \0   M 002   b  \0  \0 002   P   C  \0 377 377  \0   @
0002220  002   f  \0   M 002   n  \0  \0 002   P   C  \0 377 377  \0   ^
0002240  002   B  \0   c 002   I  \0  \0 001   L 377 377  \0   ^ 002   Z
0002260   \0   c 002   a  \0  \0 001   L 377 377  \0   ^ 002   N  \0   c
0002300  002   U  \0  \0 001   L 377 377  \0   ^ 002   f  \0   c 002   m
0002320   \0  \0 001   L 377 377 001 216 002   B 001 253 002   K  \0  \0
0002340  006   g   l   b   (   M   )  \0 377 377 001 356 001 330 001 374
0002360  001 341  \0  \0 003   g   l   b 377 377 001 226 001   z 001 244
0002400  001 203  \0  \0 003   g   l   b 377 377 001 360 001 034 001 367
0002420  001   #  \0  \0 003   l   i   t 377 377 001 232  \0 324 001 241
0002440   \0 333  \0  \0 003   l   i   t 377 377 001   8 002 024 001   P
0002460  002 035  \0  \0 006   f   r   x   (   p   )  \0 377 377  \0 350
0002500  001 264 001 006 001 275  \0  \0  \a   f   r   x   (   p   1   )
0002520  377 377  \0 350 002   *  \0 370 002   3  \0  \0 003   d   y   n
0002540  377 377  \0 236 001   .  \0 247 001   7  \0  \0 002   p   1  \0
0002560  377 377  \0 236 001 332  \0 243 001 341  \0  \0 001   p 377 377
0002600   \0 226 002   ,  \0 257 002   4  \0  \0 006   c   a   l   l   e
0002620    r  \0 377 377  \0   t 001   L  \0 202 001   R  \0  \0 003   v
0002640    a   r 377 377  \0   t 001 212  \0 203 001 221  \0  \0 003   p
0002660    a   r 377 377  \0   j 001   j  \0 212 001   s  \0  \0  \a   l
0002700    i   n   k   a   g   e 377 377  \0 270 002   ^ 001 342 002   _
0002720  016  \0 377 377 001 356 002   Z 001 371 002   a  \0  \0 003   L
0002740    i   t 377 377 001 354 002   N 001 377 002   W  \0  \0 004   F
0002760    l   a   g  \0 377 377 001 342  \0 340 001 343 002   d 016  \0
0003000  377 377 002  \f 001   d 002 034 001   e 016  \0 377 377 002  \f
0003020  002   ^ 002 034 002   _ 016  \0 377 377 001 342 002   L 002  \f
0003040  002   M 016  \0 377 377 001 342 002   X 002  \f 002   Y 016  \0
0003060  377 377 001 342 001   h 002  \f 001   j 016  \0 377 377 001 342
0003100   \0 340 002  \f  \0 341 016  \0 377 377 001 342 002   d 002  \r
0003120  002   e 016  \0 377 377 002  \f  \0 340 002  \r 002   d 016  \0
0003140  377 377 001 232 002   2 001 245 002   9  \0  \0 003   L   i   t
0003160  377 377 001   > 002 002 001   J 002  \n  \0  \0 002   S   L  \0
0003200  377 377 001 224 002   $ 001 247 002   -  \0  \0 004   F   l   a
0003220    g  \0 377 377  \0 232 002   Z  \0 255 002   a  \0  \0 003   F
0003240    R   X 377 377  \0 234 002   f  \0 250 002   n  \0  \0 002   S
0003260    L  \0 377 377  \0 312 001 336 001   2 001 337 016  \0 377 377
0003300  001   2 001 346 001   \ 001 347 016  \0 377 377 001   2 001 330
0003320  001   \ 001 331 016  \0 377 377  \0 272 001 214  \0 312 001 215
0003340  016  \0 377 377  \0 200  \0 342  \0 206  \0 352  \0  \0 001   S
0003360  377 377  \0 220  \0 340  \0 270  \0 341 016  \0 377 377  \0 220
0003400   \0 354  \0 270  \0 355 016  \0 377 377  \0 220  \0 370  \0 270
0003420   \0 371 016  \0 377 377  \0 340 002   P 001  \t 002   Q 016  \0
0003440  377 377 001  \b 002 020 001  \t 002   P 016  \0 377 377  \0 340
0003460  002 020 001  \b 002 021 016  \0 377 377  \0 340 002 020  \0 341
0003500  002   P 016  \0 377 377  \0 303 002   J  \0 340 002   K 016  \0
0003520  377 377  \0 272 001 232  \0 302 001 233 016  \0 377 377  \0   n
0003540  001 006  \0 210 001 016  \0  \0 004   L   +   1   5  \0 377 377
0003560   \0 222 001 240  \0 234 001 241 016  \0 377 377  \0 222 001 224
0003600   \0 232 001 225 016  \0 377 377  \0 222 001 210  \0 236 001 211
0003620  016  \0 377 377  \0 222 001   |  \0 232 001   } 016  \0 377 377
0003640   \0 222 001   p  \0 230 001   q 016  \0 377 377  \0 222 001   d
0003660   \0 232 001   e 016  \0 377 377  \0 220 001   X  \0 232 001   Y
0003700  016  \0 377 377  \0 222 001   L  \0 234 001   M 016  \0 377 377
0003720   \0 220 001 034  \0 234 001 035 016  \0 377 377  \0 222 001 020
0003740   \0 236 001 021 016  \0 377 377  \0 226 001 242  \0 253 001 252
0003760   \0  \0 005   c   e   l   l   0 377 377  \0 234 001   r  \0 250
0004000  001   z  \0  \0 002   S   L  \0 377 377  \0 230 001   f  \0 253
0004020  001   m  \0  \0 003   F   R   X 377 377  \0 226 001 006  \0 261
0004040  001 016  \0  \0 006   c   e   l   l   1   5  \0 377 377  \0 220
0004060  001 004  \0 222 001 254 016  \0 377 377  \0 220  \0   6  \0 221
0004100  002   p 016  \0 377 377  \0 344 001 004 001 016 001 006 016  \0
0004120  377 377  \0 344 001 020  \0 356 001 021 016  \0 377 377  \0 344
0004140  001 034  \0 362 001 035 016  \0 377 377  \0 344 001 240  \0 360
0004160  001 241 016  \0 377 377  \0 344 001 224  \0 362 001 225 016  \0
0004200  377 377  \0 344 001   p  \0 356 001   q 016  \0 377 377  \0 344
0004220  001   d  \0 356 001   e 016  \0 377 377  \0 344 001   X  \0 357
0004240  001   Y 016  \0 377 377  \0 344 001   L  \0 356 001   M 016  \0
0004260  377 377  \0 332 001 250  \0 342 001 251 016  \0 377 377  \0 352
0004300   \0 372 001 005 001 002  \0  \0 006   c   e   l   l   1   6  \0
0004320  377 377  \0 352 001 006 001  \a 001 016  \0  \0  \a   c   e   l
0004340    l   1   5   ' 377 377  \0 354 001   p 001 003 001   x  \0  \0
0004360  006   c   e   l   l   0   '  \0 377 377  \0 360 001 242  \0 376
0004400  001 252  \0  \0 003   S   L   ' 377 377  \0 344  \0   h  \0 345
0004420  001 254 016  \0 377 377 001   2 001 254 001   3 002  \f 016  \0
0004440  377 377 001 212  \0 260 001 213 002   < 016  \0 377 377  \0 270
0004460  001 232  \0 272 001 233 016  \0 377 377  \0 332  \0 316  \0 344
0004500   \0 317 016  \0 377 377  \0 270 001 030  \0 332 001 031 016  \0
0004520  377 377 001 016  \0 234 001 032  \0 235 016  \0 377 377 001 016
0004540   \0 346 001 032  \0 347 016  \0 377 377 001 264  \0 374 001 305
0004560   \0 375 016  \0 377 377 001 264 002   4 001 304 002   5 016  \0
0004600  377 377 001   ~ 002   6 001 212 002   7 016  \0 377 377 001   \
0004620  002 006 001   ~ 002  \a 016  \0 377 377 001 026 001 246 001 027
0004640  002 006 016  \0 377 377 001 016 001 246 001 026 001 247 016  \0
0004660  377 377  \0 322 002 006 001   2 002  \a 016  \0 377 377  \0 270
0004700  001   v  \0 322 001   w 016  \0 377 377  \0 270 001   h  \0 332
0004720  001   i 016  \0 377 377 001   2 002  \0 001   \ 002 001 016  \0
0004740  377 377 001 212 002   $ 001 264 002   % 016  \0 377 377 001 212
0004760  002   0 001 264 002   1 016  \0 377 377 001 212 001 004 001 264
0005000  001 006 016  \0 377 377 001 264  \0 260 001 265 002   < 016  \0
0005020  377 377 001 212  \0 260 001 264  \0 261 016  \0 377 377 001 212
0005040  002   < 001 265 002   = 016  \0 377 377 001   2 002  \f 001   ]
0005060  002  \r 016  \0 377 377 001   \ 001 254 001   ] 002  \f 016  \0
0005100  377 377 001   2 001 254 001   \ 001 255 016  \0 377 377  \0 270
0005120   \0   6  \0 271 002   p 016  \0 377 377  \0 220 002 020  \0 270
0005140  002 021 016  \0 377 377  \0 220 001 004  \0 270 001 006 016  \0
0005160  377 377  \0 220 001 254  \0 272 001 256 016  \0 377 377  \0 220
0005200  001 004  \0 270 001 005 016  \0 377 377  \0 230 001 020  \0 270
0005220  001 021 016  \0 377 377  \0 230 001 034  \0 270 001 035 016  \0
0005240  377 377  \0 230 001   L  \0 270 001   M 016  \0 377 377  \0 230
0005260  001   X  \0 270 001   Y 016  \0 377 377  \0 230 001   d  \0 270
0005300  001   e 016  \0 377 377  \0 230 001   p  \0 270 001   q 016  \0
0005320  377 377  \0 230 001   |  \0 270 001   } 016  \0 377 377  \0 230
0005340  001 210  \0 270 001 211 016  \0 377 377  \0 230 001 224  \0 270
0005360  001 225 016  \0 377 377  \0 230 001 240  \0 270 001 241 016  \0
0005400  377 377  \0 270 001 004  \0 272 001 254 016  \0 377 377  \0 220
0005420  001 254  \0 270 001 255 016  \0 377 377  \0 220 002   p  \0 271
0005440  002   q 016  \0 377 377  \0 220 002   d  \0 270 002   e 016  \0
0005460  377 377  \0 220 002   X  \0 270 002   Y 016  \0 377 377  \0 344
0005500   \0   h 001 016  \0   i 016  \0 377 377  \0 344  \0 240 001 016
0005520   \0 241 016  \0 377 377  \0 344  \0 324 001 016  \0 326 016  \0
0005540  377 377  \0 344  \0 340 001 016  \0 341 016  \0 377 377  \0 344
0005560   \0 354 001 016  \0 355 016  \0 377 377  \0 344  \0 370 001 016
0005600   \0 371 016  \0 377 377  \0 356 001 240 001 016 001 241 016  \0
0005620  377 377  \0 356 001 224 001 016 001 225 016  \0 377 377  \0 356
0005640  001 210 001 016 001 211 016  \0 377 377  \0 356 001   | 001 016
0005660  001   } 016  \0 377 377  \0 356 001   p 001 016 001   q 016  \0
0005700  377 377  \0 356 001   d 001 016 001   e 016  \0 377 377  \0 356
0005720  001   X 001 016 001   Y 016  \0 377 377  \0 356 001   L 001 016
0005740  001   M 016  \0 377 377  \0 356 001 034 001 016 001 035 016  \0
0005760  377 377  \0 356 001 020 001 016 001 021 016  \0 377 377  \0   2
0006000  002   w  \0   q 002 200  \0  \0  \r   p   r   o   c       c   o
0006020    n   t   e   x   t   s 377 377 001 212 002 030 001 264 002 031
0006040  016  \0 377 377 001 212 002  \n 001 264 002  \v 016  \0 377 377
0006060  001 212 001 374 001 264 001 375 016  \0 377 377 001 342 002   @
0006100  002  \f 002   A 016  \0 377 377 001 342 002   2 002  \f 002   3
0006120  016  \0 377 377 001 342 002   $ 002  \f 002   % 016  \0 377 377
0006140  001 212 001 356 001 264 001 357 016  \0 377 377 001 264 002 002
0006160  001 276 002 003 016  \0 377 377 001 264 001 346 001 276 001 347
0006200  016  \0 377 377 001 276 001 346 001 277 002 003 016  \0 377 377
0006220  001 304  \0 374 001 305 002   5 016  \0 377 377 001 264 001 342
0006240  001 273 001 351 006  \0 001   < 377 377 002 034 001   d 002 035
0006260  002   j 016  \0 377 377 002 024 002   Z 002 033 002   a 006  \0
0006300  001   > 377 377  \0 344 001 240 001 016 001 254 017  \0 377 377
0006320  001 342 002   L 002  \f 002   d 017  \0 377 377  \0 222 001   d
0006340   \0 270 001   | 017  \0 377 377  \0 220 002   X  \0 270 002   p
0006360  017  \0 377 377 001 212 002   $ 001 264 002   < 017  \0 377 377
0006400  001   2 002  \0 001   \ 002  \f 017  \0                        
0006412