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