Fonctions Numeriques (F) (1986) [Original] [UTILITAIRE] [EDUCATIF].dsk
HexaDumpAscii only
000000:  45 58 54 45 4E 44 45 44 20 43 50 43 20 44 53 4B    EXTENDED CPC DSK
000010:  20 46 69 6C 65 0D 0A 44 69 73 6B 2D 49 6E 66 6F     File..Disk-Info
000020:  0D 0A 53 41 4D 64 69 73 6B 31 30 30 36 32 30 00    ..SAMdisk100620.
000030:  28 01 00 00 13 13 13 13 13 13 13 13 13 13 13 13    (...............
000040:  13 13 13 13 13 13 13 13 13 13 13 13 13 13 13 13    ................
000050:  13 13 13 13 13 13 13 13 13 13 13 13 00 00 00 00    ................
000060:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000070:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000080:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000090:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0000A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0000B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0000C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0000D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0000E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0000F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000100:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
000110:  00 00 00 00 02 09 4E E5 00 00 41 02 00 00 00 02    ......N...A.....
000120:  00 00 42 02 00 00 00 02 00 00 43 02 00 00 00 02    ..B.......C.....
000130:  00 00 44 02 00 00 00 02 00 00 45 02 00 00 00 02    ..D.......E.....
000140:  00 00 46 02 00 00 00 02 00 00 47 02 00 00 00 02    ..F.......G.....
000150:  00 00 48 02 00 00 00 02 00 00 49 02 00 00 00 02    ..H.......I.....
000160:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000170:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000180:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000190:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0001A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0001B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0001C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0001D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0001E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0001F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000200:  11 00 03 21 00 00 06 04 CD 01 02 30 34 10 F9 CD    ...!.......04...
000210:  C5 01 20 64 11 00 0C 06 10 7E B7 28 1A E5 C5 6F    .. d.....~.(...o
000220:  26 00 CD FC 01 30 1A C1 E1 23 10 ED 21 2A 02 34    &....0...#..!*.4
000230:  D5 CD C5 01 D1 28 E0 21 00 0C 0E FF CD 9B BE 16    .....(.!........
000240:  BD 21 46 01 18 6B 0D 0A 44 69 73 63 65 74 74 65    .!F..k..Discette
000250:  20 72 65 61 64 20 66 61 69 6C 75 72 65 0D 0A 50     read failure..P
000260:  72 65 73 73 20 61 6E 79 20 6B 65 79 20 74 6F 20    ress any key to 
000270:  72 65 73 74 61 72 74 FF 21 7D 01 18 34 0D 0A 43    restart.!}..4..C
000280:  61 6E 6E 6F 74 20 66 69 6E 64 20 22 2E 45 4D 53    annot find ".EMS
000290:  22 20 66 69 6C 65 0D 0A 50 72 65 73 73 20 61 6E    " file..Press an
0002A0:  79 20 6B 65 79 20 74 6F 20 72 65 73 74 61 72 74    y key to restart
0002B0:  FF 7E 23 FE FF C4 5A BB 20 F7 CD 1B BB 38 FB CD    .~#...Z. ....8..
0002C0:  18 BB CF 00 00 21 00 03 06 40 7E E6 F0 20 22 C5    .....!...@~.. ".
0002D0:  E5 11 0D 00 19 11 2B 02 01 FF 0C 1B 1A 2B AE A1    ......+......+..
0002E0:  28 09 1A FE 3F 20 08 7E A1 12 AF 0E 7F 10 EC E1    (...? .~........
0002F0:  C1 11 10 00 19 C8 19 10 D1 F6 FF C9 29 CD 01 02    ............)...
000300:  D0 C5 E5 01 F7 FF 3E 01 3C 09 38 FC 67 7D C6 4A    ......>.<.8.g}.J
000310:  4F 2E 00 EB CD 89 BE EB E1 C1 D0 14 14 23 C9 3F    O............#.?
000320:  3F 3F 3F 3F 3F 3F 3F 45 4D 53 00 CF CF CF CF CF    ???????EMS......
000330:  CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF    ................
000340:  CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF    ................
000350:  CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF    ................
000360:  CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF    ................
000370:  CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF    ................
000380:  CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF    ................
000390:  CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF    ................
0003A0:  CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF    ................
0003B0:  CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF    ................
0003C0:  CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF    ................
0003D0:  CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF    ................
0003E0:  CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF    ................
0003F0:  CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF    ................
000400:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000410:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000420:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000430:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000440:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000450:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000460:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000470:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000480:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000490:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0004A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0004B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0004C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0004D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0004E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0004F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000500:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000510:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000520:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000530:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000540:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000550:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000560:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000570:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000580:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000590:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0005A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0005B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0005C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0005D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0005E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0005F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000600:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000610:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000620:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000630:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000640:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000650:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000660:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000670:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000680:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000690:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0006A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0006B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0006C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0006D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0006E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0006F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000700:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000710:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000720:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000730:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000740:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000750:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000760:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000770:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000780:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000790:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0007A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0007B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0007C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0007D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0007E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0007F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000800:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000810:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000820:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000830:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000840:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000850:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000860:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000870:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000880:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000890:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0008A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0008B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0008C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0008D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0008E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0008F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000900:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000910:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000920:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000930:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000940:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000950:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000960:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000970:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000980:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000990:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0009A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0009B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0009C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0009D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0009E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0009F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000A00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000A10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000A20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000A30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000A40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000A50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000A60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000A70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000A80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000A90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000AA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000AB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000AC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000AD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000AE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000AF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000B00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000B10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000B20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000B30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000B40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000B50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000B60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000B70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000B80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000B90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000BA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000BB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000BC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000BD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000BE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000BF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000C00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000C10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000C20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000C30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000C40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000C50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000C60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000C70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000C80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000C90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000CA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000CB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000CC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000CD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000CE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000CF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000D00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000D10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000D20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000D30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000D40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000D50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000D60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000D70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000D80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000D90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000DA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000DB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000DC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000DD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000DE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000DF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000EA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000EB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000EC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000ED0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000EE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000EF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000FA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000FB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000FC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000FD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000FE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000FF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001000:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001010:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001020:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001030:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001040:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001050:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001060:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001070:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001080:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001090:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0010A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0010B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0010C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0010D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0010E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0010F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001100:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001110:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001120:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001130:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001140:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001150:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001160:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001170:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001180:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001190:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0011A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0011B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0011C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0011D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0011E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0011F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001200:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001210:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001220:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001230:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001240:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001250:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001260:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001270:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001280:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001290:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0012A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0012B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0012C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0012D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0012E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0012F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001300:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001310:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001320:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001330:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001340:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001350:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001360:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001370:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001380:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001390:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0013A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0013B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0013C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0013D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0013E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0013F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001400:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
001410:  01 00 00 00 02 09 4E E5 01 00 41 02 00 00 00 02    ......N...A.....
001420:  01 00 42 02 00 00 00 02 01 00 43 02 00 00 00 02    ..B.......C.....
001430:  01 00 44 02 00 00 00 02 01 00 45 02 00 00 00 02    ..D.......E.....
001440:  01 00 46 02 00 00 00 02 01 00 47 02 00 00 00 02    ..F.......G.....
001450:  01 00 48 02 00 00 00 02 01 00 49 02 00 00 00 02    ..H.......I.....
001460:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
001470:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
001480:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
001490:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0014A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0014B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0014C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0014D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0014E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0014F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
001500:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001510:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001520:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001530:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001540:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001550:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001560:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001570:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001580:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001590:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0015A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0015B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0015C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0015D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0015E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0015F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001600:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001610:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001620:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001630:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001640:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001650:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001660:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001670:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001680:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001690:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0016A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0016B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0016C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0016D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0016E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0016F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001700:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001710:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001720:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001730:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001740:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001750:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001760:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001770:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001780:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001790:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0017A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0017B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0017C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0017D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0017E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0017F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001800:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001810:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001820:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001830:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001840:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001850:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001860:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001870:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001880:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001890:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0018A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0018B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0018C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0018D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0018E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0018F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001900:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001910:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001920:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001930:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001940:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001950:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001960:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001970:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001980:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001990:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0019A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0019B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0019C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0019D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0019E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0019F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001A00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001A10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001A20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001A30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001A40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001A50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001A60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001A70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001A80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001A90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001AA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001AB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001AC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001AD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001AE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001AF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001B00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001B10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001B20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001B30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001B40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001B50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001B60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001B70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001B80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001B90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001BA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001BB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001BC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001BD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001BE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001BF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001C00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001C10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001C20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001C30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001C40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001C50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001C60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001C70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001C80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001C90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001CA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001CB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001CC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001CD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001CE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001CF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001D00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001D10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001D20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001D30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001D40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001D50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001D60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001D70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001D80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001D90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001DA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001DB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001DC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001DD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001DE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001DF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001E00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001E10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001E20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001E30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001E40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001E50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001E60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001E70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001E80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001E90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001EA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001EB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001EC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001ED0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001EE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001EF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001F00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001F10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001F20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001F30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001F40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001F50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001F60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001F70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001F80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001F90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001FA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001FB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001FC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001FD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001FE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001FF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002000:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002010:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002020:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002030:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002040:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002050:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002060:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002070:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002080:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002090:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0020A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0020B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0020C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0020D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0020E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0020F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002100:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002110:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002120:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002130:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002140:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002150:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002160:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002170:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002180:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002190:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0021A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0021B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0021C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0021D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0021E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0021F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002200:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002210:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002220:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002230:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002240:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002250:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002260:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002270:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002280:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002290:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0022A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0022B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0022C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0022D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0022E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0022F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002300:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002310:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002320:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002330:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002340:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002350:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002360:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002370:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002380:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002390:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0023A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0023B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0023C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0023D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0023E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0023F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002400:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002410:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002420:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002430:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002440:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002450:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002460:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002470:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002480:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002490:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0024A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0024B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0024C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0024D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0024E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0024F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002500:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002510:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002520:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002530:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002540:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002550:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002560:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002570:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002580:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002590:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0025A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0025B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0025C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0025D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0025E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0025F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002600:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002610:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002620:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002630:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002640:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002650:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002660:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002670:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002680:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002690:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0026A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0026B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0026C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0026D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0026E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0026F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002700:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
002710:  02 00 00 00 02 09 4E E5 02 00 41 02 00 00 00 02    ......N...A.....
002720:  02 00 42 02 00 00 00 02 02 00 43 02 00 00 00 02    ..B.......C.....
002730:  02 00 44 02 00 00 00 02 02 00 45 02 00 00 00 02    ..D.......E.....
002740:  02 00 46 02 00 00 00 02 02 00 47 02 00 00 00 02    ..F.......G.....
002750:  02 00 48 02 00 00 00 02 02 00 49 02 00 00 00 02    ..H.......I.....
002760:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
002770:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
002780:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
002790:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0027A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0027B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0027C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0027D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0027E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0027F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
002800:  00 4C 49 52 45 46 4F 4E 43 50 41 53 00 00 00 23    .LIREFONCPAS...#
002810:  02 03 04 05 06 00 00 00 00 00 00 00 00 00 00 00    ................
002820:  00 53 4F 55 52 43 45 53 20 44 4F 43 00 00 00 24    .SOURCES DOC...$
002830:  07 08 09 0A 0C 00 00 00 00 00 00 00 00 00 00 00    ................
002840:  00 47 52 41 46 49 4B 33 20 49 4E 43 00 00 00 0B    .GRAFIK3 INC....
002850:  12 13 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
002860:  00 43 4F 55 52 42 45 20 20 43 4F 4D 00 00 00 80    .COURBE  COM....
002870:  14 15 16 17 18 19 1A 1B 3C 3D 3E 3F 40 41 42 45    ........<=>?@ABE
002880:  00 44 45 52 49 56 45 45 20 50 41 53 00 00 00 3A    .DERIVEE PAS...:
002890:  1C 1D 1E 1F 20 21 22 23 00 00 00 00 00 00 00 00    .... !"#........
0028A0:  E5 43 41 4C 43 55 4C 46 20 42 41 4B 00 00 00 60    .CALCULF BAK...`
0028B0:  0D 0E 0F 10 11 2C 2D 2E 2F 4C 4D 7D 00 00 00 00    .....,-./LM}....
0028C0:  00 46 4F 4E 43 54 49 4F 4E 43 4F 4D 00 00 00 80    .FONCTIONCOM....
0028D0:  24 25 26 27 28 29 2A 2B 30 31 32 33 34 36 37 38    $%&'()*+01234678
0028E0:  00 45 43 52 49 46 20 20 20 50 41 53 00 00 00 0A    .ECRIF   PAS....
0028F0:  0B 35 00 00 00 00 00 00 00 00 00 00 00 00 00 00    .5..............
002900:  00 47 52 41 50 48 45 46 20 50 41 53 00 00 00 2D    .GRAPHEF PAS...-
002910:  43 67 68 69 6A 76 00 00 00 00 00 00 00 00 00 00    Cghijv..........
002920:  00 46 4F 4E 43 54 49 4F 4E 50 41 53 00 00 00 06    .FONCTIONPAS....
002930:  44 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    D...............
002940:  00 46 4F 4E 43 54 49 4F 4E 43 4F 4D 01 00 00 80    .FONCTIONCOM....
002950:  39 59 5A 5B 5C 5D 5E 5F 60 61 62 63 7E 7F 80 81    9YZ[\]^_`abc~...
002960:  00 43 4F 55 52 42 45 20 20 43 4F 4D 01 00 00 46    .COURBE  COM...F
002970:  46 47 48 49 4A 4B 64 65 66 00 00 00 00 00 00 00    FGHIJKdef.......
002980:  00 43 41 4C 43 55 4C 46 20 50 41 53 00 00 00 60    .CALCULF PAS...`
002990:  3A 3B 4F 50 51 52 53 54 55 56 57 58 00 00 00 00    :;OPQRSTUVWX....
0029A0:  00 46 4F 4E 43 54 49 4F 4E 43 4F 4D 02 00 00 41    .FONCTIONCOM...A
0029B0:  82 83 84 85 86 87 88 89 8A 00 00 00 00 00 00 00    ................
0029C0:  00 41 4C 47 45 42 52 45 20 50 41 53 00 00 00 55    .ALGEBRE PAS...U
0029D0:  6B 6C 6D 6E 6F 70 71 72 73 74 75 00 00 00 00 00    klmnopqrstu.....
0029E0:  00 4D 45 4E 55 20 20 20 20 50 41 53 00 00 00 26    .MENU    PAS...&
0029F0:  77 79 7A 7B 7C 00 00 00 00 00 00 00 00 00 00 00    wyz{|...........
002A00:  00 43 4F 55 52 42 45 20 20 50 41 53 00 00 00 06    .COURBE  PAS....
002A10:  78 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    x...............
002A20:  E5 43 41 4C 43 55 4C 46 20 42 41 4B 00 00 00 5F    .CALCULF BAK..._
002A30:  84 85 86 87 88 89 8A 8B 8C 8D 8E 8F 00 00 00 00    ................
002A40:  E5 4D 45 4E 55 20 20 20 20 43 4F 4D 00 00 00 43    .MENU    COM...C
002A50:  90 91 92 93 94 95 96 97 98 00 00 00 00 00 00 00    ................
002A60:  E5 45 43 52 49 46 20 20 20 42 41 4B 00 00 00 0A    .ECRIF   BAK....
002A70:  99 9A 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
002A80:  E5 47 52 41 50 48 45 46 20 42 41 4B 00 00 00 2B    .GRAPHEF BAK...+
002A90:  9B 9C 9D 9E 9F A7 00 00 00 00 00 00 00 00 00 00    ................
002AA0:  00 41 2D 4C 49 52 45 20 20 44 4F 43 00 00 00 3A    .A-LIRE  DOC...:
002AB0:  4E A0 A1 A2 A3 A4 A5 A6 00 00 00 00 00 00 00 00    N...£...........
002AC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002AD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002AE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002AF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002B00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002B10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002B20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002B30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002B40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002B50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002B60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002B70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002B80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002B90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002BA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002BB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002BC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002BD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002BE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002BF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002C00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002C10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002C20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002C30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002C40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002C50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002C60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002C70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002C80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002C90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002CA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002CB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002CC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002CD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002CE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002CF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002D00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002D10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002D20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002D30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002D40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002D50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002D60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002D70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002D80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002D90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002DA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002DB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002DC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002DD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002DE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002DF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002E00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002E10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002E20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002E30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002E40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002E50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002E60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002E70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002E80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002E90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002EA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002EB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002EC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002ED0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002EE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002EF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002F00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002F10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002F20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002F30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002F40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002F50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002F60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002F70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002F80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002F90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002FA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002FB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002FC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002FD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002FE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
002FF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003000:  0D 0A 70 72 6F 63 65 64 75 72 65 20 20 6C 69 72    ..procedure  lir
003010:  66 6F 6E 63 74 69 6F 6E 28 76 61 72 20 66 3A 66    fonction(var f:f
003020:  6F 6E 63 74 69 6F 6E 29 3B 0D 0A 66 6F 72 77 61    onction);..forwa
003030:  72 64 3B 0D 0A 70 72 6F 63 65 64 75 72 65 20 20    rd;..procedure  
003040:  72 65 6C 61 63 68 65 28 76 61 72 20 66 3A 66 6F    relache(var f:fo
003050:  6E 63 74 69 6F 6E 29 3B 0D 0A 62 65 67 69 6E 0D    nction);..begin.
003060:  0A 20 69 66 20 66 3C 3E 6E 69 6C 20 74 68 65 6E    . if f<>nil then
003070:  20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20     begin..        
003080:  20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 73                 dis
003090:  70 6F 73 65 28 66 29 3B 66 3A 3D 6E 69 6C 3B 6D    pose(f);f:=nil;m
0030A0:  5B 69 5D 3A 3D 30 3B 0D 0A 20 20 20 20 20 20 20    [i]:=0;..       
0030B0:  20 20 20 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A              end;..
0030C0:  65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 72    end;....procedur
0030D0:  65 20 65 72 72 65 75 72 28 6E 6F 65 3A 69 6E 74    e erreur(noe:int
0030E0:  65 67 65 72 29 3B 0D 0A 0D 0A 20 62 65 67 69 6E    eger);.... begin
0030F0:  0D 0A 20 77 72 69 74 65 6C 6E 3B 77 72 69 74 65    .. writeln;write
003100:  28 27 45 72 72 65 75 72 20 64 65 20 73 79 6E 74    ('Erreur de synt
003110:  61 78 65 20 61 20 6C 27 27 65 6E 74 72 65 65 20    axe a l''entree 
003120:  6E 2E 27 29 3B 77 72 69 74 65 6C 6E 28 6E 6F 65    n.');writeln(noe
003130:  29 3B 0D 0A 20 72 65 6C 61 63 68 65 28 66 5B 69    );.. relache(f[i
003140:  5D 29 3B 0D 0A 20 6C 69 72 66 6F 6E 63 74 69 6F    ]);.. lirfonctio
003150:  6E 28 66 5B 69 5D 29 3B 0D 0A 20 65 6E 64 3B 0D    n(f[i]);.. end;.
003160:  0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 20 6C 69    ...procedure  li
003170:  72 63 61 72 3B 0D 0A 20 20 62 65 67 69 6E 0D 0A    rcar;..  begin..
003180:  20 20 72 65 70 65 61 74 0D 0A 20 20 20 20 72 65      repeat..    re
003190:  61 64 28 6B 62 64 2C 63 61 72 29 3B 0D 0A 20 20    ad(kbd,car);..  
0031A0:  75 6E 74 69 6C 20 28 28 63 61 72 20 69 6E 20 66    until ((car in f
0031B0:  69 6C 74 72 65 29 20 6F 72 20 28 63 61 72 3D 63    iltre) or (car=c
0031C0:  68 72 28 31 33 29 29 29 3B 0D 0A 20 20 77 72 69    hr(13)));..  wri
0031D0:  74 65 20 28 63 61 72 29 3B 0D 0A 20 20 65 6E 64    te (car);..  end
0031E0:  3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 6C    ;....procedure l
0031F0:  69 72 6E 61 74 75 72 65 6C 3B 0D 0A 20 62 65 67    irnaturel;.. beg
003200:  69 6E 0D 0A 20 6C 69 72 63 61 72 3B 0D 0A 20 69    in.. lircar;.. i
003210:  64 66 3A 3D 63 61 72 3B 0D 0A 20 77 68 69 6C 65    df:=car;.. while
003220:  20 28 28 63 61 72 20 69 6E 20 5B 27 30 27 2E 2E     ((car in ['0'..
003230:  27 39 27 5D 29 20 61 6E 64 20 28 6C 65 6E 67 74    '9']) and (lengt
003240:  68 28 69 64 66 29 3C 36 29 29 20 64 6F 0D 0A 20    h(idf)<6)) do.. 
003250:  20 20 62 65 67 69 6E 0D 0A 20 20 20 6C 69 72 63      begin..   lirc
003260:  61 72 3B 0D 0A 20 20 20 69 64 66 3A 3D 69 64 66    ar;..   idf:=idf
003270:  2B 63 61 72 3B 0D 0A 20 20 20 65 6E 64 3B 0D 0A    +car;..   end;..
003280:  20 69 64 66 3A 3D 63 6F 70 79 28 69 64 66 2C 31     idf:=copy(idf,1
003290:  2C 6C 65 6E 67 74 68 28 69 64 66 29 2D 31 29 3B    ,length(idf)-1);
0032A0:  0D 0A 20 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65    .. end;....proce
0032B0:  64 75 72 65 20 6C 69 72 70 61 72 61 28 76 61 72    dure lirpara(var
0032C0:  20 66 3A 66 6F 6E 63 74 69 6F 6E 29 3B 0D 0A 76     f:fonction);..v
0032D0:  61 72 20 69 6E 64 78 3A 69 6E 74 65 67 65 72 3B    ar indx:integer;
0032E0:  0D 0A 20 62 65 67 69 6E 0D 0A 20 6C 69 72 63 61    .. begin.. lirca
0032F0:  72 3B 0D 0A 20 69 66 20 63 61 72 20 3C 3E 27 28    r;.. if car <>'(
003300:  27 20 74 68 65 6E 20 65 72 72 65 75 72 28 31 29    ' then erreur(1)
003310:  0D 0A 20 20 20 65 6C 73 65 0D 0A 20 20 20 62 65    ..   else..   be
003320:  67 69 6E 0D 0A 20 20 20 20 20 6C 69 72 6E 61 74    gin..     lirnat
003330:  75 72 65 6C 3B 0D 0A 20 20 20 20 20 69 66 20 63    urel;..     if c
003340:  61 72 3C 3E 27 29 27 20 74 68 65 6E 20 65 72 72    ar<>')' then err
003350:  65 75 72 28 32 29 0D 0A 20 20 20 20 20 65 6C 73    eur(2)..     els
003360:  65 0D 0A 20 20 20 20 20 20 62 65 67 69 6E 0D 0A    e..      begin..
003370:  20 20 20 20 20 20 20 66 5E 2E 6E 61 74 75 72 65           f^.nature
003380:  3A 3D 27 70 61 72 61 6D 27 3B 0D 0A 20 20 20 20    :='param';..    
003390:  20 20 20 66 5E 2E 76 61 6C 65 75 72 3A 3D 69 64       f^.valeur:=id
0033A0:  66 3B 0D 0A 20 20 20 20 20 20 20 66 5E 2E 64 3A    f;..       f^.d:
0033B0:  3D 6E 69 6C 3B 0D 0A 20 20 20 20 20 20 20 66 5E    =nil;..       f^
0033C0:  2E 67 3A 3D 6E 69 6C 3B 0D 0A 20 20 20 20 20 20    .g:=nil;..      
0033D0:  20 76 61 6C 28 69 64 66 2C 69 6E 64 78 2C 72 65     val(idf,indx,re
0033E0:  73 75 6C 74 29 3B 0D 0A 20 20 20 20 20 20 20 69    sult);..       i
0033F0:  66 20 6D 5B 69 5D 3C 69 6E 64 78 20 74 68 65 6E    f m[i]<indx then
003400:  20 6D 5B 69 5D 3A 3D 69 6E 64 78 3B 0D 0A 20 20     m[i]:=indx;..  
003410:  20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 65 6E 64        end;..   end
003420:  3B 0D 0A 20 6C 69 72 63 61 72 3B 0D 0A 20 65 6E    ;.. lircar;.. en
003430:  64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20    d;....procedure 
003440:  6C 69 72 78 28 76 61 72 20 66 3A 66 6F 6E 63 74    lirx(var f:fonct
003450:  69 6F 6E 29 3B 0D 0A 20 62 65 67 69 6E 0D 0A 20    ion);.. begin.. 
003460:  66 5E 2E 6E 61 74 75 72 65 3A 3D 27 76 61 72 69    f^.nature:='vari
003470:  61 62 27 3B 0D 0A 20 66 5E 2E 76 61 6C 65 75 72    ab';.. f^.valeur
003480:  3A 3D 27 78 27 3B 0D 0A 20 66 5E 2E 64 3A 3D 6E    :='x';.. f^.d:=n
003490:  69 6C 3B 0D 0A 20 66 5E 2E 67 3A 3D 6E 69 6C 3B    il;.. f^.g:=nil;
0034A0:  0D 0A 20 6C 69 72 63 61 72 3B 0D 0A 20 65 6E 64    .. lircar;.. end
0034B0:  3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 6C    ;....procedure l
0034C0:  69 72 65 78 70 28 76 61 72 20 66 3A 66 6F 6E 63    irexp(var f:fonc
0034D0:  74 69 6F 6E 29 3B 0D 0A 66 6F 72 77 61 72 64 3B    tion);..forward;
0034E0:  0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 6C 69    ....procedure li
0034F0:  72 69 64 66 63 74 28 76 61 72 20 66 3A 66 6F 6E    ridfct(var f:fon
003500:  63 74 69 6F 6E 29 3B 0D 0A 20 62 65 67 69 6E 0D    ction);.. begin.
003510:  0A 20 69 64 66 3A 3D 63 61 72 3B 0D 0A 20 77 68    . idf:=car;.. wh
003520:  69 6C 65 20 28 28 63 61 72 20 69 6E 20 5B 27 61    ile ((car in ['a
003530:  27 2E 2E 27 7A 27 5D 29 20 61 6E 64 20 28 6C 65    '..'z']) and (le
003540:  6E 67 74 68 28 69 64 66 29 3C 37 29 29 20 64 6F    ngth(idf)<7)) do
003550:  0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 6C 69 72    ..  begin..  lir
003560:  63 61 72 3B 0D 0A 20 20 69 64 66 3A 3D 69 64 66    car;..  idf:=idf
003570:  2B 63 61 72 3B 0D 0A 20 20 65 6E 64 3B 0D 0A 20    +car;..  end;.. 
003580:  69 64 66 3A 3D 63 6F 70 79 28 69 64 66 2C 31 2C    idf:=copy(idf,1,
003590:  6C 65 6E 67 74 68 28 69 64 66 29 2D 31 29 3B 0D    length(idf)-1);.
0035A0:  0A 20 69 66 20 28 28 69 64 66 3D 27 73 69 6E 27    . if ((idf='sin'
0035B0:  29 6F 72 28 69 64 66 3D 27 63 6F 73 27 29 6F 72    )or(idf='cos')or
0035C0:  28 69 64 66 3D 27 74 61 6E 67 27 29 6F 72 28 69    (idf='tang')or(i
0035D0:  64 66 3D 27 65 78 70 27 29 6F 72 28 69 64 66 3D    df='exp')or(idf=
0035E0:  27 6C 6E 27 29 6F 72 0D 0A 20 28 69 64 66 3D 27    'ln')or.. (idf='
0035F0:  61 72 63 74 61 6E 27 29 6F 72 28 69 64 66 3D 27    arctan')or(idf='
003600:  69 6E 74 27 29 6F 72 28 69 64 66 3D 27 61 62 73    int')or(idf='abs
003610:  27 29 6F 72 28 69 64 66 3D 27 73 71 72 74 27 29    ')or(idf='sqrt')
003620:  6F 72 28 69 64 66 3D 27 73 68 27 29 6F 72 28 69    or(idf='sh')or(i
003630:  64 66 3D 27 63 68 27 29 0D 0A 20 6F 72 28 69 64    df='ch').. or(id
003640:  66 3D 27 74 68 27 29 6F 72 28 69 64 66 3D 27 61    f='th')or(idf='a
003650:  72 63 73 69 6E 27 29 6F 72 28 69 64 66 3D 27 61    rcsin')or(idf='a
003660:  72 63 63 6F 73 27 29 29 0D 0A 20 74 68 65 6E 0D    rccos')).. then.
003670:  0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20    .    begin..    
003680:  20 66 5E 2E 6E 61 74 75 72 65 3A 3D 27 69 64 66     f^.nature:='idf
003690:  63 74 27 3B 0D 0A 20 20 20 20 20 66 5E 2E 76 61    ct';..     f^.va
0036A0:  6C 65 75 72 3A 3D 69 64 66 3B 0D 0A 20 20 20 20    leur:=idf;..    
0036B0:  20 66 5E 2E 67 3A 3D 6E 69 6C 3B 0D 0A 20 20 20     f^.g:=nil;..   
0036C0:  20 20 69 66 20 63 61 72 3D 27 28 27 20 74 68 65      if car='(' the
0036D0:  6E 0D 0A 20 20 20 20 20 20 20 20 20 62 65 67 69    n..         begi
0036E0:  6E 0D 0A 20 20 20 20 20 20 20 20 20 6C 69 72 63    n..         lirc
0036F0:  61 72 3B 0D 0A 20 20 20 20 20 20 20 20 20 6C 69    ar;..         li
003700:  72 65 78 70 28 66 5E 2E 64 29 3B 0D 0A 20 20 20    rexp(f^.d);..   
003710:  20 20 20 20 20 20 69 66 20 63 61 72 3C 3E 27 29          if car<>')
003720:  27 20 74 68 65 6E 20 65 72 72 65 75 72 28 33 29    ' then erreur(3)
003730:  20 65 6C 73 65 20 6C 69 72 63 61 72 0D 0A 20 20     else lircar..  
003740:  20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20           end..    
003750:  20 20 20 65 6C 73 65 20 65 72 72 65 75 72 28 34       else erreur(4
003760:  29 0D 0A 20 20 20 20 65 6E 64 0D 0A 20 20 20 20    )..    end..    
003770:  65 6C 73 65 0D 0A 20 20 20 20 62 65 67 69 6E 0D    else..    begin.
003780:  0A 20 20 20 20 65 72 72 65 75 72 28 35 29 3B 0D    .    erreur(5);.
003790:  0A 20 20 20 20 65 6E 64 0D 0A 65 6E 64 3B 0D 0A    .    end..end;..
0037A0:  0D 0A 70 72 6F 63 65 64 75 72 65 20 6C 69 72 66    ..procedure lirf
0037B0:  61 63 74 65 75 72 28 76 61 72 20 66 3A 66 6F 6E    acteur(var f:fon
0037C0:  63 74 69 6F 6E 29 3B 0D 0A 66 6F 72 77 61 72 64    ction);..forward
0037D0:  3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 20    ;....procedure  
0037E0:  6C 69 72 70 75 69 73 73 61 6E 63 65 28 76 61 72    lirpuissance(var
0037F0:  20 66 3A 66 6F 6E 63 74 69 6F 6E 29 3B 0D 0A 76     f:fonction);..v
003800:  61 72 0D 0A 68 3A 66 6F 6E 63 74 69 6F 6E 3B 0D    ar..h:fonction;.
003810:  0A 20 20 62 65 67 69 6E 0D 0A 20 20 6E 65 77 28    .  begin..  new(
003820:  68 29 3B 68 5E 2E 67 3A 3D 66 3B 66 3A 3D 68 3B    h);h^.g:=f;f:=h;
003830:  0D 0A 20 20 66 5E 2E 6E 61 74 75 72 65 3A 3D 27    ..  f^.nature:='
003840:  70 75 69 73 73 27 3B 0D 0A 20 20 66 5E 2E 76 61    puiss';..  f^.va
003850:  6C 65 75 72 3A 3D 27 5E 27 3B 0D 0A 20 20 6E 65    leur:='^';..  ne
003860:  77 28 66 5E 2E 64 29 3B 0D 0A 20 20 6C 69 72 63    w(f^.d);..  lirc
003870:  61 72 3B 0D 0A 20 20 6C 69 72 66 61 63 74 65 75    ar;..  lirfacteu
003880:  72 28 66 5E 2E 64 29 3B 0D 0A 20 20 65 6E 64 3B    r(f^.d);..  end;
003890:  0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 6C 69    ....procedure li
0038A0:  72 6E 6F 6D 62 72 65 28 76 61 72 20 66 3A 66 6F    rnombre(var f:fo
0038B0:  6E 63 74 69 6F 6E 29 3B 0D 0A 76 61 72 20 6E 62    nction);..var nb
0038C0:  72 65 3A 72 65 61 6C 3B 0D 0A 20 62 65 67 69 6E    re:real;.. begin
0038D0:  0D 0A 20 69 64 66 3A 3D 63 61 72 3B 63 61 72 3A    .. idf:=car;car:
0038E0:  3D 27 30 27 3B 0D 0A 20 77 68 69 6C 65 20 28 28    ='0';.. while ((
0038F0:  63 61 72 20 69 6E 20 5B 27 30 27 2E 2E 27 39 27    car in ['0'..'9'
003900:  5D 29 20 61 6E 64 20 28 6C 65 6E 67 74 68 28 69    ]) and (length(i
003910:  64 66 29 3C 31 30 29 29 20 64 6F 0D 0A 20 20 20    df)<10)) do..   
003920:  62 65 67 69 6E 0D 0A 20 20 20 6C 69 72 63 61 72    begin..   lircar
003930:  3B 0D 0A 20 20 20 69 64 66 3A 3D 69 64 66 2B 63    ;..   idf:=idf+c
003940:  61 72 3B 0D 0A 20 20 20 65 6E 64 3B 0D 0A 20 20    ar;..   end;..  
003950:  69 66 20 63 61 72 3D 27 2E 27 20 74 68 65 6E 20    if car='.' then 
003960:  62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20    begin..         
003970:  20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 72                 car
003980:  3A 3D 27 30 27 3B 0D 0A 20 20 20 20 20 20 20 20    :='0';..        
003990:  20 20 20 20 20 20 20 20 20 20 20 77 68 69 6C 65               while
0039A0:  20 28 28 63 61 72 20 69 6E 20 5B 27 30 27 2E 2E     ((car in ['0'..
0039B0:  27 39 27 5D 29 20 61 6E 64 20 28 6C 65 6E 67 74    '9']) and (lengt
0039C0:  68 28 69 64 66 29 3C 31 30 29 29 20 64 6F 0D 0A    h(idf)<10)) do..
0039D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0039E0:  20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20          begin..   
0039F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003A00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
003A10:  03 00 00 00 02 09 4E E5 03 00 41 02 00 00 00 02    ......N...A.....
003A20:  03 00 42 02 00 00 00 02 03 00 43 02 00 00 00 02    ..B.......C.....
003A30:  03 00 44 02 00 00 00 02 03 00 45 02 00 00 00 02    ..D.......E.....
003A40:  03 00 46 02 00 00 00 02 03 00 47 02 00 00 00 02    ..F.......G.....
003A50:  03 00 48 02 00 00 00 02 03 00 49 02 00 00 00 02    ..H.......I.....
003A60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003A70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003A80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003A90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003AA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003AB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003AC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003AD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003AE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003AF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003B00:  20 20 20 6C 69 72 63 61 72 3B 0D 0A 20 20 20 20       lircar;..    
003B10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003B20:  20 20 69 64 66 3A 3D 69 64 66 2B 63 61 72 3B 0D      idf:=idf+car;.
003B30:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
003B40:  20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20           end;..   
003B50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003B60:  65 6E 64 3B 0D 0A 20 20 69 64 66 3A 3D 63 6F 70    end;..  idf:=cop
003B70:  79 28 69 64 66 2C 31 2C 6C 65 6E 67 74 68 28 69    y(idf,1,length(i
003B80:  64 66 29 2D 31 29 3B 0D 0A 20 20 76 61 6C 28 69    df)-1);..  val(i
003B90:  64 66 2C 6E 62 72 65 2C 72 65 73 75 6C 74 29 3B    df,nbre,result);
003BA0:  0D 0A 20 20 69 66 20 72 65 73 75 6C 74 3C 3E 30    ..  if result<>0
003BB0:  20 74 68 65 6E 20 65 72 72 65 75 72 28 36 29 0D     then erreur(6).
003BC0:  0A 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20    .    else..     
003BD0:  62 65 67 69 6E 0D 0A 20 20 20 20 20 66 5E 2E 6E    begin..     f^.n
003BE0:  61 74 75 72 65 3A 3D 27 6E 6F 6D 62 72 65 27 3B    ature:='nombre';
003BF0:  0D 0A 20 20 20 20 20 66 5E 2E 76 61 6C 65 75 72    ..     f^.valeur
003C00:  3A 3D 69 64 66 3B 0D 0A 20 20 20 20 20 66 5E 2E    :=idf;..     f^.
003C10:  64 3A 3D 6E 69 6C 3B 0D 0A 20 20 20 20 20 66 5E    d:=nil;..     f^
003C20:  2E 67 3A 3D 6E 69 6C 3B 0D 0A 20 20 20 20 20 65    .g:=nil;..     e
003C30:  6E 64 3B 0D 0A 20 20 65 6E 64 3B 0D 0A 0D 0A 70    nd;..  end;....p
003C40:  72 6F 63 65 64 75 72 65 20 20 6C 69 72 66 61 63    rocedure  lirfac
003C50:  74 65 75 72 3B 0D 0A 20 62 65 67 69 6E 0D 0A 20    teur;.. begin.. 
003C60:  20 20 20 63 61 73 65 20 63 61 72 20 6F 66 0D 0A       case car of..
003C70:  20 20 20 20 27 70 27 3A 20 20 6C 69 72 70 61 72        'p':  lirpar
003C80:  61 28 66 29 3B 0D 0A 20 20 20 20 27 78 27 3A 20    a(f);..    'x': 
003C90:  20 6C 69 72 78 28 66 29 3B 0D 0A 20 20 20 20 27     lirx(f);..    '
003CA0:  28 27 3A 20 20 62 65 67 69 6E 0D 0A 20 20 20 20    (':  begin..    
003CB0:  20 20 20 20 20 20 6C 69 72 63 61 72 3B 0D 0A 20          lircar;.. 
003CC0:  20 20 20 20 20 20 20 20 20 6C 69 72 65 78 70 28             lirexp(
003CD0:  66 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 69    f);..          i
003CE0:  66 20 63 61 72 3C 3E 27 29 27 20 74 68 65 6E 20    f car<>')' then 
003CF0:  65 72 72 65 75 72 28 37 29 20 65 6C 73 65 20 6C    erreur(7) else l
003D00:  69 72 63 61 72 3B 0D 0A 20 20 20 20 20 20 20 20    ircar;..        
003D10:  20 20 65 6E 64 3B 0D 0A 20 20 20 20 27 2B 27 2C      end;..    '+',
003D20:  27 2D 27 2C 27 30 27 2E 2E 27 39 27 3A 20 6C 69    '-','0'..'9': li
003D30:  72 6E 6F 6D 62 72 65 28 66 29 3B 0D 0A 20 20 20    rnombre(f);..   
003D40:  20 27 61 27 2E 2E 27 77 27 2C 27 79 27 2C 27 7A     'a'..'w','y','z
003D50:  27 3A 20 6C 69 72 69 64 66 63 74 28 66 29 3B 0D    ': liridfct(f);.
003D60:  0A 20 20 65 6C 73 65 0D 0A 20 20 20 20 65 72 72    .  else..    err
003D70:  65 75 72 28 38 29 3B 0D 0A 20 20 20 20 65 6E 64    eur(8);..    end
003D80:  3B 0D 0A 20 20 20 20 77 68 69 6C 65 20 63 61 72    ;..    while car
003D90:  3D 27 5E 27 20 64 6F 20 6C 69 72 70 75 69 73 73    ='^' do lirpuiss
003DA0:  61 6E 63 65 28 66 29 3B 0D 0A 20 65 6E 64 3B 0D    ance(f);.. end;.
003DB0:  0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 20 6C 69    ...procedure  li
003DC0:  72 74 65 72 6D 65 28 76 61 72 20 66 3A 66 6F 6E    rterme(var f:fon
003DD0:  63 74 69 6F 6E 29 3B 0D 0A 76 61 72 0D 0A 68 3A    ction);..var..h:
003DE0:  66 6F 6E 63 74 69 6F 6E 3B 0D 0A 20 20 62 65 67    fonction;..  beg
003DF0:  69 6E 0D 0A 20 20 20 20 6C 69 72 66 61 63 74 65    in..    lirfacte
003E00:  75 72 28 66 29 3B 0D 0A 20 20 20 20 77 68 69 6C    ur(f);..    whil
003E10:  65 20 63 61 72 20 69 6E 20 5B 27 2A 27 2C 27 2F    e car in ['*','/
003E20:  27 5D 20 64 6F 0D 0A 20 20 20 62 65 67 69 6E 0D    '] do..   begin.
003E30:  0A 20 20 20 20 6E 65 77 28 68 29 3B 68 5E 2E 67    .    new(h);h^.g
003E40:  3A 3D 66 3B 66 3A 3D 68 3B 0D 0A 20 20 20 20 69    :=f;f:=h;..    i
003E50:  66 20 63 61 72 3D 27 2A 27 20 74 68 65 6E 20 66    f car='*' then f
003E60:  5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75 6C 74 69    ^.nature:='multi
003E70:  27 20 65 6C 73 65 20 66 5E 2E 6E 61 74 75 72 65    ' else f^.nature
003E80:  3A 3D 27 64 69 76 69 73 65 27 3B 0D 0A 20 20 20    :='divise';..   
003E90:  20 66 5E 2E 76 61 6C 65 75 72 3A 3D 63 61 72 3B     f^.valeur:=car;
003EA0:  0D 0A 20 20 20 20 6E 65 77 28 66 5E 2E 64 29 3B    ..    new(f^.d);
003EB0:  0D 0A 20 20 20 20 6C 69 72 63 61 72 3B 0D 0A 20    ..    lircar;.. 
003EC0:  20 20 20 6C 69 72 66 61 63 74 65 75 72 28 66 5E       lirfacteur(f^
003ED0:  2E 64 29 3B 0D 0A 20 20 20 65 6E 64 3B 0D 0A 20    .d);..   end;.. 
003EE0:  20 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 75     end;....procedu
003EF0:  72 65 20 20 6C 69 72 65 78 70 3B 0D 0A 76 61 72    re  lirexp;..var
003F00:  0D 0A 68 3A 66 6F 6E 63 74 69 6F 6E 3B 0D 0A 62    ..h:fonction;..b
003F10:  65 67 69 6E 0D 0A 20 20 20 6E 65 77 28 66 29 3B    egin..   new(f);
003F20:  0D 0A 20 20 20 69 66 20 63 61 72 20 69 6E 20 5B    ..   if car in [
003F30:  27 2B 27 2C 27 2D 27 5D 20 74 68 65 6E 0D 0A 20    '+','-'] then.. 
003F40:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 69 66      begin..     if
003F50:  20 63 61 72 3D 27 2B 27 20 74 68 65 6E 0D 0A 20     car='+' then.. 
003F60:  20 20 20 20 20 20 20 20 66 5E 2E 6E 61 74 75 72            f^.natur
003F70:  65 3A 3D 27 70 6C 75 73 27 20 65 6C 73 65 20 66    e:='plus' else f
003F80:  5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 6F 69 6E 73    ^.nature:='moins
003F90:  27 3B 0D 0A 20 20 20 20 20 20 20 20 20 66 5E 2E    ';..         f^.
003FA0:  76 61 6C 65 75 72 3A 3D 63 61 72 3B 0D 0A 20 20    valeur:=car;..  
003FB0:  20 20 20 20 20 20 20 66 5E 2E 67 3A 3D 6E 69 6C           f^.g:=nil
003FC0:  3B 0D 0A 20 20 20 20 20 20 20 20 20 6E 65 77 28    ;..         new(
003FD0:  66 5E 2E 64 29 3B 0D 0A 20 20 20 20 20 20 20 20    f^.d);..        
003FE0:  20 6C 69 72 63 61 72 3B 0D 0A 20 20 20 20 20 20     lircar;..      
003FF0:  20 20 20 6C 69 72 74 65 72 6D 65 28 66 5E 2E 64       lirterme(f^.d
004000:  29 3B 0D 0A 20 20 20 65 6E 64 0D 0A 20 20 20 65    );..   end..   e
004010:  6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 6C 69    lse..         li
004020:  72 74 65 72 6D 65 28 66 29 3B 0D 0A 20 20 20 77    rterme(f);..   w
004030:  68 69 6C 65 20 63 61 72 20 69 6E 20 5B 27 2B 27    hile car in ['+'
004040:  2C 27 2D 27 5D 20 64 6F 0D 0A 20 20 20 20 20 62    ,'-'] do..     b
004050:  65 67 69 6E 0D 0A 20 20 20 20 20 6E 65 77 28 68    egin..     new(h
004060:  29 3B 68 5E 2E 67 3A 3D 66 3B 0D 0A 20 20 20 20    );h^.g:=f;..    
004070:  20 66 3A 3D 68 3B 0D 0A 20 20 20 20 20 69 66 20     f:=h;..     if 
004080:  63 61 72 3D 27 2B 27 20 74 68 65 6E 20 66 5E 2E    car='+' then f^.
004090:  6E 61 74 75 72 65 3A 3D 27 70 6C 75 73 27 20 65    nature:='plus' e
0040A0:  6C 73 65 20 66 5E 2E 6E 61 74 75 72 65 3A 3D 27    lse f^.nature:='
0040B0:  6D 6F 69 6E 73 27 3B 0D 0A 20 20 20 20 20 66 5E    moins';..     f^
0040C0:  2E 76 61 6C 65 75 72 3A 3D 63 61 72 3B 0D 0A 20    .valeur:=car;.. 
0040D0:  20 20 20 20 6E 65 77 28 66 5E 2E 64 29 3B 0D 0A        new(f^.d);..
0040E0:  20 20 20 20 20 6C 69 72 63 61 72 3B 0D 0A 20 20         lircar;..  
0040F0:  20 20 20 6C 69 72 74 65 72 6D 65 28 66 5E 2E 64       lirterme(f^.d
004100:  29 3B 0D 0A 20 20 20 20 20 65 6E 64 3B 0D 0A 20    );..     end;.. 
004110:  20 20 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64      end;....proced
004120:  75 72 65 20 6C 69 72 66 6F 6E 63 74 69 6F 6E 3B    ure lirfonction;
004130:  0D 0A 62 65 67 69 6E 0D 0A 20 20 69 66 20 66 3C    ..begin..  if f<
004140:  3E 6E 69 6C 20 74 68 65 6E 20 72 65 6C 61 63 68    >nil then relach
004150:  65 28 66 29 3B 0D 0A 20 20 77 72 69 74 65 6C 6E    e(f);..  writeln
004160:  28 27 45 6E 74 72 65 7A 20 76 6F 74 72 65 20 66    ('Entrez votre f
004170:  6F 6E 63 74 69 6F 6E 27 29 3B 0D 0A 20 20 20 6C    onction');..   l
004180:  69 72 63 61 72 3B 0D 0A 20 20 20 6C 69 72 65 78    ircar;..   lirex
004190:  70 28 66 29 3B 0D 0A 20 20 69 66 20 63 61 72 3C    p(f);..  if car<
0041A0:  3E 63 68 72 28 31 33 29 20 74 68 65 6E 20 65 72    >chr(13) then er
0041B0:  72 65 75 72 28 39 29 3B 0D 0A 65 6E 64 3B 0D 0A    reur(9);..end;..
0041C0:  0D 0A 70 72 6F 63 65 64 75 72 65 20 74 65 6D 70    ..procedure temp
0041D0:  6F 3B 0D 0A 62 65 67 69 6E 0D 0A 77 72 69 74 65    o;..begin..write
0041E0:  6C 6E 3B 0D 0A 67 6F 74 6F 78 79 28 31 2C 32 35    ln;..gotoxy(1,25
0041F0:  29 3B 77 72 69 74 65 28 27 61 70 70 75 79 65 7A    );write('appuyez
004200:  20 75 6E 65 20 74 6F 75 63 68 65 20 70 6F 75 72     une touche pour
004210:  20 72 65 76 65 6E 69 72 20 61 75 20 6D 65 6E 75     revenir au menu
004220:  27 29 3B 0D 0A 77 68 69 6C 65 20 6E 6F 74 20 6B    ');..while not k
004230:  65 79 70 72 65 73 73 65 64 20 64 6F 3B 0D 0A 65    eypressed do;..e
004240:  6E 64 3B 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    nd;.............
004250:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
004260:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
004270:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
004280:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004290:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0042A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0042B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0042C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0042D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0042E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0042F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004300:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004310:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004320:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004330:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004340:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004350:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004360:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004370:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004380:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004390:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0043A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0043B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0043C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0043D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0043E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0043F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004400:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004410:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004420:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004430:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004440:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004450:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004460:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004470:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004480:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004490:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0044A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0044B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0044C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0044D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0044E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0044F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004500:  0D 0A 20 20 2A 2A 2A 2A 2A 2A 20 20 51 55 45 4C    ..  ******  QUEL
004510:  51 55 45 53 20 45 58 50 4C 49 43 41 54 49 4F 4E    QUES EXPLICATION
004520:  53 20 53 55 52 20 4C 45 53 20 46 49 43 48 49 45    S SUR LES FICHIE
004530:  52 53 20 53 4F 55 52 43 45 53 20 2A 2A 2A 2A 2A    RS SOURCES *****
004540:  2A 2A 0D 0A 0D 0A 20 20 4C 65 73 20 66 6F 6E 63    **....  Les fonc
004550:  74 69 6F 6E 73 20 6E 75 6D 65 72 69 71 75 65 73    tions numeriques
004560:  20 73 6F 6E 74 20 6D 69 73 65 73 20 73 6F 75 73     sont mises sous
004570:  20 66 6F 72 6D 65 20 64 27 75 6E 20 61 72 62 72     forme d'un arbr
004580:  65 3A 0D 0A 0D 0A 20 20 20 70 61 72 20 65 78 65    e:....   par exe
004590:  6D 70 6C 65 20 70 6F 75 72 20 66 31 28 78 29 3D    mple pour f1(x)=
0045A0:  33 2A 78 2A 28 78 2D 32 29 0D 0A 0D 0A 20 20 20    3*x*(x-2)....   
0045B0:  6E 6F 75 73 20 61 75 72 6F 6E 73 20 6C 27 61 72    nous aurons l'ar
0045C0:  62 72 65 20 20 20 20 20 20 20 20 20 20 20 20 2A    bre            *
0045D0:  20 20 20 20 20 20 20 20 20 20 20 71 75 69 20 70               qui p
0045E0:  65 72 6D 65 74 74 72 61 20 74 6F 75 74 20 6C 65    ermettra tout le
0045F0:  20 63 61 6C 63 75 6C 0D 0A 20 20 20 20 20 20 20     calcul..       
004600:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004610:  20 20 20 20 20 20 20 20 20 2F 20 20 20 5C 0D 0A             /   \..
004620:  20 20 20 66 6F 72 6D 65 6C 20 20 6E 65 63 65 73       formel  neces
004630:  73 61 69 72 65 20 20 20 20 20 20 20 20 20 20 2F    saire          /
004640:  20 20 20 20 20 5C 20 20 20 20 20 20 20 61 20 6C         \       a l
004650:  27 65 74 75 64 65 20 64 65 20 63 65 74 74 65 20    'etude de cette 
004660:  66 6F 6E 63 74 69 6F 6E 0D 0A 20 20 20 20 20 20    fonction..      
004670:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004680:  20 20 20 20 20 20 20 20 2A 20 20 20 20 20 20 20            *       
004690:  2D 0D 0A 20 20 20 63 61 6C 63 75 6C 20 64 65 20    -..   calcul de 
0046A0:  76 61 6C 65 75 72 73 20 20 20 20 20 20 20 20 20    valeurs         
0046B0:  2F 20 5C 20 20 20 20 20 2F 20 5C 20 20 20 20 20    / \     / \     
0046C0:  70 6F 75 72 20 6C 65 20 67 72 61 70 68 65 2C 20    pour le graphe, 
0046D0:  64 65 76 65 6C 6F 70 70 65 6D 65 6E 74 0D 0A 20    developpement.. 
0046E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0046F0:  20 20 20 20 20 20 20 20 20 20 20 2F 20 20 20 5C               /   \
004700:  20 20 20 2F 20 20 20 5C 0D 0A 20 20 20 64 65 20       /   \..   de 
004710:  63 65 20 70 6F 6C 79 6E 6F 6D 65 20 20 20 20 20    ce polynome     
004720:  20 20 20 20 20 33 20 20 20 20 20 78 20 20 78 20         3     x  x 
004730:  20 20 20 32 20 20 20 20 65 63 72 69 74 75 72 65       2    ecriture
004740:  20 64 65 20 73 61 20 64 65 72 69 76 65 65 2E 2E     de sa derivee..
004750:  2E 2E 2E 0D 0A 0D 0A 20 20 50 6F 75 72 20 72 65    .......  Pour re
004760:  70 72 65 73 65 6E 74 65 72 20 63 65 74 20 61 72    presenter cet ar
004770:  62 72 65 2C 20 75 74 69 6C 69 73 61 74 69 6F 6E    bre, utilisation
004780:  20 64 65 20 70 6F 69 6E 74 65 75 72 73 20 64 65     de pointeurs de
004790:  66 69 6E 69 73 20 63 6F 6D 6D 65 0D 0A 0D 0A 20    finis comme.... 
0047A0:  20 20 66 6F 6E 63 74 69 6F 6E 3A 20 70 6F 69 6E      fonction: poin
0047B0:  74 65 75 72 20 61 20 34 20 63 6F 6D 70 6F 73 61    teur a 4 composa
0047C0:  6E 74 73 0D 0A 20 20 20 20 20 20 20 20 6E 61 74    nts..        nat
0047D0:  75 72 65 3A 20 20 20 20 20 20 75 6E 65 20 63 68    ure:      une ch
0047E0:  61 69 6E 65 20 69 6E 64 69 71 75 61 6E 74 20 6C    aine indiquant l
0047F0:  61 20 6E 61 74 75 72 65 20 64 75 20 6E 6F 65 75    a nature du noeu
004800:  64 0D 0A 20 20 20 20 20 20 20 20 76 61 6C 65 75    d..        valeu
004810:  72 3A 20 20 20 20 20 20 76 61 6C 65 75 72 20 6E    r:      valeur n
004820:  75 6D 65 72 69 71 75 65 20 70 6F 75 72 20 6E 6F    umerique pour no
004830:  6D 62 72 65 2C 0D 0A 20 20 20 20 20 20 20 20 20    mbre,..         
004840:  20 20 20 20 20 20 20 20 20 20 20 20 6E 75 6D 65                nume
004850:  72 6F 20 64 75 20 70 61 72 61 6D 65 74 72 65 2E    ro du parametre.
004860:  2E 2E 0D 0A 20 20 20 20 20 20 20 20 64 72 6F 69    ....        droi
004870:  74 3A 20 20 20 20 20 20 20 61 64 72 65 73 73 65    t:       adresse
004880:  20 64 75 20 70 6F 69 6E 74 65 75 72 20 64 65 20     du pointeur de 
004890:  64 72 6F 69 74 65 0D 0A 20 20 20 20 20 20 20 20    droite..        
0048A0:  67 61 75 63 68 65 3A 20 20 20 20 20 20 61 64 72    gauche:      adr
0048B0:  65 73 73 65 20 64 75 20 70 6F 69 6E 74 65 75 72    esse du pointeur
0048C0:  20 64 65 20 67 61 75 63 68 65 2E 0D 0A 0D 0A 20     de gauche..... 
0048D0:  20 4C 65 73 20 64 65 63 6C 61 72 61 74 69 6F 6E     Les declaration
0048E0:  73 20 72 65 6C 61 74 69 76 65 73 20 61 20 63 65    s relatives a ce
0048F0:  73 20 70 6F 69 6E 74 65 75 72 73 20 73 6F 6E 74    s pointeurs sont
004900:  20 64 61 6E 73 0D 0A 20 20 20 20 20 20 20 20 20     dans..         
004910:  46 4F 4E 43 54 49 4F 4E 2E 50 41 53 20 65 74 20    FONCTION.PAS et 
004920:  43 4F 55 52 42 45 2E 50 41 53 0D 0A 0D 0A 20 20    COURBE.PAS....  
004930:  2A 2A 2A 2A 2A 2A 2A 2A 20 45 4E 54 52 45 45 20    ******** ENTREE 
004940:  44 27 55 4E 45 20 46 4F 4E 43 54 49 4F 4E 20 2A    D'UNE FONCTION *
004950:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
004960:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
004970:  2A 2A 2A 2A 2A 0D 0A 0D 0A 20 20 43 27 65 73 74    *****....  C'est
004980:  20 6C 65 20 66 69 63 68 69 65 72 20 4C 49 52 45     le fichier LIRE
004990:  46 4F 4E 43 2E 50 41 53 0D 0A 0D 0A 20 20 49 6C    FONC.PAS....  Il
0049A0:  20 63 6F 6D 70 72 65 6E 64 20 6C 65 73 20 64 69     comprend les di
0049B0:  76 65 72 73 65 73 20 70 72 6F 63 65 64 75 72 65    verses procedure
0049C0:  73 20 70 6F 75 72 20 6C 27 65 6E 74 72 65 65 20    s pour l'entree 
0049D0:  64 65 73 20 65 6C 65 6D 65 6E 74 73 0D 0A 20 20    des elements..  
0049E0:  64 27 75 6E 65 20 66 6F 6E 63 74 69 6F 6E 2E 0D    d'une fonction..
0049F0:  0A 0D 0A 20 20 4C 27 61 72 74 69 63 75 6C 61 74    ...  L'articulat
004A00:  69 6F 6E 20 64 65 73 20 70 72 6F 63 65 64 75 72    ion des procedur
004A10:  65 73 20 72 65 73 70 65 63 74 65 20 6C 61 20 73    es respecte la s
004A20:  79 6E 74 61 78 65 20 64 65 73 20 66 6F 6E 63 74    yntaxe des fonct
004A30:  69 6F 6E 73 0D 0A 20 20 6E 75 6D 65 72 69 71 75    ions..  numeriqu
004A40:  65 73 2E 0D 0A 0D 0A 20 20 20 45 78 70 72 65 73    es.....   Expres
004A50:  73 69 6F 6E 20 61 6C 67 65 62 72 69 71 75 65 3A    sion algebrique:
004A60:  0D 0A 0D 0A 20 20 20 20 2D 2D 2D 2D 3E 2D 7C 20    ....    ---->-| 
004A70:  2B 20 7C 2D 2D 3E 2D 2D 0D 0A 20 20 20 7C 20 20    + |-->--..   |  
004A80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 7C 0D                  |.
004A90:  0A 20 20 20 7C 20 20 20 20 20 20 20 20 20 20 20    .   |           
004AA0:  20 20 20 20 20 7C 0D 0A 20 2D 2D 2D 2D 2D 2D 2D         |.. -------
004AB0:  2D 2D 2D 2D 3E 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ---->-----------
004AC0:  2D 2D 2D 2D 2D 3E 2D 2D 2D 7C 20 54 65 72 6D 65    ----->---| Terme
004AD0:  20 7C 2D 2D 2D 2D 3E 2D 2D 2D 2D 2D 2D 2D 2D 2D     |---->---------
004AE0:  3E 2D 2D 2D 2D 2D 2D 0D 0A 20 20 20 7C 20 20 20    >------..   |   
004AF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 7C 20 20                 |  
004B00:  20 20 20 7C 20 20 20 20 20 20 20 20 20 20 20 20       |            
004B10:  20 20 20 20 20 20 20 20 20 20 20 5C 7C 2F 0D 0A               \|/..
004B20:  20 20 20 7C 20 20 20 20 20 20 20 20 20 20 20 20       |            
004B30:  20 20 20 20 7C 20 20 20 20 2F 7C 5C 20 20 20 20        |    /|\    
004B40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004B50:  20 20 20 7C 0D 0A 20 20 20 20 2D 2D 2D 3E 2D 2D       |..    --->--
004B60:  7C 20 2D 20 7C 2D 3E 2D 2D 2D 20 20 20 20 20 20    | - |->---      
004B70:  20 2D 2D 3C 2D 2D 2D 2D 2D 2D 7C 20 2B 20 7C 2D     --<------| + |-
004B80:  2D 2D 2D 2D 2D 3C 2D 2D 2D 0D 0A 20 20 20 20 20    -----<---..     
004B90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004BA0:  20 20 20 20 20 7C 20 20 20 20 20 20 20 20 20 20         |          
004BB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 5C 7C 2F                 \|/
004BC0:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
004BD0:  20 20 20 20 20 20 20 20 20 20 20 2F 7C 5C 20 20               /|\  
004BE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004BF0:  20 20 20 20 20 7C 0D 0A 20 20 20 20 20 20 20 20         |..        
004C00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004C10:  20 20 20 2D 2D 2D 3C 2D 2D 2D 2D 2D 7C 20 2D 20       ---<-----| - 
004C20:  7C 2D 2D 2D 2D 2D 2D 3C 2D 2D 2D 0D 0A 0D 0A 20    |------<---.... 
004C30:  20 20 54 65 72 6D 65 3A 0D 0A 20 20 20 20 20 20      Terme:..      
004C40:  20 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 3E 2D       ----------->-
004C50:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 3E 2D 2D 2D 7C 20    ---------->---| 
004C60:  46 61 63 74 65 75 72 20 7C 2D 2D 2D 2D 2D 3E 2D    Facteur |----->-
004C70:  2D 2D 2D 2D 2D 2D 2D 3E 2D 2D 2D 0D 0A 20 20 20    ------->---..   
004C80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004C90:  20 20 20 20 20 20 20 20 7C 20 20 20 20 20 20 20            |       
004CA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004CB0:  20 20 20 20 5C 7C 2F 0D 0A 20 20 20 20 20 20 20        \|/..       
004CC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004CD0:  20 20 20 2F 7C 5C 20 20 20 20 20 20 20 20 20 20       /|\          
004CE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004CF0:  20 7C 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20     |..            
004D00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
004D10:  04 00 00 00 02 09 4E E5 04 00 41 02 00 00 00 02    ......N...A.....
004D20:  04 00 42 02 00 00 00 02 04 00 43 02 00 00 00 02    ..B.......C.....
004D30:  04 00 44 02 00 00 00 02 04 00 45 02 00 00 00 02    ..D.......E.....
004D40:  04 00 46 02 00 00 00 02 04 00 47 02 00 00 00 02    ..F.......G.....
004D50:  04 00 48 02 00 00 00 02 04 00 49 02 00 00 00 02    ..H.......I.....
004D60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004D70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004D80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004D90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004DA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004DB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004DC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004DD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004DE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004DF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004E00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004E10:  2D 2D 2D 3C 2D 2D 2D 2D 2D 2D 2D 7C 20 2A 20 7C    ---<-------| * |
004E20:  2D 2D 2D 2D 3C 2D 2D 2D 2D 2D 2D 2D 0D 0A 20 20    ----<-------..  
004E30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004E40:  20 20 20 20 20 20 20 20 20 7C 20 20 20 20 20 20             |      
004E50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004E60:  20 20 20 20 20 5C 7C 2F 0D 0A 20 20 20 20 20 20         \|/..      
004E70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004E80:  20 20 20 20 2F 7C 5C 20 20 20 20 20 20 20 20 20        /|\         
004E90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004EA0:  20 20 7C 0D 0A 20 20 20 20 20 20 20 20 20 20 20      |..           
004EB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004EC0:  20 2D 2D 2D 2D 3C 2D 2D 2D 2D 2D 2D 7C 20 2F 20     ----<------| / 
004ED0:  7C 2D 2D 2D 2D 3C 2D 2D 2D 2D 2D 2D 2D 0D 0A 20    |----<-------.. 
004EE0:  20 20 46 61 63 74 65 75 72 3A 0D 0A 0D 0A 20 20      Facteur:....  
004EF0:  20 20 20 20 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D            --------
004F00:  2D 3E 2D 2D 2D 2D 2D 2D 2D 2D 7C 20 4E 6F 6D 62    ->--------| Nomb
004F10:  72 65 20 7C 2D 2D 2D 2D 2D 2D 2D 2D 2D 3E 2D 2D    re |--------->--
004F20:  2D 2D 2D 2D 2D 2D 2D 2D 0D 0A 20 20 20 20 20 20    --------..      
004F30:  20 20 20 7C 20 20 20 20 20 20 20 20 20 20 20 20       |            
004F40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004F50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004F60:  20 20 20 5C 7C 2F 0D 0A 20 20 20 20 20 20 20 20       \|/..        
004F70:  2F 7C 5C 20 20 20 20 20 20 20 20 20 20 20 20 20    /|\             
004F80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004F90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004FA0:  20 20 7C 0D 0A 20 20 20 20 20 20 20 20 20 20 2D      |..          -
004FB0:  2D 2D 2D 2D 2D 2D 2D 3E 2D 2D 2D 2D 2D 2D 2D 2D    ------->--------
004FC0:  7C 20 50 61 72 61 6D 65 74 72 65 20 7C 2D 2D 2D    | Parametre |---
004FD0:  2D 2D 2D 3E 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D    --->-----------.
004FE0:  0A 20 20 20 20 20 20 20 20 20 7C 20 20 20 20 20    .         |     
004FF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005000:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005010:  20 20 20 20 20 20 20 20 20 20 5C 7C 2F 0D 0A 20              \|/.. 
005020:  20 20 20 20 20 20 20 2F 7C 5C 20 20 20 20 20 20           /|\      
005030:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005040:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005050:  20 20 20 20 20 20 20 20 20 7C 0D 0A 20 20 20 20             |..    
005060:  20 20 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D 3E 2D          -------->-
005070:  2D 7C 20 28 20 7C 2D 2D 7C 20 45 78 70 2E 41 6C    -| ( |--| Exp.Al
005080:  67 65 62 2E 7C 2D 2D 7C 20 29 20 7C 2D 2D 3E 2D    geb.|--| ) |-->-
005090:  2D 2D 2D 2D 2D 2D 0D 0A 20 20 20 20 20 20 20 20    ------..        
0050A0:  20 7C 20 20 20 20 20 20 20 20 20 20 20 20 20 20     |              
0050B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0050C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0050D0:  20 5C 7C 2F 0D 0A 20 20 20 20 20 20 20 20 2F 7C     \|/..        /|
0050E0:  5C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    \               
0050F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005100:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005110:  7C 0D 0A 20 2D 2D 2D 2D 3E 2D 2D 2D 20 20 20 20    |.. ---->---    
005120:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005130:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005140:  20 20 20 20 20 20 20 20 20 20 20 20 20 2D 2D 2D                 ---
005150:  2D 2D 2D 2D 3E 2D 2D 2D 2D 2D 2D 2D 0D 0A 20 20    ---->-------..  
005160:  20 20 20 20 20 20 5C 7C 2F 20 20 20 20 20 20 20          \|/       
005170:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005180:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005190:  20 20 20 20 20 20 20 20 7C 0D 0A 20 20 20 20 20            |..     
0051A0:  20 20 20 20 7C 20 20 20 20 20 20 20 20 20 20 20        |           
0051B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0051C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0051D0:  20 20 20 20 2F 7C 5C 0D 0A 20 20 20 20 20 20 20        /|\..       
0051E0:  20 20 20 2D 2D 2D 2D 2D 2D 2D 2D 3E 2D 2D 2D 2D       -------->----
0051F0:  2D 2D 2D 2D 2D 2D 2D 7C 20 78 20 7C 2D 2D 2D 2D    -------| x |----
005200:  2D 2D 3E 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    -->-------------
005210:  2D 2D 2D 0D 0A 20 20 20 20 20 20 20 20 5C 7C 2F    ---..        \|/
005220:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005230:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005240:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7C                   |
005250:  0D 0A 20 20 20 20 20 20 20 20 20 7C 20 20 20 20    ..         |    
005260:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005270:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005280:  20 20 20 20 20 20 20 20 20 20 20 2F 7C 5C 0D 0A               /|\..
005290:  20 20 20 20 20 20 20 20 20 20 2D 2D 2D 2D 2D 2D              ------
0052A0:  2D 2D 2D 2D 3E 2D 2D 2D 2D 2D 2D 7C 20 50 75 69    ---->------| Pui
0052B0:  73 73 61 6E 63 65 20 7C 2D 2D 2D 2D 2D 2D 2D 3E    ssance |------->
0052C0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0A 20 20 20 20    ----------..    
0052D0:  20 20 20 20 5C 7C 2F 20 20 20 20 20 20 20 20 20        \|/         
0052E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0052F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005300:  20 20 20 20 20 20 7C 0D 0A 20 20 20 20 20 20 20          |..       
005310:  20 20 7C 20 20 20 20 20 20 20 20 20 20 20 20 20      |             
005320:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005330:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005340:  20 20 2F 7C 5C 0D 0A 20 20 20 20 20 20 20 20 20      /|\..         
005350:  20 2D 2D 2D 7C 20 49 64 2E 66 6F 6E 63 74 69 6F     ---| Id.fonctio
005360:  6E 7C 2D 2D 7C 20 28 20 7C 2D 2D 7C 20 45 78 70    n|--| ( |--| Exp
005370:  2E 41 6C 67 2E 7C 2D 2D 7C 20 29 20 7C 2D 3E 2D    .Alg.|--| ) |->-
005380:  2D 0D 0A 0D 0A 0D 0A 20 20 20 20 20 50 61 72 61    -......     Para
005390:  6D 65 74 72 65 3A 0D 0A 0D 0A 20 20 20 20 20 2D    metre:....     -
0053A0:  2D 2D 3E 2D 2D 2D 7C 20 70 20 7C 2D 2D 2D 2D 3E    -->---| p |---->
0053B0:  2D 7C 20 28 20 7C 2D 2D 2D 7C 20 45 6E 74 69 65    -| ( |---| Entie
0053C0:  72 20 6E 6F 6E 20 73 69 67 6E 65 20 7C 2D 2D 2D    r non signe |---
0053D0:  7C 20 29 20 7C 2D 2D 2D 2D 2D 2D 3E 2D 2D 2D 0D    | ) |------>---.
0053E0:  0A 0D 0A 20 20 20 20 20 50 75 69 73 73 61 6E 63    ...     Puissanc
0053F0:  65 3A 0D 0A 0D 0A 20 20 20 20 20 2D 2D 2D 2D 2D    e:....     -----
005400:  2D 2D 2D 3E 2D 2D 2D 7C 20 46 61 63 74 65 75 72    --->---| Facteur
005410:  20 7C 2D 2D 2D 2D 2D 2D 7C 20 5E 20 7C 2D 2D 2D     |------| ^ |---
005420:  2D 2D 7C 20 46 61 63 74 65 75 72 20 7C 2D 2D 2D    --| Facteur |---
005430:  3E 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0A 0D 0A 0D 0A    >---------......
005440:  20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 43 61 6C      ********** Cal
005450:  63 75 6C 20 65 74 20 65 63 72 69 74 75 72 65 20    cul et ecriture 
005460:  64 65 73 20 66 6F 6E 63 74 69 6F 6E 73 20 2A 2A    des fonctions **
005470:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
005480:  2A 2A 2A 2A 2A 0D 0A 0D 0A 20 20 43 27 65 73 74    *****....  C'est
005490:  20 6C 65 20 66 69 63 68 69 65 72 20 43 41 4C 43     le fichier CALC
0054A0:  55 4C 46 2E 50 41 53 0D 0A 0D 0A 20 20 41 76 65    ULF.PAS....  Ave
0054B0:  63 20 6C 65 73 20 70 72 6F 63 65 64 75 72 65 73    c les procedures
0054C0:  20 70 6F 75 72 0D 0A 0D 0A 20 20 20 20 20 65 63     pour....     ec
0054D0:  72 69 72 65 20 6C 61 20 66 6F 6E 63 74 69 6F 6E    rire la fonction
0054E0:  3A 20 54 61 70 65 66 6F 6E 63 74 69 6F 6E 0D 0A    : Tapefonction..
0054F0:  0D 0A 20 20 20 20 20 63 61 6C 63 75 6C 65 72 20    ..     calculer 
005500:  66 28 78 29 3A 20 20 43 61 6C 63 75 6C 66 0D 0A    f(x):  Calculf..
005510:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61                   a
005520:  76 65 63 20 74 65 73 74 73 20 70 6F 75 72 20 73    vec tests pour s
005530:  61 76 6F 69 72 20 73 69 20 6C 65 20 63 61 6C 63    avoir si le calc
005540:  75 6C 20 65 73 74 20 70 6F 73 73 69 62 6C 65 0D    ul est possible.
005550:  0A 0D 0A 20 20 20 20 20 73 69 6D 70 6C 69 66 69    ...     simplifi
005560:  65 72 20 6C 61 20 66 6F 6E 63 74 69 6F 6E 3A 20    er la fonction: 
005570:  53 69 6D 70 6C 69 66 0D 0A 0D 0A 0D 0A 20 20 2A    Simplif......  *
005580:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20    *************** 
005590:  43 61 6C 63 75 6C 20 46 6F 72 6D 65 6C 20 2A 2A    Calcul Formel **
0055A0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
0055B0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
0055C0:  2A 2A 2A 0D 0A 0D 0A 20 20 50 6F 75 72 20 6C 65    ***....  Pour le
0055D0:  73 20 64 65 76 65 6C 6F 70 70 65 6D 65 6E 74 73    s developpements
0055E0:  20 64 65 20 70 72 6F 64 75 69 74 73 20 6F 75 20     de produits ou 
0055F0:  64 65 20 70 75 69 73 73 61 6E 63 65 73 0D 0A 0D    de puissances...
005600:  0D 0A 66 75 6E 63 74 69 6F 6E 20 20 20 6D 65 6E    ..function   men
005610:  75 3A 69 6E 74 65 67 65 72 3B 0D 0A 0D 0A 62 65    u:integer;....be
005620:  67 69 6E 0D 0A 63 6C 72 73 63 72 3B 0D 0A 77 72    gin..clrscr;..wr
005630:  69 74 65 6C 6E 3B 77 72 69 74 65 6C 6E 28 27 20    iteln;writeln(' 
005640:  4D 20 45 20 4E 20 55 20 27 29 3B 0D 0A 77 72 69    M E N U ');..wri
005650:  74 65 6C 6E 3B 77 72 69 74 65 6C 6E 28 27 3C 31    teln;writeln('<1
005660:  3E 20 45 6E 74 72 65 65 20 64 65 20 6C 61 20 66    > Entree de la f
005670:  6F 6E 63 74 69 6F 6E 27 29 3B 0D 0A 77 72 69 74    onction');..writ
005680:  65 6C 6E 3B 77 72 69 74 65 6C 6E 28 27 3C 32 3E    eln;writeln('<2>
005690:  20 43 61 6C 63 75 6C 20 64 65 20 76 61 6C 65 75     Calcul de valeu
0056A0:  72 73 20 64 65 20 66 28 78 29 27 29 3B 0D 0A 77    rs de f(x)');..w
0056B0:  72 69 74 65 6C 6E 3B 77 72 69 74 65 6C 6E 28 27    riteln;writeln('
0056C0:  3C 33 3E 20 47 72 61 70 68 65 73 20 64 65 20 66    <3> Graphes de f
0056D0:  6F 6E 63 74 69 6F 6E 73 27 29 3B 0D 0A 77 72 69    onctions');..wri
0056E0:  74 65 6C 6E 3B 77 72 69 74 65 6C 6E 28 27 3C 34    teln;writeln('<4
0056F0:  3E 20 46 69 6E 20 64 75 20 70 72 6F 67 72 61 6D    > Fin du program
005700:  6D 65 27 29 3B 0D 0A 77 72 69 74 65 6C 6E 3B 77    me');..writeln;w
005710:  72 69 74 65 6C 6E 28 27 20 56 4F 54 52 45 20 43    riteln(' VOTRE C
005720:  48 4F 49 58 3F 20 27 29 3B 0D 0A 72 65 70 65 61    HOIX? ');..repea
005730:  74 0D 0A 72 65 61 64 28 6B 62 64 2C 63 61 72 29    t..read(kbd,car)
005740:  3B 0D 0A 75 6E 74 69 6C 20 28 28 63 61 72 3E 27    ;..until ((car>'
005750:  30 27 29 20 61 6E 64 20 28 63 61 72 3C 27 35 27    0') and (car<'5'
005760:  29 29 3B 0D 0A 76 61 6C 28 63 61 72 2C 63 68 6F    ));..val(car,cho
005770:  69 78 2C 72 65 73 75 6C 74 29 3B 0D 0A 6D 65 6E    ix,result);..men
005780:  75 3A 3D 63 68 6F 69 78 3B 0D 0A 65 6E 64 3B 0D    u:=choix;..end;.
005790:  0A 0D 0A 66 75 6E 63 74 69 6F 6E 20 6E 75 6D 66    ...function numf
0057A0:  6F 6E 63 3A 69 6E 74 65 67 65 72 3B 0D 0A 76 61    onc:integer;..va
0057B0:  72 20 6A 6B 6C 3A 69 6E 74 65 67 65 72 3B 0D 0A    r jkl:integer;..
0057C0:  0D 0A 62 65 67 69 6E 0D 0A 63 61 72 3A 3D 27 20    ..begin..car:=' 
0057D0:  27 3B 0D 0A 72 65 70 65 61 74 0D 0A 72 65 61 64    ';..repeat..read
0057E0:  28 6B 62 64 2C 63 61 72 29 3B 0D 0A 75 6E 74 69    (kbd,car);..unti
0057F0:  6C 20 28 28 63 61 72 3E 27 30 27 29 20 61 6E 64    l ((car>'0') and
005800:  20 28 63 61 72 3C 27 3A 27 29 29 3B 0D 0A 77 72     (car<':'));..wr
005810:  69 74 65 6C 6E 3B 0D 0A 76 61 6C 28 63 61 72 2C    iteln;..val(car,
005820:  6A 6B 6C 2C 72 65 73 75 6C 74 29 3B 0D 0A 6E 75    jkl,result);..nu
005830:  6D 66 6F 6E 63 3A 3D 6A 6B 6C 3B 0D 0A 65 6E 64    mfonc:=jkl;..end
005840:  3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 20    ;....procedure  
005850:  67 72 61 70 68 65 28 72 65 76 6F 69 72 3A 69 6E    graphe(revoir:in
005860:  74 65 67 65 72 29 3B 0D 0A 66 6F 72 77 61 72 64    teger);..forward
005870:  3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 62    ;....procedure b
005880:  6F 75 63 6C 65 3B 0D 0A 76 61 72 20 7A 3A 69 6E    oucle;..var z:in
005890:  74 65 67 65 72 3B 0D 0A 62 65 67 69 6E 0D 0A 72    teger;..begin..r
0058A0:  65 70 65 61 74 0D 0A 63 68 6F 69 78 3A 3D 6D 65    epeat..choix:=me
0058B0:  6E 75 3B 0D 0A 63 61 73 65 20 63 68 6F 69 78 20    nu;..case choix 
0058C0:  6F 66 0D 0A 20 31 3A 20 20 20 20 62 65 67 69 6E    of.. 1:    begin
0058D0:  0D 0A 20 20 20 20 20 20 20 77 72 69 74 65 28 27    ..       write('
0058E0:  4E 6F 20 64 65 20 6C 61 20 66 6F 6E 63 74 69 6F    No de la fonctio
0058F0:  6E 20 28 31 20 61 20 39 29 3F 27 29 3B 0D 0A 20    n (1 a 9)?');.. 
005900:  20 20 20 20 20 20 69 3A 3D 6E 75 6D 66 6F 6E 63          i:=numfonc
005910:  3B 0D 0A 20 20 20 20 20 20 20 63 6C 72 73 63 72    ;..       clrscr
005920:  3B 63 61 72 3A 3D 27 20 27 3B 0D 0A 20 20 20 20    ;car:=' ';..    
005930:  20 20 20 6C 69 72 66 6F 6E 63 74 69 6F 6E 28 66       lirfonction(f
005940:  5B 69 5D 29 3B 0D 0A 20 20 20 20 20 20 20 73 69    [i]);..       si
005950:  6D 70 6C 69 66 28 66 5B 69 5D 29 3B 0D 0A 20 20    mplif(f[i]);..  
005960:  20 20 20 20 20 74 65 6D 70 6F 3B 0D 0A 20 20 20         tempo;..   
005970:  20 20 20 20 65 6E 64 3B 0D 0A 20 32 3A 20 20 20        end;.. 2:   
005980:  20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 63     begin..       c
005990:  6C 72 73 63 72 3B 77 72 69 74 65 28 27 4E 6F 20    lrscr;write('No 
0059A0:  64 65 20 6C 61 20 66 6F 6E 63 74 69 6F 6E 20 28    de la fonction (
0059B0:  31 20 61 20 39 29 3F 27 29 3B 0D 0A 20 20 20 20    1 a 9)?');..    
0059C0:  20 20 20 69 3A 3D 6E 75 6D 66 6F 6E 63 3B 0D 0A       i:=numfonc;..
0059D0:  20 20 20 20 20 20 20 69 66 20 6D 5B 69 5D 3E 30           if m[i]>0
0059E0:  20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 62 65     then..       be
0059F0:  67 69 6E 0D 0A 20 20 20 20 20 20 20 66 6F 72 20    gin..       for 
005A00:  0A 20 20 20 66 69 63 68 69 65 72 20 41 4C 47 45    .   fichier ALGE
005A10:  42 52 45 2E 50 41 53 0D 0A 0D 0A 20 20 61 76 65    BRE.PAS....  ave
005A20:  63 20 61 6C 67 65 62 72 69 71 75 65 20 70 6F 75    c algebrique pou
005A30:  72 20 6C 65 73 20 70 72 6F 64 75 69 74 73 0D 0A    r les produits..
005A40:  20 20 20 20 20 20 20 62 69 6E 6F 6D 65 20 70 6F           binome po
005A50:  75 72 20 6C 65 73 20 70 75 69 73 73 61 6E 63 65    ur les puissance
005A60:  73 0D 0A 0D 0A 20 20 50 6F 75 72 20 6C 27 65 63    s....  Pour l'ec
005A70:  72 69 74 75 72 65 20 64 65 73 20 66 6F 6E 63 74    riture des fonct
005A80:  69 6F 6E 73 20 64 65 72 69 76 65 65 73 0D 0A 0D    ions derivees...
005A90:  0A 20 20 20 66 69 63 68 69 65 72 20 44 45 52 49    .   fichier DERI
005AA0:  56 45 45 2E 50 41 53 0D 0A 0D 0A 0D 0A 20 2A 2A    VEE.PAS...... **
005AB0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 4D 65 6E 75    *********** Menu
005AC0:  73 2C 20 47 72 61 70 68 65 73 2C 20 44 65 76 65    s, Graphes, Deve
005AD0:  6C 6F 70 70 65 6D 65 6E 74 73 20 6C 69 6D 69 74    loppements limit
005AE0:  65 73 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    es *************
005AF0:  2A 2A 0D 0A 0D 0A 20 20 43 65 73 20 70 72 6F 63    **....  Ces proc
005B00:  65 64 75 72 65 73 20 6E 27 6F 6E 74 20 71 75 65    edures n'ont que
005B10:  20 70 65 75 20 64 27 69 6D 70 6F 72 74 61 6E 63     peu d'importanc
005B20:  65 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E    e...............
005B30:  2E 2E 0D 0A 0D 0A 0D 0A 20 2A 2A 2A 2A 2A 2A 2A    ........ *******
005B40:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
005B50:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
005B60:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
005B70:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
005B80:  2A 2A 2A 0D 0A 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ***.............
005B90:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
005BA0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
005BB0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
005BC0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
005BD0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
005BE0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
005BF0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
005C00:  73 28 27 20 27 2C 66 5E 2E 76 61 6C 65 75 72 29    s(' ',f^.valeur)
005C10:  3C 3E 30 20 64 6F 20 64 65 6C 65 74 65 28 66 5E    <>0 do delete(f^
005C20:  2E 76 61 6C 65 75 72 2C 31 2C 31 29 3B 0D 0A 20    .valeur,1,1);.. 
005C30:  20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20         end;..     
005C40:  20 66 5E 2E 6E 61 74 75 72 65 3A 3D 27 6E 6F 6D     f^.nature:='nom
005C50:  62 72 65 27 3B 0D 0A 20 20 20 20 20 20 66 5E 2E    bre';..      f^.
005C60:  67 3A 3D 6E 69 6C 3B 66 5E 2E 64 3A 3D 6E 69 6C    g:=nil;f^.d:=nil
005C70:  3B 72 65 73 75 6C 74 3A 3D 31 3B 0D 0A 20 20 20    ;result:=1;..   
005C80:  20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20         end..      
005C90:  20 20 65 6C 73 65 0D 0A 20 20 20 69 66 20 28 28      else..   if ((
005CA0:  66 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20 61    f^.valeur='*') a
005CB0:  6E 64 20 28 66 5E 2E 64 5E 2E 6E 61 74 75 72 65    nd (f^.d^.nature
005CC0:  3D 27 6E 6F 6D 62 72 65 27 29 20 61 6E 64 20 28    ='nombre') and (
005CD0:  66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 31 27    f^.d^.valeur='1'
005CE0:  29 29 0D 0A 20 20 20 20 20 20 20 20 20 20 20 74    ))..           t
005CF0:  68 65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20    hen begin..     
005D00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005D10:  66 3A 3D 66 5E 2E 67 3B 0D 0A 20 20 20 20 20 20    f:=f^.g;..      
005D20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73                   s
005D30:  69 6D 70 6C 69 66 28 66 29 3B 72 65 73 75 6C 74    implif(f);result
005D40:  3A 3D 31 0D 0A 20 20 20 20 20 20 20 20 20 20 20    :=1..           
005D50:  20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20          end..     
005D60:  20 20 65 6C 73 65 0D 0A 20 20 20 69 66 20 28 28      else..   if ((
005D70:  66 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20 61    f^.valeur='*') a
005D80:  6E 64 20 28 66 5E 2E 67 5E 2E 6E 61 74 75 72 65    nd (f^.g^.nature
005D90:  3D 27 6E 6F 6D 62 72 65 27 29 20 61 6E 64 20 28    ='nombre') and (
005DA0:  66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D 27 31 27    f^.g^.valeur='1'
005DB0:  29 29 0D 0A 20 20 20 20 20 20 20 20 20 20 20 74    ))..           t
005DC0:  68 65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20    hen begin..     
005DD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
005DE0:  66 3A 3D 66 5E 2E 64 3B 0D 0A 20 20 20 20 20 20    f:=f^.d;..      
005DF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73                   s
005E00:  66 75 6E 63 74 69 6F 6E 20 63 61 6C 63 75 6C 28    function calcul(
005E10:  66 3A 66 6F 6E 63 74 69 6F 6E 3B 78 3A 72 65 61    f:fonction;x:rea
005E20:  6C 29 3A 72 65 61 6C 3B 0D 0A 66 6F 72 77 61 72    l):real;..forwar
005E30:  64 3B 0D 0A 0D 0A 66 75 6E 63 74 69 6F 6E 20 6F    d;....function o
005E40:  70 70 6F 73 65 28 76 61 72 20 66 3A 66 6F 6E 63    ppose(var f:fonc
005E50:  74 69 6F 6E 29 3A 66 6F 6E 63 74 69 6F 6E 3B 0D    tion):fonction;.
005E60:  0A 66 6F 72 77 61 72 64 3B 0D 0A 0D 0A 66 75 6E    .forward;....fun
005E70:  63 74 69 6F 6E 20 20 74 61 70 65 66 6F 6E 63 74    ction  tapefonct
005E80:  69 6F 6E 28 66 3A 66 6F 6E 63 74 69 6F 6E 3B 76    ion(f:fonction;v
005E90:  3A 63 68 61 72 29 3A 73 74 72 32 30 30 3B 0D 0A    :char):str200;..
005EA0:  66 6F 72 77 61 72 64 3B 0D 0A 0D 0A 70 72 6F 63    forward;....proc
005EB0:  65 64 75 72 65 20 73 69 6D 70 6C 69 66 28 76 61    edure simplif(va
005EC0:  72 20 66 3A 66 6F 6E 63 74 69 6F 6E 29 3B 0D 0A    r f:fonction);..
005ED0:  76 61 72 20 68 3A 66 6F 6E 63 74 69 6F 6E 3B 6E    var h:fonction;n
005EE0:  62 72 65 3A 72 65 61 6C 3B 0D 0A 62 65 67 69 6E    bre:real;..begin
005EF0:  0D 0A 69 66 20 66 3C 3E 6E 69 6C 20 74 68 65 6E    ..if f<>nil then
005F00:  0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 20 69 66    ..  begin..   if
005F10:  20 28 28 66 5E 2E 64 5E 2E 6E 61 74 75 72 65 3D     ((f^.d^.nature=
005F20:  27 6E 6F 6D 62 72 65 27 29 61 6E 64 28 66 5E 2E    'nombre')and(f^.
005F30:  67 5E 2E 6E 61 74 75 72 65 3D 27 6E 6F 6D 62 72    g^.nature='nombr
005F40:  65 27 29 61 6E 64 28 66 5E 2E 76 61 6C 65 75 72    e')and(f^.valeur
005F50:  3C 3E 27 2F 27 29 29 0D 0A 20 20 20 20 74 68 65    <>'/'))..    the
005F60:  6E 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20    n     begin..   
005F70:  20 20 20 20 20 20 6E 62 72 65 3A 3D 63 61 6C 63          nbre:=calc
005F80:  75 6C 28 66 2C 30 29 3B 69 66 20 66 72 61 63 28    ul(f,0);if frac(
005F90:  6E 62 72 65 29 3D 30 20 74 68 65 6E 20 73 74 72    nbre)=0 then str
005FA0:  28 72 6F 75 6E 64 28 6E 62 72 65 29 2C 66 5E 2E    (round(nbre),f^.
005FB0:  76 61 6C 65 75 72 29 0D 0A 20 20 20 20 20 20 65    valeur)..      e
005FC0:  6C 73 65 0D 0A 20 20 20 20 20 20 62 65 67 69 6E    lse..      begin
005FD0:  0D 0A 20 20 20 20 20 20 73 74 72 28 6E 62 72 65    ..      str(nbre
005FE0:  3A 38 3A 33 2C 66 5E 2E 76 61 6C 65 75 72 29 3B    :8:3,f^.valeur);
005FF0:  0D 0A 20 20 20 20 20 20 77 68 69 6C 65 20 70 6F    ..      while po
006000:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
006010:  05 00 00 00 02 09 4E E5 05 00 41 02 00 00 00 02    ......N...A.....
006020:  05 00 42 02 00 00 00 02 05 00 43 02 00 00 00 02    ..B.......C.....
006030:  05 00 44 02 00 00 00 02 05 00 45 02 00 00 00 02    ..D.......E.....
006040:  05 00 46 02 00 00 00 02 05 00 47 02 00 00 00 02    ..F.......G.....
006050:  05 00 48 02 00 00 00 02 05 00 49 02 00 00 00 02    ..H.......I.....
006060:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
006070:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
006080:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
006090:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0060A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0060B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0060C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0060D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0060E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0060F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
006100:  73 28 27 20 27 2C 66 5E 2E 76 61 6C 65 75 72 29    s(' ',f^.valeur)
006110:  3C 3E 30 20 64 6F 20 64 65 6C 65 74 65 28 66 5E    <>0 do delete(f^
006120:  2E 76 61 6C 65 75 72 2C 31 2C 31 29 3B 0D 0A 20    .valeur,1,1);.. 
006130:  20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20         end;..     
006140:  20 66 5E 2E 6E 61 74 75 72 65 3A 3D 27 6E 6F 6D     f^.nature:='nom
006150:  62 72 65 27 3B 0D 0A 20 20 20 20 20 20 66 5E 2E    bre';..      f^.
006160:  67 3A 3D 6E 69 6C 3B 66 5E 2E 64 3A 3D 6E 69 6C    g:=nil;f^.d:=nil
006170:  3B 72 65 73 75 6C 74 3A 3D 31 3B 0D 0A 20 20 20    ;result:=1;..   
006180:  20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20         end..      
006190:  20 20 65 6C 73 65 0D 0A 20 20 20 69 66 20 28 28      else..   if ((
0061A0:  66 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20 61    f^.valeur='*') a
0061B0:  6E 64 20 28 66 5E 2E 64 5E 2E 6E 61 74 75 72 65    nd (f^.d^.nature
0061C0:  3D 27 6E 6F 6D 62 72 65 27 29 20 61 6E 64 20 28    ='nombre') and (
0061D0:  66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 31 27    f^.d^.valeur='1'
0061E0:  29 29 0D 0A 20 20 20 20 20 20 20 20 20 20 20 74    ))..           t
0061F0:  68 65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20    hen begin..     
006200:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006210:  66 3A 3D 66 5E 2E 67 3B 0D 0A 20 20 20 20 20 20    f:=f^.g;..      
006220:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73                   s
006230:  69 6D 70 6C 69 66 28 66 29 3B 72 65 73 75 6C 74    implif(f);result
006240:  3A 3D 31 0D 0A 20 20 20 20 20 20 20 20 20 20 20    :=1..           
006250:  20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20          end..     
006260:  20 20 65 6C 73 65 0D 0A 20 20 20 69 66 20 28 28      else..   if ((
006270:  66 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20 61    f^.valeur='*') a
006280:  6E 64 20 28 66 5E 2E 67 5E 2E 6E 61 74 75 72 65    nd (f^.g^.nature
006290:  3D 27 6E 6F 6D 62 72 65 27 29 20 61 6E 64 20 28    ='nombre') and (
0062A0:  66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D 27 31 27    f^.g^.valeur='1'
0062B0:  29 29 0D 0A 20 20 20 20 20 20 20 20 20 20 20 74    ))..           t
0062C0:  68 65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20    hen begin..     
0062D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0062E0:  66 3A 3D 66 5E 2E 64 3B 0D 0A 20 20 20 20 20 20    f:=f^.d;..      
0062F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73                   s
006300:  69 6D 70 6C 69 66 28 66 29 3B 72 65 73 75 6C 74    implif(f);result
006310:  3A 3D 31 0D 0A 20 20 20 20 20 20 20 20 20 20 20    :=1..           
006320:  20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20          end..     
006330:  20 20 65 6C 73 65 0D 0A 20 20 20 69 66 20 28 28      else..   if ((
006340:  28 66 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20    (f^.valeur='*') 
006350:  6F 72 28 66 5E 2E 76 61 6C 65 75 72 3D 27 2F 27    or(f^.valeur='/'
006360:  29 29 61 6E 64 20 28 28 28 66 5E 2E 67 5E 2E 6E    ))and (((f^.g^.n
006370:  61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 29 0D    ature='nombre').
006380:  0A 20 20 20 20 61 6E 64 20 28 66 5E 2E 67 5E 2E    .    and (f^.g^.
006390:  76 61 6C 65 75 72 3D 27 30 27 29 29 20 6F 72 20    valeur='0')) or 
0063A0:  28 66 5E 2E 67 3D 6E 69 6C 29 29 29 0D 0A 20 20    (f^.g=nil)))..  
0063B0:  20 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20      then..        
0063C0:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20      begin..       
0063D0:  20 20 20 20 20 20 20 66 3A 3D 6E 69 6C 3B 72 65           f:=nil;re
0063E0:  73 75 6C 74 3A 3D 31 3B 0D 0A 20 20 20 20 20 20    sult:=1;..      
0063F0:  20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20         end..      
006400:  20 65 6C 73 65 0D 0A 20 20 20 69 66 20 28 28 66     else..   if ((f
006410:  5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20 61 6E    ^.valeur='*') an
006420:  64 20 28 28 28 66 5E 2E 64 5E 2E 6E 61 74 75 72    d (((f^.d^.natur
006430:  65 3D 27 6E 6F 6D 62 72 65 27 29 20 61 6E 64 20    e='nombre') and 
006440:  28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 30    (f^.d^.valeur='0
006450:  27 29 29 0D 0A 20 20 20 6F 72 20 28 66 5E 2E 64    '))..   or (f^.d
006460:  3D 6E 69 6C 29 29 29 20 74 68 65 6E 0D 0A 20 20    =nil))) then..  
006470:  20 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20            begin.. 
006480:  20 20 20 20 20 20 20 20 20 20 20 20 20 66 3A 3D                 f:=
006490:  6E 69 6C 3B 72 65 73 75 6C 74 3A 3D 31 3B 0D 0A    nil;result:=1;..
0064A0:  20 20 20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A               end..
0064B0:  20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20           else..   
0064C0:  69 66 20 28 28 66 5E 2E 76 61 6C 65 75 72 3D 27    if ((f^.valeur='
0064D0:  2A 27 29 20 61 6E 64 20 28 66 5E 2E 67 5E 2E 6E    *') and (f^.g^.n
0064E0:  61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 29 20    ature='nombre') 
0064F0:  61 6E 64 20 28 66 5E 2E 64 5E 2E 76 61 6C 65 75    and (f^.d^.valeu
006500:  72 3D 27 2A 27 29 0D 0A 20 20 20 61 6E 64 20 28    r='*')..   and (
006510:  66 5E 2E 64 5E 2E 67 5E 2E 6E 61 74 75 72 65 3D    f^.d^.g^.nature=
006520:  27 6E 6F 6D 62 72 65 27 29 29 0D 0A 20 20 20 74    'nombre'))..   t
006530:  68 65 6E 20 62 65 67 69 6E 20 68 3A 3D 66 5E 2E    hen begin h:=f^.
006540:  64 3B 66 5E 2E 64 3A 3D 66 5E 2E 67 3B 66 5E 2E    d;f^.d:=f^.g;f^.
006550:  67 3A 3D 68 3B 0D 0A 20 20 20 20 20 20 20 20 20    g:=h;..         
006560:  20 20 20 20 20 68 3A 3D 66 5E 2E 67 5E 2E 64 3B         h:=f^.g^.d;
006570:  66 5E 2E 67 5E 2E 64 3A 3D 66 5E 2E 64 3B 66 5E    f^.g^.d:=f^.d;f^
006580:  2E 64 3A 3D 68 3B 73 69 6D 70 6C 69 66 28 66 5E    .d:=h;simplif(f^
006590:  2E 64 29 3B 73 69 6D 70 6C 69 66 28 66 29 3B 0D    .d);simplif(f);.
0065A0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72    .              r
0065B0:  65 73 75 6C 74 3A 3D 31 0D 0A 20 20 20 20 20 20    esult:=1..      
0065C0:  20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 65 6C      end..       el
0065D0:  73 65 0D 0A 20 20 69 66 20 28 28 28 66 5E 2E 6E    se..  if (((f^.n
0065E0:  61 74 75 72 65 3D 27 70 6C 75 73 27 29 20 6F 72    ature='plus') or
0065F0:  20 28 66 5E 2E 6E 61 74 75 72 65 3D 27 6D 6F 69     (f^.nature='moi
006600:  6E 73 27 29 29 20 61 6E 64 20 28 28 66 5E 2E 64    ns')) and ((f^.d
006610:  3D 6E 69 6C 29 0D 0A 20 20 6F 72 20 28 66 5E 2E    =nil)..  or (f^.
006620:  64 5E 2E 76 61 6C 65 75 72 3D 27 30 27 29 29 29    d^.valeur='0')))
006630:  0D 0A 20 20 74 68 65 6E 0D 0A 20 20 20 20 62 65    ..  then..    be
006640:  67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 66    gin..          f
006650:  3A 3D 66 5E 2E 67 3B 0D 0A 20 20 20 20 20 20 20    :=f^.g;..       
006660:  20 20 20 73 69 6D 70 6C 69 66 28 66 29 3B 72 65       simplif(f);re
006670:  73 75 6C 74 3A 3D 31 0D 0A 20 20 20 20 65 6E 64    sult:=1..    end
006680:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
006690:  20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20            else..  
0066A0:  20 20 69 66 20 28 28 28 66 5E 2E 6E 61 74 75 72      if (((f^.natur
0066B0:  65 3D 27 70 6C 75 73 27 29 20 6F 72 20 28 66 5E    e='plus') or (f^
0066C0:  2E 6E 61 74 75 72 65 3D 27 6D 6F 69 6E 73 27 29    .nature='moins')
0066D0:  29 20 61 6E 64 0D 0A 20 20 20 20 20 28 28 66 5E    ) and..     ((f^
0066E0:  2E 67 3D 6E 69 6C 29 20 6F 72 20 28 66 5E 2E 67    .g=nil) or (f^.g
0066F0:  5E 2E 76 61 6C 65 75 72 3D 27 30 27 29 29 29 0D    ^.valeur='0'))).
006700:  0A 20 20 20 20 74 68 65 6E 0D 0A 20 20 20 20 20    .    then..     
006710:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20      begin..       
006720:  20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C 65          if f^.vale
006730:  75 72 3D 27 2D 27 20 74 68 65 6E 20 66 3A 3D 6F    ur='-' then f:=o
006740:  70 70 6F 73 65 28 66 5E 2E 64 29 20 65 6C 73 65    ppose(f^.d) else
006750:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 66    ..             f
006760:  3A 3D 66 5E 2E 64 3B 0D 0A 20 20 20 20 20 20 20    :=f^.d;..       
006770:  20 20 20 20 20 20 73 69 6D 70 6C 69 66 28 66 29          simplif(f)
006780:  3B 72 65 73 75 6C 74 3A 3D 31 0D 0A 20 20 20 20    ;result:=1..    
006790:  20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20       end..        
0067A0:  20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20             else.. 
0067B0:  20 20 20 69 66 20 28 28 66 5E 2E 6E 61 74 75 72       if ((f^.natur
0067C0:  65 3D 27 70 75 69 73 73 27 29 20 61 6E 64 20 28    e='puiss') and (
0067D0:  66 5E 2E 64 5E 2E 6E 61 74 75 72 65 3D 27 6E 6F    f^.d^.nature='no
0067E0:  6D 62 72 65 27 29 0D 0A 20 20 20 20 20 61 6E 64    mbre')..     and
0067F0:  20 28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27     (f^.d^.valeur='
006800:  31 27 29 29 0D 0A 20 20 20 20 74 68 65 6E 0D 0A    1'))..    then..
006810:  20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20        begin..     
006820:  20 20 20 20 20 66 3A 3D 66 5E 2E 67 3B 0D 0A 20         f:=f^.g;.. 
006830:  20 20 20 20 20 20 20 20 20 73 69 6D 70 6C 69 66             simplif
006840:  28 66 29 3B 72 65 73 75 6C 74 3A 3D 31 0D 0A 20    (f);result:=1.. 
006850:  20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 65 6C        end..     el
006860:  73 65 0D 0A 20 20 20 20 69 66 20 28 28 66 5E 2E    se..    if ((f^.
006870:  6E 61 74 75 72 65 3D 27 70 75 69 73 73 27 29 61    nature='puiss')a
006880:  6E 64 28 66 5E 2E 64 5E 2E 6E 61 74 75 72 65 3D    nd(f^.d^.nature=
006890:  27 6E 6F 6D 62 72 65 27 29 61 6E 64 0D 0A 20 20    'nombre')and..  
0068A0:  20 20 28 66 5E 2E 67 5E 2E 6E 61 74 75 72 65 3D      (f^.g^.nature=
0068B0:  27 70 75 69 73 73 27 29 61 6E 64 28 66 5E 2E 67    'puiss')and(f^.g
0068C0:  5E 2E 64 5E 2E 6E 61 74 75 72 65 3D 27 6E 6F 6D    ^.d^.nature='nom
0068D0:  62 72 65 27 29 29 20 74 68 65 6E 0D 0A 20 20 20    bre')) then..   
0068E0:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20      begin..       
0068F0:  20 20 6E 65 77 28 68 29 3B 68 5E 2E 6E 61 74 75      new(h);h^.natu
006900:  72 65 3A 3D 27 6D 75 6C 74 69 27 3B 68 5E 2E 76    re:='multi';h^.v
006910:  61 6C 65 75 72 3A 3D 27 2A 27 3B 68 5E 2E 64 3A    aleur:='*';h^.d:
006920:  3D 66 5E 2E 64 3B 68 5E 2E 67 3A 3D 66 5E 2E 67    =f^.d;h^.g:=f^.g
006930:  5E 2E 64 3B 0D 0A 20 20 20 20 20 20 20 20 20 66    ^.d;..         f
006940:  5E 2E 64 3A 3D 68 3B 66 5E 2E 67 3A 3D 66 5E 2E    ^.d:=h;f^.g:=f^.
006950:  67 5E 2E 67 3B 73 69 6D 70 6C 69 66 28 66 5E 2E    g^.g;simplif(f^.
006960:  64 29 3B 72 65 73 75 6C 74 3A 3D 31 0D 0A 20 20    d);result:=1..  
006970:  20 20 20 65 6E 64 0D 0A 20 20 20 20 20 65 6C 73       end..     els
006980:  65 0D 0A 20 20 20 20 20 62 65 67 69 6E 0D 0A 20    e..     begin.. 
006990:  20 20 20 20 69 66 20 66 5E 2E 64 3C 3E 6E 69 6C        if f^.d<>nil
0069A0:  20 74 68 65 6E 20 73 69 6D 70 6C 69 66 28 66 5E     then simplif(f^
0069B0:  2E 64 29 3B 0D 0A 20 20 20 20 20 69 66 20 66 5E    .d);..     if f^
0069C0:  2E 67 3C 3E 6E 69 6C 20 74 68 65 6E 20 73 69 6D    .g<>nil then sim
0069D0:  70 6C 69 66 28 66 5E 2E 67 29 3B 0D 0A 20 20 20    plif(f^.g);..   
0069E0:  65 6E 64 3B 0D 0A 20 20 20 65 6E 64 3B 0D 0A 20    end;..   end;.. 
0069F0:  65 6E 64 3B 0D 0A 0D 0A 66 75 6E 63 74 69 6F 6E    end;....function
006A00:  20 20 20 65 78 70 6F 73 61 6E 74 28 6B 2C 6C 3A       exposant(k,l:
006A10:  72 65 61 6C 29 3A 72 65 61 6C 3B 0D 0A 66 6F 72    real):real;..for
006A20:  77 61 72 64 3B 0D 0A 0D 0A 66 75 6E 63 74 69 6F    ward;....functio
006A30:  6E 20 20 20 63 61 6C 63 75 6C 3B 0D 0A 6C 61 62    n   calcul;..lab
006A40:  65 6C 20 66 69 6E 63 61 6C 63 75 6C 3B 0D 0A 76    el fincalcul;..v
006A50:  61 72 20 6E 62 72 65 3A 72 65 61 6C 3B 72 65 73    ar nbre:real;res
006A60:  75 6C 74 61 74 3A 69 6E 74 65 67 65 72 3B 0D 0A    ultat:integer;..
006A70:  62 65 67 69 6E 0D 0A 20 20 69 66 20 66 5E 2E 6E    begin..  if f^.n
006A80:  61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 20 74    ature='nombre' t
006A90:  68 65 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20    hen..           
006AA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006AB0:  20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20       begin..      
006AC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006AD0:  20 20 20 20 20 20 20 20 76 61 6C 28 66 5E 2E 76            val(f^.v
006AE0:  61 6C 65 75 72 2C 6E 62 72 65 2C 72 65 73 75 6C    aleur,nbre,resul
006AF0:  74 61 74 29 3B 0D 0A 20 20 20 20 20 20 20 20 20    tat);..         
006B00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006B10:  20 20 20 20 20 63 61 6C 63 75 6C 3A 3D 6E 62 72         calcul:=nbr
006B20:  65 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    e;..            
006B30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006B40:  20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20 20      end..         
006B50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006B60:  20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 69 66          else..  if
006B70:  20 66 5E 2E 6E 61 74 75 72 65 3D 27 70 61 72 61     f^.nature='para
006B80:  6D 27 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20    m' then..       
006B90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006BA0:  20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20           begin..  
006BB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006BC0:  20 20 20 20 20 20 20 20 20 20 20 20 76 61 6C 28                val(
006BD0:  66 5E 2E 76 61 6C 65 75 72 2C 69 6E 64 69 63 65    f^.valeur,indice
006BE0:  2C 72 65 73 75 6C 74 61 74 29 3B 0D 0A 20 20 20    ,resultat);..   
006BF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006C00:  20 20 20 20 20 20 20 20 20 20 20 63 61 6C 63 75               calcu
006C10:  6C 3A 3D 70 5B 69 6E 64 69 63 65 2C 69 5D 3B 0D    l:=p[indice,i];.
006C20:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
006C30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65                   e
006C40:  6E 64 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    nd..            
006C50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006C60:  20 20 65 6C 73 65 0D 0A 20 20 69 66 20 66 5E 2E      else..  if f^.
006C70:  6E 61 74 75 72 65 3D 27 76 61 72 69 61 62 27 20    nature='variab' 
006C80:  74 68 65 6E 20 63 61 6C 63 75 6C 3A 3D 78 20 65    then calcul:=x e
006C90:  6C 73 65 0D 0A 20 20 69 66 20 66 5E 2E 6E 61 74    lse..  if f^.nat
006CA0:  75 72 65 3D 27 70 6C 75 73 27 20 74 68 65 6E 20    ure='plus' then 
006CB0:  63 61 6C 63 75 6C 3A 3D 63 61 6C 63 75 6C 28 66    calcul:=calcul(f
006CC0:  5E 2E 67 2C 78 29 2B 63 61 6C 63 75 6C 28 66 5E    ^.g,x)+calcul(f^
006CD0:  2E 64 2C 78 29 20 65 6C 73 65 0D 0A 20 20 69 66    .d,x) else..  if
006CE0:  20 66 5E 2E 6E 61 74 75 72 65 3D 27 6D 6F 69 6E     f^.nature='moin
006CF0:  73 27 20 74 68 65 6E 20 63 61 6C 63 75 6C 3A 3D    s' then calcul:=
006D00:  63 61 6C 63 75 6C 28 66 5E 2E 67 2C 78 29 2D 63    calcul(f^.g,x)-c
006D10:  61 6C 63 75 6C 28 66 5E 2E 64 2C 78 29 20 65 6C    alcul(f^.d,x) el
006D20:  73 65 0D 0A 20 20 69 66 20 66 5E 2E 6E 61 74 75    se..  if f^.natu
006D30:  72 65 3D 27 6D 75 6C 74 69 27 20 74 68 65 6E 20    re='multi' then 
006D40:  63 61 6C 63 75 6C 3A 3D 63 61 6C 63 75 6C 28 66    calcul:=calcul(f
006D50:  5E 2E 67 2C 78 29 2A 63 61 6C 63 75 6C 28 66 5E    ^.g,x)*calcul(f^
006D60:  2E 64 2C 78 29 20 65 6C 73 65 0D 0A 20 20 69 66    .d,x) else..  if
006D70:  20 66 5E 2E 6E 61 74 75 72 65 3D 27 70 75 69 73     f^.nature='puis
006D80:  73 27 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20    s' then..       
006D90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 65                  be
006DA0:  67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20    gin..           
006DB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006DC0:  20 69 66 20 66 72 61 63 28 63 61 6C 63 75 6C 28     if frac(calcul(
006DD0:  66 5E 2E 64 2C 78 29 29 3D 30 20 74 68 65 6E 0D    f^.d,x))=0 then.
006DE0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
006DF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6C                 cal
006E00:  63 75 6C 3A 3D 65 78 70 6F 73 61 6E 74 28 63 61    cul:=exposant(ca
006E10:  6C 63 75 6C 28 66 5E 2E 67 2C 78 29 2C 63 61 6C    lcul(f^.g,x),cal
006E20:  63 75 6C 28 66 5E 2E 64 2C 78 29 29 0D 0A 20 20    cul(f^.d,x))..  
006E30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006E40:  20 20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A              else..
006E50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006E60:  20 20 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D              begin.
006E70:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
006E80:  20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20                 if 
006E90:  63 61 6C 63 75 6C 28 66 5E 2E 67 2C 78 29 3C 3D    calcul(f^.g,x)<=
006EA0:  30 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20    0 then..        
006EB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006EC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006ED0:  20 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A             begin..
006EE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006EF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006F00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006F10:  20 20 20 64 65 66 69 6E 69 3A 3D 66 61 6C 73 65       defini:=false
006F20:  3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    ;..             
006F30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006F40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006F50:  20 20 20 20 20 20 67 6F 74 6F 20 66 69 6E 63 61          goto finca
006F60:  6C 63 75 6C 3B 0D 0A 20 20 20 20 20 20 20 20 20    lcul;..         
006F70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006F80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006F90:  20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20             end..  
006FA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006FB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006FC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006FD0:  20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20       else..       
006FE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006FF0:  20 20 20 20 20 63 61 6C 63 75 6C 3A 3D 65 78 70         calcul:=exp
007000:  28 28 6C 6E 28 63 61 6C 63 75 6C 28 66 5E 2E 67    ((ln(calcul(f^.g
007010:  2C 78 29 29 29 2A 63 61 6C 63 75 6C 28 66 5E 2E    ,x)))*calcul(f^.
007020:  64 2C 78 29 29 0D 0A 20 20 20 20 20 20 20 20 20    d,x))..         
007030:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007040:  20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20 20 20     end..          
007050:  20 20 20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A               end..
007060:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007070:  20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C 73                 els
007080:  65 0D 0A 20 20 69 66 20 66 5E 2E 6E 61 74 75 72    e..  if f^.natur
007090:  65 3D 27 64 69 76 69 73 65 27 20 74 68 65 6E 0D    e='divise' then.
0070A0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
0070B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 62 65 67                 beg
0070C0:  69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    in..            
0070D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0070E0:  69 66 20 63 61 6C 63 75 6C 28 66 5E 2E 64 2C 78    if calcul(f^.d,x
0070F0:  29 3D 30 20 74 68 65 6E 20 62 65 67 69 6E 0D 0A    )=0 then begin..
007100:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007110:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007120:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007130:  20 20 20 64 65 66 69 6E 69 3A 3D 66 61 6C 73 65       defini:=false
007140:  3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    ;..             
007150:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007160:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007170:  20 20 20 20 20 20 67 6F 74 6F 20 66 69 6E 63 61          goto finca
007180:  6C 63 75 6C 3B 0D 0A 20 20 20 20 20 20 20 20 20    lcul;..         
007190:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0071A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0071B0:  20 20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20              end.. 
0071C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0071D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0071E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0071F0:  20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20         else..     
007200:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007210:  20 20 20 20 20 20 20 20 63 61 6C 63 75 6C 3A 3D            calcul:=
007220:  63 61 6C 63 75 6C 28 66 5E 2E 67 2C 78 29 2F 63    calcul(f^.g,x)/c
007230:  61 6C 63 75 6C 28 66 5E 2E 64 2C 78 29 0D 0A 20    alcul(f^.d,x).. 
007240:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007250:  20 20 20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A               end..
007260:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007270:  20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C 73                 els
007280:  65 0D 0A 20 20 69 66 20 66 5E 2E 6E 61 74 75 72    e..  if f^.natur
007290:  65 3D 27 69 64 66 63 74 27 20 74 68 65 6E 0D 0A    e='idfct' then..
0072A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0072B0:  20 20 20 20 20 20 20 20 20 20 20 20 62 65 67 69                begi
0072C0:  6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    n..             
0072D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0072E0:  6E 62 72 65 3A 3D 63 61 6C 63 75 6C 28 66 5E 2E    nbre:=calcul(f^.
0072F0:  64 2C 78 29 3B 0D 0A 20 20 20 20 20 20 20 20 20    d,x);..         
007300:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
007310:  06 00 00 00 02 09 4E E5 06 00 41 02 00 00 00 02    ......N...A.....
007320:  06 00 42 02 00 00 00 02 06 00 43 02 00 00 00 02    ..B.......C.....
007330:  06 00 44 02 00 00 00 02 06 00 45 02 00 00 00 02    ..D.......E.....
007340:  06 00 46 02 00 00 00 02 06 00 47 02 00 00 00 02    ..F.......G.....
007350:  06 00 48 02 00 00 00 02 06 00 49 02 00 00 00 02    ..H.......I.....
007360:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
007370:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
007380:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
007390:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0073A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0073B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0073C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0073D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0073E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0073F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
007400:  70 72 6F 63 65 64 75 72 65 20 64 72 61 77 72 28    procedure drawr(
007410:  78 2C 79 3A 69 6E 74 65 67 65 72 29 3B 0D 0A 62    x,y:integer);..b
007420:  65 67 69 6E 0D 0A 20 20 69 6E 6C 69 6E 65 28 24    egin..  inline($
007430:  32 41 2F 78 2F 24 45 42 2F 24 32 41 2F 79 2F 24    2A/x/$EB/$2A/y/$
007440:  63 64 2F 24 35 61 2F 24 66 63 2F 24 46 39 2F 24    cd/$5a/$fc/$F9/$
007450:  42 42 29 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72    BB);..end;....pr
007460:  6F 63 65 64 75 72 65 20 64 72 61 77 28 78 2C 79    ocedure draw(x,y
007470:  3A 69 6E 74 65 67 65 72 29 3B 0D 0A 62 65 67 69    :integer);..begi
007480:  6E 0D 0A 20 20 69 6E 6C 69 6E 65 28 24 32 41 2F    n..  inline($2A/
007490:  78 2F 24 45 42 2F 24 32 41 2F 79 2F 24 63 64 2F    x/$EB/$2A/y/$cd/
0074A0:  24 35 61 2F 24 66 63 2F 24 46 36 2F 24 42 42 29    $5a/$fc/$F6/$BB)
0074B0:  3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65    ;..end;....proce
0074C0:  64 75 72 65 20 67 72 61 66 6D 6F 76 65 28 78 2C    dure grafmove(x,
0074D0:  79 3A 69 6E 74 65 67 65 72 29 3B 0D 0A 62 65 67    y:integer);..beg
0074E0:  69 6E 0D 0A 20 20 69 6E 6C 69 6E 65 28 24 32 41    in..  inline($2A
0074F0:  2F 78 2F 24 45 42 2F 24 32 41 2F 79 2F 24 63 64    /x/$EB/$2A/y/$cd
007500:  2F 24 35 61 2F 24 66 63 2F 24 43 30 2F 24 42 42    /$5a/$fc/$C0/$BB
007510:  29 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63    );..end;....proc
007520:  65 64 75 72 65 20 67 72 61 66 6D 6F 76 65 72 28    edure grafmover(
007530:  78 2C 79 3A 69 6E 74 65 67 65 72 29 3B 0D 0A 62    x,y:integer);..b
007540:  65 67 69 6E 0D 0A 20 20 69 6E 6C 69 6E 65 28 24    egin..  inline($
007550:  32 41 2F 78 2F 24 45 42 2F 24 32 41 2F 79 2F 24    2A/x/$EB/$2A/y/$
007560:  63 64 2F 24 35 61 2F 24 66 63 2F 24 63 33 2F 24    cd/$5a/$fc/$c3/$
007570:  42 42 29 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72    BB);..end;....pr
007580:  6F 63 65 64 75 72 65 20 70 6C 6F 74 28 78 2C 79    ocedure plot(x,y
007590:  3A 69 6E 74 65 67 65 72 29 3B 0D 0A 62 65 67 69    :integer);..begi
0075A0:  6E 0D 0A 20 20 69 6E 6C 69 6E 65 28 24 32 41 2F    n..  inline($2A/
0075B0:  78 2F 24 45 42 2F 24 32 41 2F 79 2F 24 63 64 2F    x/$EB/$2A/y/$cd/
0075C0:  24 35 61 2F 24 66 63 2F 24 45 41 2F 24 42 42 29    $5a/$fc/$EA/$BB)
0075D0:  3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65    ;..end;....proce
0075E0:  64 75 72 65 20 70 6C 6F 74 72 28 78 2C 79 3A 69    dure plotr(x,y:i
0075F0:  6E 74 65 67 65 72 29 3B 0D 0A 62 65 67 69 6E 0D    nteger);..begin.
007600:  0A 20 20 69 6E 6C 69 6E 65 28 24 32 41 2F 78 2F    .  inline($2A/x/
007610:  24 45 42 2F 24 32 41 2F 79 2F 24 63 64 2F 24 35    $EB/$2A/y/$cd/$5
007620:  61 2F 24 66 63 2F 24 45 44 2F 24 42 42 29 3B 0D    a/$fc/$ED/$BB);.
007630:  0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 75    .end;....procedu
007640:  72 65 20 6F 72 69 67 69 6E 28 78 2C 79 3A 69 6E    re origin(x,y:in
007650:  74 65 67 65 72 29 3B 0D 0A 62 65 67 69 6E 0D 0A    teger);..begin..
007660:  20 20 69 6E 6C 69 6E 65 28 24 32 41 2F 78 2F 24      inline($2A/x/$
007670:  45 42 2F 24 32 41 2F 79 2F 24 63 64 2F 24 35 61    EB/$2A/y/$cd/$5a
007680:  2F 24 66 63 2F 24 43 39 2F 24 42 42 29 3B 0D 0A    /$fc/$C9/$BB);..
007690:  65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 72    end;....procedur
0076A0:  65 20 62 6F 72 64 65 72 28 76 31 2C 76 32 3A 62    e border(v1,v2:b
0076B0:  79 74 65 29 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20    yte);..begin..  
0076C0:  69 6E 6C 69 6E 65 28 24 33 61 2F 76 31 2F 24 34    inline($3a/v1/$4
0076D0:  37 2F 24 33 61 2F 76 32 2F 24 34 66 2F 24 63 64    7/$3a/v2/$4f/$cd
0076E0:  2F 24 35 61 2F 24 66 63 2F 24 33 38 2F 24 62 63    /$5a/$fc/$38/$bc
0076F0:  29 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 66 75 6E 63    );..end;....func
007700:  74 69 6F 6E 20 20 74 65 73 74 28 78 2C 79 3A 69    tion  test(x,y:i
007710:  6E 74 65 67 65 72 29 3A 62 79 74 65 3B 0D 0A 76    nteger):byte;..v
007720:  61 72 0D 0A 62 74 67 3A 62 79 74 65 3B 0D 0A 62    ar..btg:byte;..b
007730:  65 67 69 6E 0D 0A 69 6E 6C 69 6E 65 28 24 32 41    egin..inline($2A
007740:  2F 78 2F 24 45 42 2F 24 32 41 2F 79 2F 24 43 44    /x/$EB/$2A/y/$CD
007750:  2F 24 35 41 2F 24 46 43 2F 24 46 30 2F 24 42 42    /$5A/$FC/$F0/$BB
007760:  2F 24 33 32 2F 62 74 67 29 3B 0D 0A 74 65 73 74    /$32/btg);..test
007770:  3A 3D 62 74 67 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A    :=btg;..end;....
007780:  0D 0A 70 72 6F 63 65 64 75 72 65 20 20 76 69 64    ..procedure  vid
007790:  61 67 65 3B 0D 0A 76 61 72 0D 0A 78 2C 79 2C 6A    age;..var..x,y,j
0077A0:  2C 6E 3A 69 6E 74 65 67 65 72 3B 0D 0A 62 65 67    ,n:integer;..beg
0077B0:  69 6E 0D 0A 77 72 69 74 65 28 6C 73 74 2C 63 68    in..write(lst,ch
0077C0:  72 28 32 37 29 2C 27 40 27 2C 63 68 72 28 32 37    r(27),'@',chr(27
0077D0:  29 2C 27 33 27 2C 63 68 72 28 32 31 29 29 3B 0D    ),'3',chr(21));.
0077E0:  0A 66 6F 72 20 79 3A 3D 30 20 74 6F 20 32 38 20    .for y:=0 to 28 
0077F0:  64 6F 0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 77    do..  begin..  w
007800:  72 69 74 65 28 6C 73 74 2C 63 68 72 28 32 37 29    rite(lst,chr(27)
007810:  2C 27 2A 27 2C 63 68 72 28 33 29 2C 63 68 72 28    ,'*',chr(3),chr(
007820:  30 29 2C 63 68 72 28 35 29 29 3B 0D 0A 20 20 66    0),chr(5));..  f
007830:  6F 72 20 78 3A 3D 30 20 74 6F 20 36 33 39 20 64    or x:=0 to 639 d
007840:  6F 0D 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20    o..    begin..  
007850:  20 20 6E 3A 3D 30 3B 0D 0A 20 20 20 20 66 6F 72      n:=0;..    for
007860:  20 6A 3A 3D 30 20 74 6F 20 36 20 64 6F 0D 0A 20     j:=0 to 6 do.. 
007870:  20 20 20 6E 3A 3D 6E 2A 32 2B 74 65 73 74 28 78       n:=n*2+test(x
007880:  2C 33 39 38 2D 28 79 2A 37 2B 6A 29 2A 32 29 3B    ,398-(y*7+j)*2);
007890:  0D 0A 20 20 20 20 77 72 69 74 65 28 6C 73 74 2C    ..    write(lst,
0078A0:  63 68 72 28 6E 29 2C 63 68 72 28 6E 29 29 3B 0D    chr(n),chr(n));.
0078B0:  0A 20 20 20 20 65 6E 64 3B 0D 0A 20 20 77 72 69    .    end;..  wri
0078C0:  74 65 28 6C 73 74 2C 63 68 72 28 31 33 29 2C 63    te(lst,chr(13),c
0078D0:  68 72 28 31 30 29 29 3B 0D 0A 20 20 65 6E 64 3B    hr(10));..  end;
0078E0:  0D 0A 77 72 69 74 65 28 6C 73 74 2C 63 68 72 28    ..write(lst,chr(
0078F0:  31 33 29 2C 63 68 72 28 32 37 29 2C 27 40 27 29    13),chr(27),'@')
007900:  3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 1A 1A 1A 1A 1A    ;..end;.........
007910:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
007920:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
007930:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
007940:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
007950:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
007960:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
007970:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
007980:  6C 3C 30 20 74 68 65 6E 20 62 65 67 69 6E 20 6C    l<0 then begin l
007990:  3A 3D 6C 2B 31 3B 65 78 70 6F 73 61 6E 74 3A 3D    :=l+1;exposant:=
0079A0:  28 31 2F 6B 29 2A 65 78 70 6F 73 61 6E 74 28 6B    (1/k)*exposant(k
0079B0:  2C 6C 29 20 65 6E 64 3B 0D 0A 65 6E 64 3B 0D 0A    ,l) end;..end;..
0079C0:  0D 0A 0D 0D 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0079D0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0079E0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0079F0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
007A00:  73 28 27 20 27 2C 66 5E 2E 76 61 6C 65 75 72 29    s(' ',f^.valeur)
007A10:  3C 3E 30 20 64 6F 20 64 65 6C 65 74 65 28 66 5E    <>0 do delete(f^
007A20:  2E 76 61 6C 65 75 72 2C 31 2C 31 29 3B 0D 0A 20    .valeur,1,1);.. 
007A30:  20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20         end;..     
007A40:  20 66 5E 2E 6E 61 74 75 72 65 3A 3D 27 6E 6F 6D     f^.nature:='nom
007A50:  62 72 65 27 3B 0D 0A 20 20 20 20 20 20 66 5E 2E    bre';..      f^.
007A60:  67 3A 3D 6E 69 6C 3B 66 5E 2E 64 3A 3D 6E 69 6C    g:=nil;f^.d:=nil
007A70:  3B 72 65 73 75 6C 74 3A 3D 31 3B 0D 0A 20 20 20    ;result:=1;..   
007A80:  20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20         end..      
007A90:  20 20 65 6C 73 65 0D 0A 20 20 20 69 66 20 28 28      else..   if ((
007AA0:  66 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20 61    f^.valeur='*') a
007AB0:  6E 64 20 28 66 5E 2E 64 5E 2E 6E 61 74 75 72 65    nd (f^.d^.nature
007AC0:  3D 27 6E 6F 6D 62 72 65 27 29 20 61 6E 64 20 28    ='nombre') and (
007AD0:  66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 31 27    f^.d^.valeur='1'
007AE0:  29 29 0D 0A 20 20 20 20 20 20 20 20 20 20 20 74    ))..           t
007AF0:  68 65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20    hen begin..     
007B00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007B10:  66 3A 3D 66 5E 2E 67 3B 0D 0A 20 20 20 20 20 20    f:=f^.g;..      
007B20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73                   s
007B30:  69 6D 70 6C 69 66 28 66 29 3B 72 65 73 75 6C 74    implif(f);result
007B40:  3A 3D 31 0D 0A 20 20 20 20 20 20 20 20 20 20 20    :=1..           
007B50:  20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20          end..     
007B60:  20 20 65 6C 73 65 0D 0A 20 20 20 69 66 20 28 28      else..   if ((
007B70:  66 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20 61    f^.valeur='*') a
007B80:  6E 64 20 28 66 5E 2E 67 5E 2E 6E 61 74 75 72 65    nd (f^.g^.nature
007B90:  3D 27 6E 6F 6D 62 72 65 27 29 20 61 6E 64 20 28    ='nombre') and (
007BA0:  66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D 27 31 27    f^.g^.valeur='1'
007BB0:  29 29 0D 0A 20 20 20 20 20 20 20 20 20 20 20 74    ))..           t
007BC0:  68 65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20    hen begin..     
007BD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007BE0:  66 3A 3D 66 5E 2E 64 3B 0D 0A 20 20 20 20 20 20    f:=f^.d;..      
007BF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73                   s
007C00:  C3 E2 20 CD AB 43 6F 70 79 72 69 67 68 74 20 28    .. ..Copyright (
007C10:  43 29 20 31 39 38 35 20 42 4F 52 4C 41 4E 44 20    C) 1985 BORLAND 
007C20:  49 6E 63 00 04 00 A1 42 00 00 00 00 00 00 00 00    Inc....B........
007C30:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
007C40:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
007C50:  00 00 00 06 5A 65 6E 69 74 68 64 65 72 20 43 50    ....Zenithder CP
007C60:  43 34 36 34 2F 36 36 34 50 18 00 00 1C 00 0D 0D    C464/664P.......
007C70:  1C 01 01 01 1D 03 03 1B 1B 1B D5 00 1C 01 00 00    ................
007C80:  1C 00 17 17 1D 17 17 EF 9E CD BD 04 1B 59 00 00    .............Y..
007C90:  00 00 00 00 00 00 00 00 00 00 00 01 20 20 04 03    ............  ..
007CA0:  00 00 02 1B 45 00 00 00 00 00 00 00 00 00 02 1B    ....E...........
007CB0:  4C 00 00 00 02 1B 4D 00 00 00 00 00 02 1B 4B 00    L.....M.......K.
007CC0:  00 00 02 1B 71 00 00 00 02 1B 70 00 00 00 00 00    ....q.....p.....
007CD0:  7E B7 37 C8 23 F5 E5 7E CD E8 01 E1 F1 3D C8 18    ~.7.#..~.....=..
007CE0:  F3 CD 00 02 0D 0A 00 C9 6F E5 CD A6 00 C9 FE 80    ........o.......
007CF0:  DC 6B 02 D4 84 02 E6 7F 18 EE E5 21 EE 01 18 04    .k.........!....
007D00:  E5 21 E8 01 22 13 02 E1 E3 F5 C5 D5 7E 23 B7 28    .!..".......~#.(
007D10:  07 E5 CD E8 01 E1 18 F4 D1 C1 F1 E3 C9 7D B4 C8    .............}..
007D20:  3A 24 01 87 87 87 E3 E3 E3 E3 C5 01 D2 04 C1 3D    :$.............=
007D30:  20 F4 2B 18 E8 CD D0 01 D8 2A CE 01 18 DF F5 C5     .+......*......
007D40:  D5 E5 21 A8 01 CD 35 02 21 A2 01 CD D0 01 2A BA    ..!...5.!.....*.
007D50:  01 D4 1D 02 E1 D1 C1 F1 C9 F5 C5 D5 E5 21 B4 01    .............!..
007D60:  18 E9 F5 C5 D5 E5 21 AE 01 18 E0 F5 3A E0 00 B7    ......!.....:...
007D70:  28 10 C5 D5 E5 AF 32 E0 00 21 C8 01 CD 35 02 E1    (.....2..!...5..
007D80:  D1 C1 F1 C9 F5 3A E0 00 FE FF 28 F6 C5 D5 E5 3E    .....:....(....>
007D90:  FF 32 E0 00 21 C2 01 18 E3 F5 C5 D5 E5 21 BC 01    .2..!........!..
007DA0:  18 DA F5 C5 D5 E5 E5 11 F0 00 21 8B 01 01 10 00    ..........!.....
007DB0:  ED B0 D1 3A 9E 01 4F 3A 9C 01 82 D5 CD DC 02 D1    ...:..O:........
007DC0:  3A 9F 01 4F 3A 9D 01 83 CD DC 02 21 F0 00 CD D0    :..O:......!....
007DD0:  01 2A A0 01 CD 1D 02 E1 D1 C1 F1 C9 21 F0 00 06    .*..........!...
007DE0:  00 09 EB 21 9B 01 34 35 28 02 12 C9 1B 1B 21 0A    ...!..45(.....!.
007DF0:  03 06 03 2B 0E 2F 0C 96 30 FC 86 F5 79 FE 30 28    ...+./..0...y.0(
007E00:  01 12 13 F1 10 ED C9 01 0A 64 21 6B 01 C3 35 02    .........d!k..5.
007E10:  21 7B 01 C3 35 02 11 03 00 CD 5F 03 E6 01 18 06    !{..5....._.....
007E20:  11 06 00 CD 5F 03 6F 26 00 C9 11 12 00 18 F4 11    ...._.o&........
007E30:  0C 00 18 08 11 0F 00 18 03 11 09 00 E1 C1 E5 3A    ...............:
007E40:  DD 00 B7 28 1A D5 C5 CD A0 00 7C B5 28 0F CD E1    ...(......|.(...
007E50:  03 FE 13 20 08 CD E1 03 FE 03 CA D4 20 C1 D1 2A    ... ........ ..*
007E60:  01 00 19 E9 22 D2 00 78 32 DD 00 79 B7 28 0B 3E    ...."..x2..y.(.>
007E70:  C3 32 38 00 21 FB 1F 22 39 00 21 A5 03 11 A0 00    .28.!.."9.!.....
007E80:  01 18 00 ED B0 21 BD 03 11 B8 00 01 0C 00 ED B0    .....!..........
007E90:  AF 6F 67 32 D0 00 22 D4 00 22 D6 00 3E 7E 32 D1    .og2..".."..>~2.
007EA0:  00 32 E0 00 C9 C3 16 03 C3 20 03 C3 39 03 C3 2F    .2....... ..9../
007EB0:  03 C3 34 03 C3 2A 03 C3 39 03 C3 20 03 C1 00 82    ..4..*..9.. ....
007EC0:  00 43 00 C4 00 C5 00 C1 00 C5 D5 E5 DD E5 FD E5    .C..............
007ED0:  F5 6F 26 00 E5 CD A6 00 F1 FD E1 DD E1 E1 D1 C1    .o&.............
007EE0:  C9 C5 D5 E5 DD E5 FD E5 CD A3 00 7D 18 EB 0E FF    .........£.}....
007EF0:  18 0C 0E 00 ED 5B D2 00 13 1A FE 20 28 FA 21 65    .....[..... (.!e
007F00:  00 06 03 CD 7B 04 1A CD A6 04 FE 41 38 12 FE 51    ....{......A8..Q
007F10:  30 0E 47 13 1A FE 3A 20 06 78 D6 40 13 18 02 1B    0.G...: .x.@....
007F20:  AF 21 5C 00 77 23 0C 0D 28 19 1A CD 82 04 20 13    .!\.w#..(..... .
007F30:  FE 3F 28 0F FE 2A 28 0B FE 2E 28 07 06 0B CD 77    .?(..*(...(....w
007F40:  04 18 10 06 08 CD 5E 04 1A FE 2E 20 06 13 06 03    ......^.... ....
007F50:  CD 5E 04 21 68 00 06 18 36 00 23 10 FB C9 1A 0C    .^.!h...6.#.....
007F60:  0D 28 08 FE 3F 28 09 FE 2A 28 0B CD 82 04 28 0B    .(..?(..*(....(.
007F70:  77 23 13 10 E9 C9 13 3E 3F 18 02 3E 20 77 23 10    w#.....>?..> w#.
007F80:  FC C9 CD A6 04 FE 20 38 0D E5 C5 21 98 04 01 0E    ...... 8...!....
007F90:  00 ED B1 C1 E1 C9 BF C9 20 2E 2C 3B 3A 3D 3F 2A    ........ .,;:=?*
007FA0:  5B 5D 3C 3E 7B 7D FE 61 D8 FE 7B D0 D6 20 C9 7C    []<>{}.a..{.. .|
007FB0:  CD B4 04 7D F5 1F 1F 1F 1F CD BD 04 F1 E6 0F C6    ...}............
007FC0:  90 27 CE 40 27 C3 C9 03 AF 37 CB 7C C0 7C B7 7D    .'.@'....7.|.|.}
007FD0:  C8 3E FF C9 32 D8 00 C5 CD AF 1E C1 2A 06 00 B7    .>..2.......*...
007FE0:  ED 42 DA A8 20 EB D1 F9 01 00 FC 09 22 C6 00 AF    .B.. ......."...
007FF0:  6F 67 22 CE 00 32 DC 00 3E C3 32 D9 00 21 DE 20    og"..2..>.2..!. 
008000:  22 DA 00 EB 22 CC 00 E9 E5 2A C6 00 B7 ED 42 22    "..."....*....B"
008010:  C6 00 ED 5B C4 00 B7 ED 52 19 EB E1 DA 75 1D ED    ...[....R....u..
008020:  B0 C9 2A C6 00 ED B0 22 C6 00 D9 C9 5E 23 56 23    ..*...."....^#V#
008030:  D5 5E 23 56 23 4E 23 46 E1 C9 DD E1 EB 1A 4F 06    .^#V#N#F......O.
008040:  00 2F 6F 26 FF 39 F9 EB 03 ED B0 DD E9 D1 1A 4F    ./o&.9.........O
008050:  06 00 2F 6F 26 FF 39 F9 EB 03 ED B0 E9 DD E1 EB    ../o&.9.........
008060:  21 E0 FF 39 F9 EB C5 04 05 28 05 AF 12 13 10 FC    !..9.....(......
008070:  ED B0 C1 3E 20 90 91 28 06 47 AF 12 13 10 FC DD    ...> ..(.G......
008080:  E9 DD E1 21 E0 FF 39 F9 06 20 AF 77 23 10 FC DD    ...!..9.. .w#...
008090:  E9 DD E1 45 CD BA 05 B6 77 DD E9 DD E1 D1 7D 93    ...E....w.....}.
0080A0:  38 F7 3C 4F 43 CD BA 05 5F 41 AF B3 CB 23 30 06    8.<OC..._A...#0.
0080B0:  B6 77 23 AF 1E 01 10 F3 18 DD 78 E6 F8 0F 0F 0F    .w#.......x.....
0080C0:  C6 02 6F 26 00 39 78 E6 07 3C 47 AF 37 17 10 FD    ..o&.9x..<G.7...
0080D0:  C9 E5 D9 EB E3 73 23 72 23 D1 73 23 72 23 71 23    .....s#r#.s#r#q#
0080E0:  70 C9 DD E1 78 EB 21 00 00 44 39 4E E5 09 23 E3    p...x.!..D9N..#.
0080F0:  B9 38 01 79 12 13 23 B7 28 03 4F ED B0 E1 F9 DD    .8.y..#.(.O.....
008100:  E9 DD E1 78 21 00 00 44 39 4E E5 09 23 5E 23 56    ...x!..D9N..#^#V
008110:  18 DC DD E1 EB 68 26 00 44 39 ED B0 21 20 00 39    .....h&.D9..! .9
008120:  F9 DD E9 DD E1 21 20 00 39 5E 23 56 68 26 00 44    .....! .9^#Vh&.D
008130:  39 ED B0 21 22 00 18 E7 DD E1 EB 78 2F 6F 26 FF    9..!"......x/o&.
008140:  39 F9 70 23 48 06 00 EB ED B0 DD E9 B7 ED 52 19    9.p#H.........R.
008150:  D8 3E 90 C3 27 20 B7 ED 52 B7 ED 42 30 03 09 19    .>..' ..R..B0...
008160:  C9 3E 91 C3 27 20 B7 ED 52 EB 13 EA 71 06 F0 18    .>..' ..R...q...
008170:  01 F8 11 00 00 C9 D5 EB B7 ED 52 EB E1 18 EB B7    ..........R.....
008180:  ED 52 21 01 00 C8 2B C9 CD DF 0B 18 F5 CD B0 09    .R!...+.........
008190:  18 F0 B7 ED 52 21 01 00 C0 2B C9 CD DF 0B 18 F5    ....R!...+......
0081A0:  CD B0 09 18 F0 CD 72 07 21 01 00 D0 2B C9 CD DF    ......r.!...+...
0081B0:  0B 18 F5 CD B0 09 18 F0 CD 72 07 21 01 00 C8 D8    .........r.!....
0081C0:  2B C9 CD DF 0B 18 F4 CD B0 09 18 EF CD 72 07 21    +............r.!
0081D0:  00 00 C8 D8 23 C9 CD DF 0B 18 F4 CD B0 09 18 EF    ....#...........
0081E0:  CD 72 07 21 01 00 D8 2B C9 CD DF 0B 18 F5 CD B0    .r.!...+........
0081F0:  09 18 F0 54 5D 4B 42 EB 21 00 00 7A B7 3E 10 20    ...T]KB.!..z.>. 
008200:  03 53 3E 08 29 EB 29 EB 30 01 09 3D 20 F6 C9 7C    .S>.).).0..= ..|
008210:  B5 CA 03 0A 7C AA F5 CD 80 07 EB CD 80 07 EB 44    ....|..........D
008220:  4D AF 67 6F 3E 11 ED 6A ED 42 30 02 09 37 3F CB    M.go>..j.B0..7?.
008230:  13 CB 12 3D 20 F0 EB F1 F0 18 48 E5 CD 92 07 CB    ...= .....H.....
008240:  3C CB 1D D1 EB CD 0F 07 EB CB 7A C8 18 35 CD 61    <.........z..5.a
008250:  07 C8 29 10 FD C9 CD 61 07 C8 CB 3C CB 1D 10 FA    ..)....a...<....
008260:  C9 EB 7A B7 20 08 7B FE 10 30 03 47 B7 C9 AF 67    ..z. .{..0.G...g
008270:  6F C9 EB 7C AA 7C FA 7E 07 BA C0 7D BB C9 17 C9    o..|.|.~...}....
008280:  CB 7C C8 7C 2F 67 7D 2F 6F 23 C9 7D E6 01 6F 26    .|.|/g}/o#.}..o&
008290:  00 C9 ED 4B CA 00 ED 5B C8 00 C5 D5 78 41 4A 53    ...K...[....xAJS
0082A0:  1E 00 1F CB 18 CB 19 CB 1A CB 1B E1 19 EB E1 ED    ................
0082B0:  4A 44 4D 21 E9 62 19 22 C8 00 EB 21 19 36 ED 4A    JDM!.b."...!.6.J
0082C0:  22 CA 00 44 4D C9 06 00 11 10 27 CD E2 07 11 E8    "..DM.....'.....
0082D0:  03 CD E2 07 11 64 00 CD E2 07 1E 0A CD E2 07 7D    .....d.........}
0082E0:  18 0D AF 3C ED 52 30 FB 19 04 3D 20 02 05 C8 C6    ...<.R0...= ....
0082F0:  30 DD 77 00 DD 23 C9 DD 7E 00 D6 24 4F 21 00 00    0.w..#..~..$O!..
008300:  20 02 DD 23 DD 7E 00 CD A6 04 D6 30 38 29 FE 0A     ..#.~.....08)..
008310:  38 0E 0C 0D 20 21 D6 07 FE 0A 38 1B FE 10 30 17    8... !....8...0.
008320:  54 5D 29 D8 29 D8 0C 0D 20 02 54 5D 19 D8 29 D8    T]).)... .T]..).
008330:  5F 16 00 19 D8 18 CB 79 B7 C8 7C 87 C9 DD E1 E1    _......y..|.....
008340:  E5 7D 26 00 23 39 4E 81 38 1C 77 EB 21 00 00 44    .}&.#9N.8.w.!..D
008350:  ED 42 39 F9 EB E5 03 ED B0 EB E1 2B 1B 4F 03 ED    .B9........+.O..
008360:  B8 EB 23 F9 DD E9 3E 10 C3 29 20 DD E1 CD C8 04    ..#...>..) .....
008370:  57 E1 CD DD 09 5F E1 E5 7D 93 38 1A 14 15 28 16    W...._..}.8...(.
008380:  BA 38 16 4A 06 00 60 39 7B 82 54 5D 3D 6F 60 39    .8.J..`9{.T]=o`9
008390:  79 ED B8 EB 18 09 AF 18 03 3C 6B 2D 26 00 39 77    y........<k-&.9w
0083A0:  F9 DD E9 DD E1 E1 E5 7D 26 00 23 39 F9 6F 26 00    .......}&.#9.o&.
0083B0:  DD E9 DD E1 21 00 00 54 39 5E 4B 23 E5 19 5E 43    ....!..T9^K#..^C
0083C0:  23 E5 19 E5 FD E1 D1 E1 79 90 38 10 3C 4F C5 D5    #.......y.8.<O..
0083D0:  E5 1A BE 28 0C E1 D1 C1 23 0D 20 F2 21 00 00 18    ...(....#. .!...
0083E0:  0E 23 13 10 EC D1 E1 C1 21 00 00 39 EB ED 52 FD    .#......!..9..R.
0083F0:  F9 DD E9 DD E1 CD C8 04 4F E1 CD DD 09 5F E1 7E    ........O...._.~
008400:  93 38 1B 0C 0D 28 17 91 38 12 F5 7E 91 77 06 00    .8...(..8..~.w..
008410:  50 19 54 5D 09 F1 3C 4F ED B0 18 02 1D 73 DD E9    P.T]..<O.....s..
008420:  DD E1 CD DD 09 4F D1 ED 53 E8 00 21 00 00 39 1A    .....O..S..!..9.
008430:  F5 86 38 03 B8 38 01 78 12 F1 57 5E 91 38 2F 3C    ..8..8.x..W^.8/<
008440:  6F 7A 83 38 04 B8 7D 38 08 78 93 38 26 91 38 23    oz.8..}8.x.8&.8#
008450:  3C B7 28 1F C5 D5 2A E8 00 5F 1D 16 00 42 19 09    <.(...*.._...B..
008460:  D1 D5 E5 50 19 EB E1 4F ED B8 D1 C1 18 05 7A 3C    ...P...O......z<
008470:  28 19 4F 78 91 3C BB 38 01 7B B7 28 0E 2A E8 00    (.Ox.<.8.{.(.*..
008480:  06 00 09 EB 21 01 00 39 4F ED B0 21 00 00 54 39    ....!..9O..!..T9
008490:  5E 13 19 F9 DD E9 DD E1 E1 2D C2 66 08 6C 26 00    ^........-.f.l&.
0084A0:  DD E9 21 02 00 54 39 5E 13 19 7E 36 01 23 77 C9    ..!..T9^..~6.#w.
0084B0:  21 04 00 54 39 5E 4B 23 E5 19 5E 43 23 E5 19 E5    !..T9^K#..^C#...
0084C0:  FD E1 D1 E1 AF B8 28 04 B9 20 08 78 B9 E1 D1 FD    ......(.. .x....
0084D0:  F9 D5 E9 1A BE 20 F6 23 13 05 0D 18 E7 7C B7 20    ..... .#.....|. 
0084E0:  03 7D B7 C0 3E 11 C3 29 20 CD 0D 0A D0 3E 01 C3    .}..>..) ....>..
0084F0:  27 20 CD 81 0A 18 F5 CD AC 0F CD 97 0A 18 ED D9    ' ..............
008500:  7D B7 D9 3E 02 CA 27 20 CD F5 0A 18 DF D9 CB 78    }..>..' .......x
008510:  D9 C2 88 0A D9 7D B7 D9 C8 D9 C5 D5 E5 D9 7D B7    .....}........}.
008520:  20 05 D9 CB B8 18 54 C5 CB F8 AF 08 D9 CB F8 7D     .....T........}
008530:  D9 95 28 13 30 06 ED 44 08 3D 08 D9 CD 7A 0B 2C    ..(.0..D.=...z.,
008540:  3D 20 F9 08 28 01 D9 F1 E6 80 20 0F CD 92 0B 30    = ..(..... ....0
008550:  25 CD 7B 0B B7 2C 20 1E 37 18 20 CD C6 0B 3F F5    %.{.., .7. ...?.
008560:  28 10 38 01 D9 CD AC 0B CB 78 20 09 CD 86 0B 2D    (.8......x ....-
008570:  20 F6 CD 72 0B F1 38 02 CB B8 B7 D9 E1 D1 C1 D9     ..r..8.........
008580:  C9 D9 CB 78 D9 C2 14 0A CD 8F 0A CD 14 0A D8 2C    ...x...........,
008590:  2D C8 78 EE 80 47 C9 D9 7D B7 D9 CA 72 0B 7D B7    -.x..G..}...r.}.
0085A0:  C8 D9 85 D9 CD 4D 0B C5 D5 E5 DD 39 CD 72 0B D9    .....M.....9.r..
0085B0:  2E 05 D9 3E 08 DD 23 DD 6E 00 08 CB 1D 30 03 CD    ...>..#.n....0..
0085C0:  92 0B CD 7B 0B 08 3D 20 F1 D9 2D D9 20 E5 DD 6E    ...{..= ..-. ..n
0085D0:  FB CB 78 20 09 08 CD 87 0B 2C 2D 28 01 2D F1 F1    ..x .....,-(.-..
0085E0:  F1 B7 08 F1 D9 C1 E1 D9 DD E1 CB B8 B0 47 2C 2D    .............G,-
0085F0:  CC 72 0B 08 C9 7D B7 C8 D9 95 D9 3F CD 4D 0B E5    .r...}.....?.M..
008600:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
008610:  07 00 00 00 02 09 4E E5 07 00 41 02 00 00 00 02    ......N...A.....
008620:  07 00 42 02 00 00 00 02 07 00 43 02 00 00 00 02    ..B.......C.....
008630:  07 00 44 02 00 00 00 02 07 00 45 02 00 00 00 02    ..D.......E.....
008640:  07 00 46 02 00 00 00 02 07 00 47 02 00 00 00 02    ..F.......G.....
008650:  07 00 48 02 00 00 00 02 07 00 49 02 00 00 00 02    ..H.......I.....
008660:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
008670:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
008680:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
008690:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0086A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0086B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0086C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0086D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0086E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0086F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
008700:  E5 E5 DD 39 D9 2E 05 D9 3E 08 08 CD C6 0B 38 03    ...9....>.....8.
008710:  CD AC 0B 3F CB 15 08 3D 20 0C DD 75 05 DD 2B D9    ...?...= ..u..+.
008720:  2D D9 28 0E 3E 08 CD 86 0B 30 DF 08 CD AC 0B B7    -.(.>....0......
008730:  18 E1 CD 86 0B 38 04 CD C6 0B 3F E1 D1 C1 CB 78    .....8....?....x
008740:  20 05 CD 87 0B 18 9A 2C 20 97 37 18 95 38 06 C6     ......, .7..8..
008750:  80 38 06 18 1B C6 80 38 17 6F DD E3 D9 E5 C5 78    .8.....8.o.....x
008760:  CB F8 D9 A8 E6 80 F5 CB F8 DD E5 DD 21 00 00 C9    ............!...
008770:  E1 D8 AF 6F 47 4F 57 5F 67 C9 B7 CB 18 CB 19 CB    ...oGOW_g.......
008780:  1A CB 1B CB 1C C9 B7 CB 14 CB 13 CB 12 CB 11 CB    ................
008790:  10 C9 7C D9 84 D9 67 7B D9 8B D9 5F 7A D9 8A D9    ..|...g{..._z...
0087A0:  57 79 D9 89 D9 4F 78 D9 88 D9 47 C9 7C D9 94 D9    Wy...Ox...G.|...
0087B0:  67 7B D9 9B D9 5F 7A D9 9A D9 57 79 D9 99 D9 4F    g{..._z...Wy...O
0087C0:  78 D9 98 D9 47 C9 78 D9 B8 D9 C0 79 D9 B9 D9 C0    x...G.x....y....
0087D0:  7A D9 BA D9 C0 7B D9 BB D9 C0 7C D9 BC D9 C9 D9    z....{....|.....
0087E0:  78 D9 A8 F2 E9 0B 78 17 C9 CB 78 28 06 CD F3 0B    x.....x...x(....
0087F0:  C8 3F C9 7D D9 BD D9 C0 B7 C8 C3 C6 0B 7D D6 81    .?.}.........}..
008800:  DA 72 0B 3C FE 28 D0 D9 C5 D5 E5 08 CD 72 0B 08    .r.<.(.......r..
008810:  37 CD 7B 0B 3D 20 F9 D9 7C D9 A4 D9 67 7B D9 A3    7.{.= ..|...g{.£
008820:  D9 5F 7A D9 A2 D9 57 79 D9 A1 D9 4F 78 D9 A0 D9    ._z...Wy...Ox...
008830:  47 C3 7B 0A D9 C5 D5 E5 D9 CD AC 0F D9 CD FD 0B    G.{.............
008840:  D9 CD 81 0A 18 EB 7D B7 C8 CB 78 3E 03 C2 27 20    ......}...x>..' 
008850:  CD AC 0F 7D C6 80 CB 2F C6 80 6F D6 14 F5 D9 C5    ...}.../..o.....
008860:  D5 E5 CD F5 0A CD 0D 0A 2D C5 D5 E5 CD 81 0A 7D    ........-......}
008870:  E1 D1 C1 D9 E1 D1 C1 E3 BC E3 30 E3 F1 D9 C9 D9    ..........0.....
008880:  CD 8E 0F 2D CD 81 0A D9 CD 8E 0F 2C D9 7D FE 6C    ...-.......,.}.l
008890:  D8 C5 CB B8 CD DF 0B C1 38 09 CD F5 0A CD 34 0C    ........8.....4.
0088A0:  CD 97 0A CB 78 28 03 CD 0D 0A D9 2D D9 CD DF 0B    ....x(.....-....
0088B0:  F5 38 03 CD 81 0A D9 2D D9 CD DF 0B 38 05 D9 2C    .8.....-....8..,
0088C0:  CD 81 0A 7D FE 6C 38 3B D9 01 AA 2A 11 AA AA 21    ...}.l8;...*...!
0088D0:  7F AA CD 97 0A DD E5 DD 21 07 0D 3E 05 CD 34 0F    ........!..>..4.
0088E0:  DD E1 CD AC 0F CD 97 0A CD 97 0A C5 D5 E5 D9 CD    ................
0088F0:  AC 0F 2D 2D D9 2D CD 0D 0A D9 E1 D1 C1 D9 CD 81    ..--.-..........
008900:  0A 2C 2C F1 2C 2D C8 D8 78 EE 80 47 C9 67 AA 3F    .,,.,-..x..G.g.?
008910:  2B 32 D7 6E B6 2A 1D EF 38 74 0D D0 00 0D D0 7A    +2.n.*..8t.....z
008920:  88 88 88 88 08 7E AB AA AA AA AA 2C 2D 3E 04 CA    .....~.....,->..
008930:  27 20 CB 78 C2 27 20 D9 CD 98 0F D9 7D 2E 81 95    ' .x.' .....}...
008940:  F5 CD F5 0A D9 CD 86 0F D9 CD 81 0A C5 D5 E5 D9    ................
008950:  2C CD 0D 0A D9 E1 D1 C1 CD F5 0A DD E5 DD 21 8C    ,.............!.
008960:  0D 3E 06 CD 34 0F DD E1 2C D9 CD A2 0F 2D D9 CD    .>..4...,....-..
008970:  0D 0A F1 C5 D5 E5 6F 26 00 30 01 25 CD 08 10 D9    ......o&.0.%....
008980:  2C CD 97 0A D9 E1 D1 C1 CD 0D 0A 7D FE 67 DA 72    ,..........}.g.r
008990:  0B C9 7D 8A 9D D8 89 1D 7D E9 A2 8B 2E 3A 7D 8E    ..}.....}....:}.
0089A0:  E3 38 8E 63 7E 49 92 24 49 12 7E CD CC CC CC 4C    .8.c~I.$I.~....L
0089B0:  7F AB AA AA AA 2A D9 CD A2 0F D9 B7 CB 78 F5 CB    .....*.......x..
0089C0:  B8 CD F5 0A 7D FE 88 30 47 C5 D5 E5 2C CD D0 0F    ....}..0G...,...
0089D0:  E5 CB 3C CB 1D 7D E1 F5 CD 08 10 2C 2D 28 01 2D    ..<..}.....,-(.-
0089E0:  D9 F1 E1 D1 C1 F5 CD 81 0A DD E5 DD 21 10 0E 3E    ............!..>
0089F0:  08 CD 49 0F DD E1 F1 30 0A F5 D9 CD 98 0F D9 CD    ..I....0........
008A00:  97 0A F1 85 6F 38 09 F1 C8 D9 CD 86 0F C3 F5 0A    ....o8..........
008A10:  E1 3E 01 C3 27 20 6D 2E 1D 11 60 31 70 46 2C FE    .>..' m...`1pF,.
008A20:  E5 7F 74 36 7C 89 84 21 77 53 3C FF C3 2E 7A D2    ..t6|..!wS<...z.
008A30:  7D 5B 95 1D 7C 25 B8 46 58 63 7E 16 FC EF FD 75    }[..|%.FXc~....u
008A40:  80 D2 F7 17 72 31 7D B7 C8 DD E5 D9 CD 86 0F D9    ....r1}.........
008A50:  AF CB 78 28 03 3C CB B8 F5 CD DF 0B 38 08 D9 CD    ..x(.<......8...
008A60:  F5 0A F1 CB FF F5 D9 01 CF 06 11 8E E9 21 7E 4A    .............!~J
008A70:  D9 CD DF 0B 30 05 CD 2E 0F 18 4F DD 21 CE 0E 3E    ....0.....O.!..>
008A80:  02 08 D9 11 12 00 DD 19 CD 73 0F D9 CD DF 0B 38    .........s.....8
008A90:  0B 08 3D 20 EC D9 11 0C 00 DD 19 D9 D9 CD 6E 0F    ..= ..........n.
008AA0:  CB F8 CD 0D 0A C5 D5 E5 CD 73 0F CD 97 0A D9 CD    .........s......
008AB0:  86 0F CD 0D 0A D9 E1 D1 C1 CD F5 0A DD E5 CD 2E    ................
008AC0:  0F DD E1 D9 CD 6E 0F CD 0D 0A F1 17 30 0A F5 D9    .....n......0...
008AD0:  CD 8E 0F 2D CD 81 0A F1 DD E1 CB 4F C8 CB F8 C9    ...-.......O....
008AE0:  7F E7 CF CC 13 54 7F F6 F4 A2 30 09 7F 6A C1 91    .....T....0..j..
008AF0:  0A 06 80 B5 9E 8A 6F 44 80 82 2C 3A CD 13 80 6A    ......oD..,:...j
008B00:  C1 91 0A 06 81 00 00 00 00 00 80 21 A2 DA 0F 49    ...........!...I
008B10:  7D E8 A2 8B 2E BA 7D 8E E3 38 8E 63 7E 49 92 24    }.....}..8.c~I.$
008B20:  49 92 7E CD CC CC CC 4C 7F AB AA AA AA AA DD 21    I.~....L.......!
008B30:  0A 0F 3E 05 C5 D5 E5 F5 CD AC 0F CD 97 0A F1 CD    ..>.............
008B40:  49 0F D9 E1 D1 C1 C3 97 0A F5 D9 CD 6E 0F 18 10    I...........n...
008B50:  F5 D9 C5 D5 E5 CD 6E 0F CD 0D 0A D9 E1 D1 C1 D9    ......n.........
008B60:  CD 97 0A F1 3D 20 E9 D9 CD 86 0F C3 0D 0A 11 06    ....= ..........
008B70:  00 DD 19 DD 6E 00 DD 66 01 DD 5E 02 DD 56 03 DD    ....n..f..^..V..
008B80:  4E 04 DD 46 05 C9 21 81 00 44 4C 54 5C C9 01 0F    N..F..!..DLT\...
008B90:  49 11 A2 DA 21 82 21 C9 01 04 35 11 33 F3 21 81    I...!.!...5.3.!.
008BA0:  FA C9 01 72 31 11 F7 17 21 80 D2 C9 C5 D5 E5 D9    ...r1...!.......
008BB0:  E1 D1 C1 C9 CD 92 07 21 80 00 3E 20 CB 78 20 0D    .......!..> .x .
008BC0:  CB 23 CB 12 CB 11 CB 10 2D 3D 20 F0 6F CB B8 C9    .#......-= .o...
008BD0:  CB 78 D9 CD 86 0F 28 02 CB F8 2D CD 0D 0A B7 CB    .x....(...-.....
008BE0:  7D 28 1C CB 78 08 CB F8 3E 8F BD 38 16 28 06 CD    }(..x...>..8.(..
008BF0:  7A 0B 2C 18 F3 CD 7A 0B 08 60 69 C8 C3 83 07 21    z.,...z..`i....!
008C00:  00 00 C9 3E 92 C3 27 20 7C B5 CA 72 0B CB 7C 08    ...>..' |..r..|.
008C10:  CD 80 07 3E 90 29 3D CB 7C 28 FA 44 4D 11 00 00    ...>.)=.|(.DM...
008C20:  62 6F 08 C0 CB B8 C9 CD C8 04 EB 1E 00 38 04 FE    bo...........8..
008C30:  19 38 18 1D CD C8 04 D9 CB 78 D9 16 07 28 01 14    .8.......x...(..
008C40:  92 30 01 AF FE 09 38 02 3E 09 3C 57 D5 D9 FD 21    .0....8.>.<W...!
008C50:  5D 00 DD E5 CD EB 10 DD E1 D1 4F 7A 3C CB 7B 20    ].........Oz<.{ 
008C60:  10 81 F2 6B 10 FD 36 00 00 18 0B FE 0C 38 02 3E    ...k..6......8.>
008C70:  0B D5 CD 80 11 D1 CB 78 28 05 3E 2D CD E5 10 CB    .......x(.>-....
008C80:  7B 28 03 61 0E 00 CB 79 28 05 CD E3 10 18 07 CD    {(.a...y(.......
008C90:  D9 10 0D F2 8F 10 7A B7 28 17 3E 2E CD E5 10 0C    ......z.(.>.....
008CA0:  28 06 CD E3 10 15 20 F7 15 FA B1 10 CD D9 10 18    (..... .........
008CB0:  F7 CB 7B C8 3E 45 CD E5 10 3E 2B CB 7C 28 06 7C    ..{.>E...>+.|(.|
008CC0:  ED 44 67 3E 2D CD E5 10 7C 06 2F 04 D6 0A 30 FB    .Dg>-...|./...0.
008CD0:  C6 3A DD 70 00 DD 23 18 0C FD 7E 00 FD 23 B7 20    .:.p..#...~..#. 
008CE0:  04 FD 2B 3E 30 DD 77 00 DD 23 C9 FD E5 2C 2D 20    ..+>0.w..#...,- 
008CF0:  0E 06 0C FD 36 00 30 FD 23 10 F8 AF C3 7D 11 C5    ....6.0.#....}..
008D00:  CB B8 7D D9 D6 80 6F 9F 67 11 4D 00 CD F5 06 11    ..}...o.g.M.....
008D10:  05 00 19 7C FE D9 20 01 3C FD 77 00 ED 44 CD 40    ...|.. .<.w..D.@
008D20:  12 7D FE 81 30 06 CD B3 12 FD 35 00 CB F8 3E 84    .}..0.....5...>.
008D30:  95 2E 00 28 08 CD 7A 0B CB 1D 3D 20 F8 FD 7E 00    ...(..z...= ..~.
008D40:  F5 3E 0C 08 78 1F 1F 1F 1F E6 0F C6 30 FD 77 00    .>..x.......0.w.
008D50:  FD 23 78 E6 0F 47 C5 D5 E5 CB 25 CD 87 0B CB 25    .#x..G....%....%
008D60:  CD 87 0B EB E3 19 D1 E3 ED 5A EB E1 E3 ED 4A 44    .........Z....JD
008D70:  4D E1 CB 25 CD 87 0B 08 3D 20 C8 F1 C1 FD E1 C9    M..%....= ......
008D80:  FD E5 E1 5F 16 00 19 7E 36 00 FE 35 D8 1D FA 9C    ..._...~6..5....
008D90:  11 2B 7E 3C 77 FE 3A D8 36 00 18 F1 36 31 23 36    .+~<w.:.6...61#6
008DA0:  00 0C C9 D9 01 00 00 D9 CD 72 0B DD 7E 00 CD A6    .........r..~...
008DB0:  04 FE 2E 20 0C D9 CB 70 37 C0 CB F0 D9 DD 23 18    ... ...p7.....#.
008DC0:  EA FE 45 28 21 CD 39 12 30 54 08 CD B3 12 D8 08    ..E(!.9.0T......
008DD0:  D9 C5 6F 26 00 CD 08 10 CD E9 09 D9 C1 D8 CB 70    ..o&...........p
008DE0:  28 01 0D D9 18 D7 CD 1E 12 D8 D9 CB E0 DD 23 DD    (.............#.
008DF0:  7E 00 FE 2B 28 06 FE 2D 20 04 CB E8 DD 23 CD 36    ~..+(..- ....#.6
008E00:  12 3F D8 4F DD 23 CD 36 12 30 0A DD 23 57 79 87    .?.O.#.6.0..#Wy.
008E10:  87 81 87 82 4F CB 68 28 04 79 ED 44 4F D9 D9 79    ....O.h(.y.DO..y
008E20:  C6 80 FE 5A D8 FE A6 3F D8 C5 DD E5 79 CD 40 12    ...Z...?....y.@.
008E30:  DD E1 D9 C1 D9 C9 DD 7E 00 D6 30 3F D0 FE 0A C9    .......~..0?....
008E40:  F5 B7 F2 47 12 ED 44 F5 CB 3F CB 3F 3C 21 FA FF    ...G..D..?.?<!..
008E50:  11 06 00 19 3D 20 FC EB DD 21 77 12 DD 19 CD 73    ....= ...!w....s
008E60:  0F F1 E6 03 28 08 F5 CD B3 12 F1 3D 20 F8 F1 B7    ....(......= ...
008E70:  F2 97 0A D9 C3 F5 0A 81 00 00 00 00 00 8E 00 00    ................
008E80:  00 40 1C 9B 00 00 20 BC 3E A8 00 10 A5 D4 68 B6    .@.... .>.....h.
008E90:  04 BF C9 1B 0E C3 AC C5 EB 78 2D D0 CD CE 1B C2    .........x-.....
008EA0:  53 DE F9 78 39 3F 01 EB 2B A8 AD C5 1D F8 C9 7B    S..x9?..+......{
008EB0:  CE 97 40 7D B7 C8 CB F8 C5 D5 7C CD 7A 0B CD 7A    ..@}......|.z..z
008EC0:  0B 84 67 E3 ED 5A EB E1 E3 ED 4A 44 4D E1 30 06    ..g..Z....JDM.0.
008ED0:  CD 7B 0B 2C 37 C8 7D C6 03 6F CB B8 C9 0E 01 18    .{.,7.}..o......
008EE0:  02 0E 00 CD 3F 13 1A BE 20 08 23 13 10 F8 79 EE    ....?... .#...y.
008EF0:  01 4F 21 40 00 39 F9 69 26 00 DD E9 0E 01 18 02    .O!@.9.i&.......
008F00:  0E 00 CD 3F 13 0D 20 01 EB 0E 00 1A B6 BE 20 E2    ...?.. ....... .
008F10:  23 13 10 F7 0E 01 18 DA CD 3F 13 1A B6 77 23 13    #........?...w#.
008F20:  10 F9 EB F9 DD E9 CD 3F 13 1A 2F A6 77 23 13 10    .......?../.w#..
008F30:  F8 18 EF CD 3F 13 1A A6 77 23 13 10 F9 18 E3 FD    ....?...w#......
008F40:  E1 DD E1 21 00 00 39 EB 21 20 00 45 39 FD E9 DD    ...!..9.! .E9...
008F50:  E1 21 21 00 39 7E B7 28 03 AF 18 06 2B 46 CD BA    .!!.9~.(....+F..
008F60:  05 A6 21 22 00 39 F9 21 00 00 28 01 23 DD E9 3E    ..!".9.!..(.#..>
008F70:  AF 32 E8 00 FD E1 2A D2 00 06 10 CD E2 05 AF 12    .2....*.........
008F80:  E1 22 E2 00 FD E5 7C B7 20 06 3E 22 32 D0 00 C9    ."....|. .>"2...
008F90:  3A E8 00 B7 28 0A CD B6 13 20 05 2A E2 00 77 C9    :...(.... .*..w.
008FA0:  CD F2 03 2A E2 00 36 00 11 0C 00 19 EB 21 5C 00    ...*..6......!\.
008FB0:  01 24 00 ED B0 C9 06 06 21 E6 13 C5 E5 06 03 ED    .$......!.......
008FC0:  5B D2 00 13 1A FE 20 28 FA 1A CD A6 04 96 28 0A    [..... (......(.
008FD0:  E1 C1 11 04 00 19 10 E3 B7 C9 23 13 10 EB C1 C1    ..........#.....
008FE0:  1A FE 3A C0 7E C9 43 4F 4E C1 54 52 4D C1 4B 42    ..:.~.CON.TRM.KB
008FF0:  44 82 4C 53 54 43 41 55 58 C4 55 53 52 C5 3E AF    D.LSTCAUX.USR.>.
009000:  32 E8 00 CD 69 14 3A D0 00 B7 C0 2A E2 00 CB AE    2...i.:....*....
009010:  7E E6 0F C0 CD 30 14 3A D0 00 B7 C0 2A E2 00 3A    ~....0.:....*..:
009020:  E8 00 B7 01 80 80 28 03 01 40 00 71 23 23 70 C9    ......(..@.q##p.
009030:  CD 5A 14 2A E2 00 11 0C 00 19 EB 3A E8 00 B7 01    .Z.*.......:....
009040:  0F 01 28 0A D5 0E 13 CD 05 00 D1 01 16 F1 C5 CD    ..(.............
009050:  05 00 C1 3C C0 78 32 D0 00 C9 2A E2 00 11 18 00    ...<.x2...*.....
009060:  19 06 18 36 00 23 10 FB C9 22 E2 00 7E E6 0F C0    ...6.#..."..~...
009070:  CB 76 28 0A 3E 1A CD C6 16 CD 0C 17 18 03 CB 7E    .v(.>..........~
009080:  C8 2A E2 00 E5 11 0C 00 19 EB 0E 10 CD 05 00 E1    .*..............
009090:  3C 20 05 3E FF 32 D0 00 36 00 C9 E3 22 E4 00 E3    < .>.2..6..."...
0090A0:  E5 21 C2 00 22 E2 00 E1 C9 E3 22 E4 00 E3 22 E2    .!.."....."...".
0090B0:  00 CB 7E C0 3E 02 32 D0 00 C9 E3 22 E4 00 E3 22    ..~.>.2...."..."
0090C0:  E2 00 CB 76 C0 3E 03 32 D0 00 C9 3E AF E3 22 E4    ...v.>.2...>..".
0090D0:  00 E3 E5 21 C2 00 22 E2 00 CB AE F5 CD E8 14 F1    ...!..".........
0090E0:  B7 28 03 CD E1 01 E1 C9 06 00 21 D1 00 7E FE 7F    .(........!..~..
0090F0:  38 02 3E 7E 4F 36 7E 2A D2 00 22 D4 00 16 00 CD    8.>~O6~*..".....
009100:  E1 03 77 1E 01 FE 08 28 36 FE 7F 28 32 1D FE 18    ..w....(6..(2...
009110:  28 2D FE 1B 28 29 FE 1A 28 36 FE 0D 28 38 FE 20    (-..()..(6..(8. 
009120:  30 11 FE 03 20 D9 3A DD 00 B7 28 D3 DD 2A E4 00    0... .:...(..*..
009130:  C3 16 20 79 BA 28 C8 7E 14 23 CD C9 03 18 C0 15    .. y.(.~.#......
009140:  FA FD 14 2B CD 00 02 08 20 08 00 1D 28 B1 18 EF    ...+.... ...(...
009150:  04 05 28 AB 18 04 04 05 20 04 36 1A 18 08 CD E1    ..(..... .6.....
009160:  01 36 0D 23 36 0A 23 22 D6 00 C9 2A E2 00 3A D0    .6.#6.#"...*..:.
009170:  00 B7 20 79 7E CB 6F 20 70 E6 0F 20 2E 23 23 7E    .. y~.o p.. .##~
009180:  B7 F2 97 15 0E 14 E5 CD BA 19 E1 28 08 E5 11 2E    ...........(....
009190:  00 19 36 1A E1 AF 77 34 C6 2E 5F 16 00 19 7E FE    ..6...w4.._...~.
0091A0:  1A 20 3D 2A E2 00 23 23 35 18 35 3D 20 1B 2A D4    . =*..##5.5= .*.
0091B0:  00 ED 5B D6 00 B7 ED 52 38 05 06 FF CD EA 14 2A    ..[....R8......*
0091C0:  D4 00 7E 23 22 D4 00 18 17 3D 20 06 CD A3 00 7D    ..~#"....= ..£.}
0091D0:  18 0E 3D 3D 20 06 CD AF 00 7D 18 04 CD B5 00 7D    ..== ....}.....}
0091E0:  2A E2 00 CB EE 23 77 2B C9 23 7E 2B C9 3E 1A C9    *....#w+.#~+.>..
0091F0:  E5 2A E2 00 7E E6 0F FE 06 28 27 CD 6B 15 FE 21    .*..~....('.k..!
009200:  30 08 FE 1A 28 04 CB AE 18 F1 11 5D 00 06 1E C5    0...(......]....
009210:  D5 CD 6B 15 D1 C1 FE 21 38 06 CB AE 12 13 10 EF    ..k....!8.......
009220:  AF 12 E1 C9 DD 21 5D 00 DD 7E 00 B7 C8 06 00 FE    .....!]..~......
009230:  2D C0 04 DD 23 C9 38 05 DD 7E 00 B7 C8 3E 10 32    -...#.8..~...>.2
009240:  D0 00 37 C9 E5 CD 6B 15 CB AE E1 77 C9 3E AF 4F    ..7...k....w.>.O
009250:  C5 CD F0 15 C1 CD 24 16 C8 C5 E5 CD F7 07 D1 C1    ......$.........
009260:  CD 36 16 D8 05 CC 83 07 EB 73 0C 0D 20 02 23 72    .6.......s.. .#r
009270:  EB C9 CD F0 15 CD 24 16 C8 C5 E5 CD A3 11 D9 E1    ......$.....£...
009280:  C1 CD 36 16 D8 05 D9 CC 8F 0A D9 C3 D1 05 E5 EB    ..6.............
009290:  0E 00 C5 D5 CD 6B 15 D1 C1 FE 0D 28 0B FE 1A 28    .....k.....(...(
0092A0:  07 CB AE 0C 13 12 10 EA E1 71 C9 CD 6B 15 FE 1A    .........q..k...
0092B0:  28 13 CB AE FE 0A 28 0D FE 0D 20 EF CD 6B 15 FE    (.....(... ..k..
0092C0:  0A 20 02 CB AE C9 2A E2 00 4F 3A D0 00 B7 C0 7E    . ....*..O:....~
0092D0:  E6 0F 20 10 23 23 E5 7E C6 2E 5F 16 00 19 71 E1    .. .##.~.._...q.
0092E0:  34 F0 18 28 FE 06 28 15 E1 06 00 C5 E5 3D CA A6    4..(..(......=..
0092F0:  00 3D 3D CA A9 00 3D CA AC 00 C3 B2 00 2A E8 00    .==...=......*..
009300:  3A EA 00 BE C8 34 5E 16 00 19 71 C9 2A E2 00 23    :....4^...q.*..#
009310:  23 7E B7 C8 36 00 0E 15 CD BA 19 C8 3E F0 32 D0    #~..6.......>.2.
009320:  00 C9 7D C3 C6 16 C1 D1 C5 DD 2A D2 00 CB 7C 28    ..}.......*...|(
009330:  06 CD 83 07 EB 18 0E EB CB 7C 28 09 CD 83 07 DD    .........|(.....
009340:  36 00 2D DD 23 D5 CD C6 07 E1 CD C8 04 ED 5B D2    6.-.#.........[.
009350:  00 DD E5 E1 B7 ED 52 4D EB 91 38 0E 28 0C 47 E5    ......RM..8.(.G.
009360:  3E 20 C5 CD C6 16 C1 10 F7 E1 41 04 05 C8 7E C5    > ........A...~.
009370:  E5 CD C6 16 E1 C1 23 18 F3 C1 D1 D9 E1 D1 C1 D9    ......#.........
009380:  C5 DD 2A D2 00 D5 CD 27 10 18 BE C1 D1 C5 CD C8    ..*....'........
009390:  04 CB 43 21 A1 17 0E 04 20 BF 21 A5 17 0E 05 18    ..C!.... .!.....
0093A0:  B8 54 52 55 45 46 41 4C 53 45 CD C8 04 21 02 00    .TRUEFALSE...!..
0093B0:  39 4E 23 CD 59 17 D1 F9 D5 C9 E1 7E 23 B7 28 0C    9N#.Y......~#.(.
0093C0:  47 7E C5 E5 CD C6 16 E1 C1 23 10 F5 E9 3E 0D CD    G~.......#...>..
0093D0:  C6 16 3E 0A C3 C6 16 11 0D 01 18 0D 11 0D 00 18    ..>.............
0093E0:  08 11 1A 01 18 03 11 1A 00 22 E2 00 CB 7E 28 1C    ........."...~(.
0093F0:  D5 CD 6B 15 D1 BB 28 10 FE 1A 28 0C FE 21 30 0C    ..k...(...(..!0.
009400:  14 15 28 08 CB AE 18 E8 21 01 00 C9 21 00 00 C9    ..(.....!...!...
009410:  3E AF 32 E8 00 ED 53 E6 00 CD 7A 18 3A D0 00 B7    >.2...S...z.:...
009420:  C0 CD 30 14 3A D0 00 B7 C0 2A E2 00 36 D0 23 23    ..0.:....*..6.##
009430:  77 11 06 00 19 77 23 77 11 24 00 19 77 23 77 11    w....w#w.$..w#w.
009440:  D6 FF 19 3A E8 00 B7 20 1B E5 01 04 00 AF CD 09    ...:... ........
009450:  19 E1 23 23 4E 23 46 2A E6 00 B7 ED 42 C8 3E 90    ..##N#F*....B.>.
009460:  32 D0 00 C9 E5 AF 77 23 77 23 ED 5B E6 00 73 23    2.....w#w#.[..s#
009470:  72 E1 01 04 00 3E 03 C3 09 19 22 E2 00 7E E6 C0    r....>...."..~..
009480:  C8 CD AE 19 2A E2 00 11 2D 00 19 AF 77 23 77 11    ....*...-...w#w.
009490:  D4 FF 19 77 23 23 01 04 00 3E 01 CD 09 19 CD AE    ...w##...>......
0094A0:  19 C3 81 14 E3 22 E4 00 E3 22 E2 00 7E E6 C0 C0    ....."..."..~...
0094B0:  3E 04 32 D0 00 C9 3A D0 00 B7 C0 E5 CD 5A 1A EB    >.2...:......Z..
0094C0:  B7 ED 52 E1 30 10 AF CD 09 19 2A E2 00 11 08 00    ..R.0.....*.....
0094D0:  19 34 C0 23 34 C9 3E 99 32 D0 00 C9 3A D0 00 B7    .4.#4.>.2...:...
0094E0:  C0 E5 CD 5A 1A B7 ED 52 3E 01 20 10 2A E2 00 11    ...Z...R>. .*...
0094F0:  04 00 19 34 20 04 23 34 28 08 3E 03 E1 CD 09 19    ...4 .#4(.>.....
009500:  18 C8 E1 3E F2 32 D0 00 C9 32 E9 00 EB 2A E2 00    ...>.2...2...*..
009510:  CB 66 28 2F CB A6 3A E9 00 CB 47 28 18 23 23 7E    .f(/..:...G(.##~
009520:  2B 2B B7 20 10 3A E9 00 CB 4F 20 17 78 B7 20 13    ++. .:...O .x. .
009530:  79 B7 FA 43 19 C5 D5 0E 21 CD BA 19 D1 C1 20 51    y..C....!..... Q
009540:  2A E2 00 3A E9 00 CB 47 28 02 CB EE 23 23 7E C6    *..:...G(...##~.
009550:  2E D5 5F 16 00 19 D1 D6 2E CD 9A 19 ED A0 E2 66    .._............f
009560:  19 3C F2 5C 19 3D 3C CD 9A 19 2A E2 00 23 23 E6    .<.\.=<...*..##.
009570:  7F 77 20 16 C5 D5 E5 CD AE 19 E1 D1 C1 20 15 D5    .w .......... ..
009580:  11 2B 00 19 D1 34 20 02 23 34 78 B1 C2 0D 19 EB    .+...4 .#4x.....
009590:  C9 3E 99 01 3E F0 32 D0 00 C9 F5 3A E9 00 CB 47    .>..>.2....:...G
0095A0:  28 01 EB F1 C9 22 E2 00 CD AE 19 C8 18 E6 0E 22    (...."........."
0095B0:  2A E2 00 CB E6 CB 6E C8 CB AE 2A E2 00 E5 C5 11    *.....n...*.....
0095C0:  30 00 19 EB 0E 1A CD 05 00 C1 E1 11 0C 00 19 EB    0...............
0095D0:  CD 05 00 B7 C9 C1 D1 ED 53 E2 00 C5 E5 CD 5A 1A    ........S.....Z.
0095E0:  D1 B7 ED 52 38 40 2A E2 00 01 06 00 09 4E 23 46    ...R8@*......N#F
0095F0:  23 73 23 72 CD 2C 1A 01 04 00 09 30 01 13 7D E6    #s#r.,.....0..}.
009600:  7F 29 EB ED 6A EB 53 5C 2A E2 00 23 23 77 01 2B    .)..j.S\*..##w.+
009610:  00 09 4E 23 46 EB B7 ED 42 09 C8 D5 E5 CD AE 19    ..N#F...B.......
009620:  D1 E1 72 2B 73 C9 3E 91 32 D0 00 C9 D5 D9 E1 D9    ..r+s.>.2.......
009630:  21 00 00 54 5D 3E 10 29 EB ED 6A EB D9 29 D9 30    !..T]>.)..j..).0
009640:  04 09 30 01 13 3D 20 EF C9 CD 5D 1A B7 ED 52 21    ..0..= ...]...R!
009650:  00 00 C0 23 C9 CD 5D 1A EB C9 2A E2 00 11 04 00    ...#..]...*.....
009660:  19 5E 23 56 23 D5 4E 23 46 23 5E 23 56 E1 C9 3E    .^#V#.N#F#^#V..>
009670:  AF 32 E8 00 CD B0 1A 3A D0 00 B7 C0 CD 30 14 3A    .2.....:.....0.:
009680:  D0 00 B7 C0 2A E2 00 36 C0 E5 11 0C 00 19 EB 0E    ....*..6........
009690:  23 CD 05 00 E1 11 2D 00 19 AF 4E 77 23 46 77 11    #.....-...Nw#Fw.
0096A0:  D6 FF 19 71 23 70 23 36 80 23 77 23 77 23 77 C9    ...q#p#6.#w#w#w.
0096B0:  22 E2 00 7E E6 C0 C8 C3 81 14 3E 22 18 02 3E 21    "..~......>"..>!
0096C0:  44 4D 21 F0 00 22 E6 00 DD E1 D1 E1 DD E5 C5 CD    DM!.."..........
0096D0:  FD 1A C1 3A D0 00 B7 C0 2A F0 00 ED 42 C8 3A E9    ...:....*...B.:.
0096E0:  00 FE 21 3E 99 28 02 3E F0 32 D0 00 C9 3E 22 18    ..!>.(.>.2...>".
0096F0:  02 3E 21 22 E6 00 DD E1 C1 D1 E1 DD E5 32 E9 00    .>!".........2..
009700:  22 E2 00 7E E6 C0 CA B0 18 2A E6 00 AF 77 23 77    "..~.....*...w#w
009710:  78 B1 28 39 C5 D5 0E 1A CD 05 00 2A E2 00 11 0C    x.(9.......*....
009720:  00 19 EB 3A E9 00 4F CD 05 00 D1 C1 B7 20 1E D5    ...:..O...... ..
009730:  2A E2 00 11 2D 00 19 34 20 02 23 34 D1 21 80 00    *...-..4 .#4.!..
009740:  19 EB 2A E6 00 34 20 02 23 34 0B 18 C3 2A E2 00    ..*..4 .#4...*..
009750:  11 2D 00 19 4E 23 46 11 DA FF 19 71 23 70 11 FC    .-..N#F....q#p..
009760:  FF 19 56 2B 5E EB B7 ED 42 D0 EB 71 23 70 C9 C1    ..V+^...B..q#p..
009770:  D1 ED 53 E2 00 C5 E5 CD 5A 1A D1 B7 ED 52 DA 26    ..S.....Z....R.&
009780:  1A 2A E2 00 01 08 00 09 73 23 72 01 24 00 09 73    .*......s#r.$..s
009790:  23 72 C9 CD 4C 1C C0 11 0C 00 19 EB 0E 13 CD 05    #r..L...........
0097A0:  00 3C C0 18 3F FD E1 2A D2 00 06 10 CD E2 05 AF    .<..?..*........
0097B0:  12 E1 FD E5 CD 4C 1C C0 E5 CD F2 03 E1 E5 11 1C    .....L..........
0097C0:  00 19 EB 21 5C 00 01 0C 00 ED B0 E1 11 0C 00 19    ...!\...........
0097D0:  E5 EB 0E 17 CD 05 00 D1 3C 28 09 21 5C 00 01 24    ........<(.!\..$
0097E0:  00 ED B0 C9 3E 01 32 D0 00 C9 3E AF 32 E8 00 CD    ....>.2...>.2...
0097F0:  4C 1C C0 3A D8 00 B7 3E 21 28 EB 2A E2 00 11 0C    L..:...>!(.*....
009800:  00 19 11 5C 00 01 24 00 ED B0 11 5C 00 0E 0F CD    ...\..$....\....
009810:  05 00 3C 28 CF 21 33 1C 11 B0 00 01 19 00 ED B0    ..<(.!3.........
009820:  11 00 01 3A E8 00 B7 20 04 ED 5B 01 01 31 00 01    ...:... ..[..1..
009830:  C3 B0 00 D5 0E 1A CD 05 00 11 5C 00 0E 14 CD 05    ..........\.....
009840:  00 D1 21 80 00 19 EB B7 28 E9 18 37 22 E2 00 7E    ..!.....(..7"..~
009850:  E6 0F C8 3E 20 32 D0 00 C9 22 E6 00 ED 53 E8 00    ...> 2..."...S..
009860:  EB E1 22 E2 00 4E 73 23 46 72 EB B7 ED 42 28 5A    .."..Ns#Fr...B(Z
009870:  EB 23 11 5C 00 3A DC 00 12 13 01 0B 00 ED B0 06    .#.\.:..........
009880:  18 AF 12 13 10 FC E5 11 5C 00 0E 0F CD 05 00 D1    ........\.......
009890:  3C 28 3F 2A E6 00 22 7D 00 ED 4B E8 00 C5 D5 0E    <(?*.."}..K.....
0098A0:  1A CD 05 00 11 5C 00 0E 21 CD 05 00 D1 C1 B7 20    .....\..!...... 
0098B0:  21 2A 7D 00 23 22 7D 00 21 80 00 19 EB 0B 78 B1    !*}.#"}.!.....x.
0098C0:  20 DB 11 5C 00 0E 10 CD 05 00 2A E2 00 11 0D 00     ..\......*.....
0098D0:  19 E9 DD 2A E2 00 3E F0 C3 29 20 CD C8 04 FE 11    ...*..>..) .....
0098E0:  D0 32 DC 00 C9 22 F0 00 EB E1 E3 22 F2 00 13 13    .2..."....."....
0098F0:  13 7B E6 FC 5F 21 DE 00 22 F8 00 DD 2A DE 00 DD    .{.._!.."...*...
009900:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
009910:  08 00 00 00 02 09 4E E5 08 00 41 02 00 00 00 02    ......N...A.....
009920:  08 00 42 02 00 00 00 02 08 00 43 02 00 00 00 02    ..B.......C.....
009930:  08 00 44 02 00 00 00 02 08 00 45 02 00 00 00 02    ..D.......E.....
009940:  08 00 46 02 00 00 00 02 08 00 47 02 00 00 00 02    ..F.......G.....
009950:  08 00 48 02 00 00 00 02 08 00 49 02 00 00 00 02    ..H.......I.....
009960:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
009970:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
009980:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
009990:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0099A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0099B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0099C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0099D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0099E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0099F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
009A00:  6E 02 DD 66 03 7D B4 28 48 ED 52 30 0F DD 6E 00    n..f.}.(H.R0..n.
009A10:  DD 66 01 E5 DD 22 F8 00 DD E1 18 E3 20 0A DD 5E    .f..."...... ..^
009A20:  00 DD 56 01 DD E5 18 1B 4D 44 DD 6E 00 DD 66 01    ..V.....MD.n..f.
009A30:  DD E5 DD 19 DD 75 00 DD 74 01 DD 71 02 DD 70 03    .....u..t..q..p.
009A40:  DD E5 D1 2A F8 00 73 23 72 D1 2A F2 00 73 23 72    ...*..s#r.*..s#r
009A50:  C9 DD E5 E1 19 22 C4 00 2A F0 00 01 04 00 09 DD    ....."..*.......
009A60:  E5 C1 09 DA 75 1D ED 4B C6 00 ED 42 01 00 00 21    ....u..K...B...!
009A70:  00 00 DA 30 1D 3E FF C3 27 20 EB E1 E3 7E 23 66    ...0.>..' ...~#f
009A80:  6F 13 13 13 7B E6 FC 5F EB 22 F0 00 2A DE 00 E5    o...{.._."..*...
009A90:  DD E1 B7 ED 52 30 52 DD 6E 00 DD 66 01 E5 B7 ED    ....R0R.n..f....
009AA0:  52 30 04 DD E1 18 F0 E1 D5 FD E1 ED 4B F0 00 FD    R0..........K...
009AB0:  71 02 FD 70 03 FD 75 00 FD 74 01 DD 73 00 DD 72    q..p..u..t..s..r
009AC0:  01 DD E5 E1 DD 4E 02 DD 46 03 CD 04 1E 28 09 DD    .....N..F....(..
009AD0:  5E 00 DD 56 01 D5 DD E1 DD E5 E1 DD 4E 02 DD 46    ^..V........N..F
009AE0:  03 DD 5E 00 DD 56 01 18 1B 2A DE 00 ED 53 DE 00    ..^..V...*...S..
009AF0:  D5 DD E1 DD 75 00 DD 74 01 ED 4B F0 00 DD 71 02    ....u..t..K...q.
009B00:  DD 70 03 EB 09 B7 ED 52 C0 D5 FD E1 2A C4 00 B7    .p.....R....*...
009B10:  ED 52 28 1B FD 7E 00 DD 77 00 FD 7E 01 DD 77 01    .R(..~..w..~..w.
009B20:  FD 6E 02 FD 66 03 09 DD 75 02 DD 74 03 AF C9 DD    .n..f...u..t....
009B30:  E5 E1 22 C4 00 06 04 36 00 23 10 FB C9 CD 4B 1E    .."....6.#....K.
009B40:  2A F4 00 C9 CD 4B 1E 2A F6 00 C9 21 00 00 22 F4    *....K.*...!..".
009B50:  00 22 F6 00 DD 2A DE 00 DD 4E 02 DD 46 03 79 B0    ."...*...N..F.y.
009B60:  28 1E 2A F4 00 09 22 F4 00 2A F6 00 B7 ED 42 30    (.*..."..*....B0
009B70:  04 ED 43 F6 00 DD 6E 00 DD 66 01 E5 DD E1 18 D8    ..C...n..f......
009B80:  2A C6 00 01 FB FF 09 ED 5B C4 00 B7 ED 52 D8 EB    *.......[....R..
009B90:  2A F4 00 19 22 F4 00 2A F6 00 B7 ED 52 D0 ED 53    *..."..*....R..S
009BA0:  F6 00 C9 ED 5B C4 00 73 23 72 C9 5E 23 56 EB 22    ....[..s#r.^#V."
009BB0:  C4 00 22 DE 00 06 04 36 00 23 10 FB C9 3E AF 4F    .."....6.#...>.O
009BC0:  22 E8 00 AF 77 32 D0 00 78 32 EA 00 2A E2 00 22    "...w2..x2..*.."
009BD0:  ED 00 21 46 1F 22 E2 00 E1 22 E4 00 E1 0C 0D 20    ..!F."..."..... 
009BE0:  05 CD 26 17 18 03 CD 79 17 2A ED 00 22 E2 00 2A    ..&....y.*.."..*
009BF0:  E4 00 E9 3E AF 32 EC 00 22 E8 00 2A E2 00 22 ED    ...>.2.."..*..".
009C00:  00 21 46 1F 22 E2 00 E1 22 E4 00 E1 22 EA 00 21    .!F."..."..."..!
009C10:  5C 00 06 1E CD E2 05 AF 12 2A EA 00 3A EC 00 B7    \........*..:...
009C20:  20 05 CD 4E 16 18 03 CD 72 16 21 D0 00 7E 36 00     ..N....r.!..~6.
009C30:  B7 67 6F 28 08 DD E5 E1 11 5C 00 ED 52 EB 2A E8    .go(.....\..R.*.
009C40:  00 73 23 72 18 A3 C6 00 ED 5F 32 CB 00 C9 EB DD    .s#r.£..._2.....
009C50:  E1 C1 E1 78 B1 28 0B 73 0B 78 B1 28 05 54 5D 13    ...x.(.s.x.(.T].
009C60:  ED B0 DD E9 44 4D DD E1 D1 E1 78 B1 28 F4 ED 52    ....DM....x.(..R
009C70:  19 30 ED 0B 09 EB 09 EB 03 ED B8 DD E9 55 14 15    .0...........U..
009C80:  28 03 CD 9D 1F DD E1 4F 06 00 2F 6F 26 FF 39 F9    (......O../o&.9.
009C90:  71 23 EB 0C 0D 28 02 ED B0 DD E9 16 00 21 80 00    q#...(.......!..
009CA0:  3E 1F 46 B8 30 02 06 1F 23 0E 00 04 05 28 0D 7E    >.F.0...#....(.~
009CB0:  FE 20 28 04 FE 09 20 04 23 05 18 EF 5D 04 05 28    . (... .#...]..(
009CC0:  0D 7E FE 20 28 08 FE 09 28 04 23 05 18 EF 7D 93    .~. (...(.#...}.
009CD0:  28 04 0C 15 20 D5 69 26 00 54 C9 D1 C1 D5 2D 61    (... .i&.T....-a
009CE0:  25 C3 A2 02 7D CD A6 04 6F C9 2A 01 00 19 19 19    %...}...o.*.....
009CF0:  E9 21 D0 00 7E 36 00 6F 26 00 C9 CD 16 03 7C B5    .!..~6.o&.....|.
009D00:  C8 3A DD 00 F5 AF 32 DD 00 CD 20 03 F1 32 DD 00    .:....2... ..2..
009D10:  7D FE 03 C0 DD E1 11 01 00 18 11 3A D0 00 B7 C8    }..........:....
009D20:  DD E1 5F 16 01 18 05 DD E1 5F 16 02 D5 CD 7A 03    .._......_....z.
009D30:  D1 AF 32 DD 00 2A CE 00 7C B5 DD E5 E1 ED 4B CC    ..2..*..|.....K.
009D40:  00 ED 42 01 15 00 09 22 CE 00 B7 20 07 D5 D5 E5    ..B...."... ....
009D50:  CD D9 00 D1 7A B7 20 14 CD 00 02 5E 43 0D 0A 55    ....z. ....^C..U
009D60:  73 65 72 20 62 72 65 61 6B 00 18 2B 3D 20 0B CD    ser break..+= ..
009D70:  00 02 0D 0A 49 2F 4F 00 18 0E CD 00 02 0D 0A 52    ....I/O........R
009D80:  75 6E 2D 74 69 6D 65 00 CD 00 02 20 65 72 72 6F    un-time.... erro
009D90:  72 20 00 7B CD B4 04 CD 00 02 2C 20 50 43 3D 00    r .{......, PC=.
009DA0:  2A CE 00 CD AF 04 18 15 CD 00 02 4E 6F 74 20 65    *..........Not e
009DB0:  6E 6F 75 67 68 20 6D 65 6D 6F 72 79 00 CD 00 02    nough memory....
009DC0:  0D 0A 50 72 6F 67 72 61 6D 20 61 62 6F 72 74 65    ..Program aborte
009DD0:  64 0D 0A 00 3A D8 00 B7 CA 8E 27 C3 00 00 E1 D1    d...:.....'.....
009DE0:  D1 E9 31 00 01 21 C2 F2 01 00 FF CD 64 03 21 00    ..1..!......d.!.
009DF0:  64 11 FD EB 01 42 F3 3E 01 CD D4 04 C3 AC 63 00    d....B.>......c.
009E00:  66 75 6E 63 74 69 6F 6E 20 20 20 20 20 20 20 64    function       d
009E10:  65 72 69 76 65 28 66 3A 66 6F 6E 63 74 69 6F 6E    erive(f:fonction
009E20:  29 3A 66 6F 6E 63 74 69 6F 6E 3B 0D 0A 76 61 72    ):fonction;..var
009E30:  0D 0A 70 2C 71 2C 72 2C 73 2C 75 2C 76 2C 77 3A    ..p,q,r,s,u,v,w:
009E40:  66 6F 6E 63 74 69 6F 6E 3B 0D 0A 78 78 78 3A 69    fonction;..xxx:i
009E50:  6E 74 65 67 65 72 3B 0D 0A 6E 62 72 65 3A 72 65    nteger;..nbre:re
009E60:  61 6C 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 6E 65    al;..begin..  ne
009E70:  77 28 70 29 3B 64 65 72 69 76 65 3A 3D 70 3B 0D    w(p);derive:=p;.
009E80:  0A 20 20 69 66 20 66 3D 6E 69 6C 20 74 68 65 6E    .  if f=nil then
009E90:  20 62 65 67 69 6E 20 64 69 73 70 6F 73 65 28 70     begin dispose(p
009EA0:  29 3B 64 65 72 69 76 65 3A 3D 6E 69 6C 20 65 6E    );derive:=nil en
009EB0:  64 0D 0A 20 20 20 20 65 6C 73 65 0D 0A 20 20 69    d..    else..  i
009EC0:  66 20 28 28 66 5E 2E 6E 61 74 75 72 65 3D 27 6E    f ((f^.nature='n
009ED0:  6F 6D 62 72 65 27 29 20 6F 72 20 28 66 5E 2E 6E    ombre') or (f^.n
009EE0:  61 74 75 72 65 3D 27 70 61 72 61 6D 27 29 29 20    ature='param')) 
009EF0:  74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20 20 20    then..          
009F00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009F10:  62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20    begin..         
009F20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009F30:  20 70 5E 2E 6E 61 74 75 72 65 3A 3D 27 6E 6F 6D     p^.nature:='nom
009F40:  62 72 65 27 3B 0D 0A 20 20 20 20 20 20 20 20 20    bre';..         
009F50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009F60:  20 70 5E 2E 76 61 6C 65 75 72 3A 3D 27 30 27 3B     p^.valeur:='0';
009F70:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
009F80:  20 20 20 20 20 20 20 20 20 20 20 20 70 5E 2E 64                p^.d
009F90:  3A 3D 6E 69 6C 3B 0D 0A 20 20 20 20 20 20 20 20    :=nil;..        
009FA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009FB0:  20 20 70 5E 2E 67 3A 3D 6E 69 6C 3B 0D 0A 20 20      p^.g:=nil;..  
009FC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009FD0:  20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20            end..   
009FE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009FF0:  20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20             else.. 
00A000:  20 69 66 20 66 5E 2E 6E 61 74 75 72 65 3D 27 76     if f^.nature='v
00A010:  61 72 69 61 62 27 20 74 68 65 6E 0D 0A 20 20 20    ariab' then..   
00A020:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A030:  20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20           begin..  
00A040:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A050:  20 20 20 20 20 20 20 20 70 5E 2E 6E 61 74 75 72            p^.natur
00A060:  65 3A 3D 27 6E 6F 6D 62 72 65 27 3B 0D 0A 20 20    e:='nombre';..  
00A070:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A080:  20 20 20 20 20 20 20 20 70 5E 2E 76 61 6C 65 75            p^.valeu
00A090:  72 3A 3D 27 31 27 3B 0D 0A 20 20 20 20 20 20 20    r:='1';..       
00A0A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A0B0:  20 20 20 70 5E 2E 64 3A 3D 6E 69 6C 3B 0D 0A 20       p^.d:=nil;.. 
00A0C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A0D0:  20 20 20 20 20 20 20 20 20 70 5E 2E 67 3A 3D 6E             p^.g:=n
00A0E0:  69 6C 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    il;..           
00A0F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65                   e
00A100:  6E 64 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    nd..            
00A110:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A120:  65 6C 73 65 0D 0A 20 20 69 66 20 28 28 66 5E 2E    else..  if ((f^.
00A130:  6E 61 74 75 72 65 3D 27 70 6C 75 73 27 29 20 6F    nature='plus') o
00A140:  72 20 28 66 5E 2E 6E 61 74 75 72 65 3D 27 6D 6F    r (f^.nature='mo
00A150:  69 6E 73 27 29 29 20 74 68 65 6E 0D 0A 20 20 20    ins')) then..   
00A160:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A170:  20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20           begin..  
00A180:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A190:  20 20 20 20 20 20 20 20 70 5E 2E 6E 61 74 75 72            p^.natur
00A1A0:  65 3A 3D 66 5E 2E 6E 61 74 75 72 65 3B 0D 0A 20    e:=f^.nature;.. 
00A1B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A1C0:  20 20 20 20 20 20 20 20 20 70 5E 2E 76 61 6C 65             p^.vale
00A1D0:  75 72 3A 3D 66 5E 2E 76 61 6C 65 75 72 3B 0D 0A    ur:=f^.valeur;..
00A1E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A1F0:  20 20 20 20 20 20 20 20 20 20 70 5E 2E 64 3A 3D              p^.d:=
00A200:  64 65 72 69 76 65 28 66 5E 2E 64 29 3B 0D 0A 20    derive(f^.d);.. 
00A210:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A220:  20 20 20 20 20 20 20 20 20 70 5E 2E 67 3A 3D 64             p^.g:=d
00A230:  65 72 69 76 65 28 66 5E 2E 67 29 3B 0D 0A 20 20    erive(f^.g);..  
00A240:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A250:  20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20            end..   
00A260:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A270:  20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20             else.. 
00A280:  20 69 66 20 66 5E 2E 6E 61 74 75 72 65 3D 27 6D     if f^.nature='m
00A290:  75 6C 74 69 27 20 74 68 65 6E 0D 0A 20 20 20 20    ulti' then..    
00A2A0:  20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20       begin..      
00A2B0:  20 20 70 5E 2E 6E 61 74 75 72 65 3A 3D 27 70 6C      p^.nature:='pl
00A2C0:  75 73 27 3B 70 5E 2E 76 61 6C 65 75 72 3A 3D 27    us';p^.valeur:='
00A2D0:  2B 27 3B 6E 65 77 28 70 5E 2E 67 29 3B 0D 0A 20    +';new(p^.g);.. 
00A2E0:  20 20 20 20 20 20 20 70 5E 2E 67 5E 2E 6E 61 74           p^.g^.nat
00A2F0:  75 72 65 3A 3D 27 6D 75 6C 74 69 27 3B 70 5E 2E    ure:='multi';p^.
00A300:  67 5E 2E 76 61 6C 65 75 72 3A 3D 27 2A 27 3B 70    g^.valeur:='*';p
00A310:  5E 2E 67 5E 2E 64 3A 3D 66 5E 2E 64 3B 0D 0A 20    ^.g^.d:=f^.d;.. 
00A320:  20 20 20 20 20 20 20 6E 65 77 28 70 5E 2E 64 29           new(p^.d)
00A330:  3B 70 5E 2E 64 5E 2E 6E 61 74 75 72 65 3A 3D 27    ;p^.d^.nature:='
00A340:  6D 75 6C 74 69 27 3B 70 5E 2E 64 5E 2E 76 61 6C    multi';p^.d^.val
00A350:  65 75 72 3A 3D 27 2A 27 3B 70 5E 2E 64 5E 2E 67    eur:='*';p^.d^.g
00A360:  3A 3D 66 5E 2E 67 3B 0D 0A 20 20 20 20 20 20 20    :=f^.g;..       
00A370:  20 70 5E 2E 64 5E 2E 64 3A 3D 64 65 72 69 76 65     p^.d^.d:=derive
00A380:  28 66 5E 2E 64 29 3B 70 5E 2E 67 5E 2E 67 3A 3D    (f^.d);p^.g^.g:=
00A390:  64 65 72 69 76 65 28 66 5E 2E 67 29 0D 0A 20 20    derive(f^.g)..  
00A3A0:  20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20         end..      
00A3B0:  20 20 20 65 6C 73 65 0D 0A 20 20 69 66 20 66 5E       else..  if f^
00A3C0:  2E 6E 61 74 75 72 65 3D 27 64 69 76 69 73 65 27    .nature='divise'
00A3D0:  20 74 68 65 6E 0D 0A 20 20 20 20 20 20 62 65 67     then..      beg
00A3E0:  69 6E 0D 0A 20 20 20 20 20 20 20 20 6E 65 77 28    in..        new(
00A3F0:  75 29 3B 6E 65 77 28 76 29 3B 6E 65 77 28 77 29    u);new(v);new(w)
00A400:  3B 6E 65 77 28 73 29 3B 6E 65 77 28 71 29 3B 75    ;new(s);new(q);u
00A410:  5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 6F 69 6E 73    ^.nature:='moins
00A420:  27 3B 75 5E 2E 76 61 6C 65 75 72 3A 3D 27 2D 27    ';u^.valeur:='-'
00A430:  3B 0D 0A 20 20 20 20 20 20 20 20 75 5E 2E 67 3A    ;..        u^.g:
00A440:  3D 77 3B 75 5E 2E 64 3A 3D 73 3B 76 5E 2E 6E 61    =w;u^.d:=s;v^.na
00A450:  74 75 72 65 3A 3D 27 70 75 69 73 73 27 3B 76 5E    ture:='puiss';v^
00A460:  2E 76 61 6C 65 75 72 3A 3D 27 5E 27 3B 0D 0A 20    .valeur:='^';.. 
00A470:  20 20 20 20 20 20 20 76 5E 2E 67 3A 3D 66 5E 2E           v^.g:=f^.
00A480:  64 3B 76 5E 2E 64 3A 3D 71 3B 71 5E 2E 6E 61 74    d;v^.d:=q;q^.nat
00A490:  75 72 65 3A 3D 27 6E 6F 6D 62 72 65 27 3B 71 5E    ure:='nombre';q^
00A4A0:  2E 76 61 6C 65 75 72 3A 3D 27 32 27 3B 0D 0A 20    .valeur:='2';.. 
00A4B0:  20 20 20 20 20 20 20 71 5E 2E 64 3A 3D 6E 69 6C           q^.d:=nil
00A4C0:  3B 71 5E 2E 67 3A 3D 6E 69 6C 3B 77 5E 2E 6E 61    ;q^.g:=nil;w^.na
00A4D0:  74 75 72 65 3A 3D 27 6D 75 6C 74 69 27 3B 77 5E    ture:='multi';w^
00A4E0:  2E 76 61 6C 65 75 72 3A 3D 27 2A 27 3B 77 5E 2E    .valeur:='*';w^.
00A4F0:  64 3A 3D 66 5E 2E 64 3B 0D 0A 20 20 20 20 20 20    d:=f^.d;..      
00A500:  20 20 77 5E 2E 67 3A 3D 64 65 72 69 76 65 28 66      w^.g:=derive(f
00A510:  5E 2E 67 29 3B 0D 0A 20 20 20 20 20 20 20 20 73    ^.g);..        s
00A520:  5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75 6C 74 69    ^.nature:='multi
00A530:  27 3B 73 5E 2E 76 61 6C 65 75 72 3A 3D 27 2A 27    ';s^.valeur:='*'
00A540:  3B 73 5E 2E 64 3A 3D 64 65 72 69 76 65 28 66 5E    ;s^.d:=derive(f^
00A550:  2E 64 29 3B 73 5E 2E 67 3A 3D 66 5E 2E 67 3B 0D    .d);s^.g:=f^.g;.
00A560:  0A 20 20 20 20 20 20 20 20 70 5E 2E 6E 61 74 75    .        p^.natu
00A570:  72 65 3A 3D 27 64 69 76 69 73 65 27 3B 70 5E 2E    re:='divise';p^.
00A580:  76 61 6C 65 75 72 3A 3D 27 2F 27 3B 70 5E 2E 67    valeur:='/';p^.g
00A590:  3A 3D 75 3B 70 5E 2E 64 3A 3D 76 3B 0D 0A 20 20    :=u;p^.d:=v;..  
00A5A0:  20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20        end..       
00A5B0:  20 65 6C 73 65 0D 0A 20 20 69 66 20 66 5E 2E 6E     else..  if f^.n
00A5C0:  61 74 75 72 65 3D 27 70 75 69 73 73 27 20 74 68    ature='puiss' th
00A5D0:  65 6E 0D 0A 20 20 20 20 20 62 65 67 69 6E 0D 0A    en..     begin..
00A5E0:  20 20 20 20 20 20 20 69 66 20 66 5E 2E 64 5E 2E           if f^.d^.
00A5F0:  6E 61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 20    nature='nombre' 
00A600:  74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20 20 20    then..          
00A610:  20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20       begin..      
00A620:  20 20 20 20 20 20 20 20 6E 65 77 28 75 29 3B 6E            new(u);n
00A630:  65 77 28 76 29 3B 6E 65 77 28 77 29 3B 76 61 6C    ew(v);new(w);val
00A640:  28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 2C 6E 62    (f^.d^.valeur,nb
00A650:  72 65 2C 72 65 73 75 6C 74 29 3B 71 3A 3D 66 5E    re,result);q:=f^
00A660:  2E 64 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    .d;..           
00A670:  20 20 20 76 5E 2E 67 3A 3D 66 5E 2E 67 3B 75 5E       v^.g:=f^.g;u^
00A680:  2E 6E 61 74 75 72 65 3A 3D 27 6D 75 6C 74 69 27    .nature:='multi'
00A690:  3B 75 5E 2E 76 61 6C 65 75 72 3A 3D 27 2A 27 3B    ;u^.valeur:='*';
00A6A0:  75 5E 2E 67 3A 3D 71 3B 0D 0A 20 20 20 20 20 20    u^.g:=q;..      
00A6B0:  20 20 20 20 20 20 20 20 75 5E 2E 64 3A 3D 64 65            u^.d:=de
00A6C0:  72 69 76 65 28 66 5E 2E 67 29 3B 76 5E 2E 6E 61    rive(f^.g);v^.na
00A6D0:  74 75 72 65 3A 3D 27 70 75 69 73 73 27 3B 76 5E    ture:='puiss';v^
00A6E0:  2E 76 61 6C 65 75 72 3A 3D 27 5E 27 3B 76 5E 2E    .valeur:='^';v^.
00A6F0:  64 3A 3D 77 3B 0D 0A 20 20 20 20 20 20 20 20 20    d:=w;..         
00A700:  20 20 20 20 20 77 5E 2E 6E 61 74 75 72 65 3A 3D         w^.nature:=
00A710:  27 6E 6F 6D 62 72 65 27 3B 77 5E 2E 67 3A 3D 6E    'nombre';w^.g:=n
00A720:  69 6C 3B 77 5E 2E 64 3A 3D 6E 69 6C 3B 6E 62 72    il;w^.d:=nil;nbr
00A730:  65 3A 3D 6E 62 72 65 2D 31 3B 0D 0A 20 20 20 20    e:=nbre-1;..    
00A740:  20 20 20 20 20 20 20 20 20 20 69 66 20 66 72 61              if fra
00A750:  63 28 6E 62 72 65 29 3D 30 20 74 68 65 6E 20 73    c(nbre)=0 then s
00A760:  74 72 28 72 6F 75 6E 64 28 6E 62 72 65 29 2C 77    tr(round(nbre),w
00A770:  5E 2E 76 61 6C 65 75 72 29 0D 0A 20 20 20 20 20    ^.valeur)..     
00A780:  20 20 20 20 20 20 20 20 20 65 6C 73 65 20 62 65             else be
00A790:  67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20    gin..           
00A7A0:  20 20 20 73 74 72 28 6E 62 72 65 3A 38 3A 33 2C       str(nbre:8:3,
00A7B0:  77 5E 2E 76 61 6C 65 75 72 29 3B 0D 0A 20 20 20    w^.valeur);..   
00A7C0:  20 20 20 20 20 20 20 20 20 20 20 77 68 69 6C 65               while
00A7D0:  20 70 6F 73 28 27 20 27 2C 77 5E 2E 76 61 6C 65     pos(' ',w^.vale
00A7E0:  75 72 29 3C 3E 30 20 64 6F 20 64 65 6C 65 74 65    ur)<>0 do delete
00A7F0:  28 77 5E 2E 76 61 6C 65 75 72 2C 31 2C 31 29 3B    (w^.valeur,1,1);
00A800:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
00A810:  20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20         end;..     
00A820:  20 20 20 20 20 20 20 20 20 70 5E 2E 6E 61 74 75             p^.natu
00A830:  72 65 3A 3D 27 6D 75 6C 74 69 27 3B 70 5E 2E 76    re:='multi';p^.v
00A840:  61 6C 65 75 72 3A 3D 27 2A 27 3B 70 5E 2E 67 3A    aleur:='*';p^.g:
00A850:  3D 75 3B 70 5E 2E 64 3A 3D 76 3B 0D 0A 20 20 20    =u;p^.d:=v;..   
00A860:  20 20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20              end.. 
00A870:  20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20          else..    
00A880:  20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20           begin..  
00A890:  20 20 20 20 20 20 20 20 20 20 6E 65 77 28 75 29              new(u)
00A8A0:  3B 75 5E 2E 6E 61 74 75 72 65 3A 3D 27 69 64 66    ;u^.nature:='idf
00A8B0:  63 74 27 3B 75 5E 2E 76 61 6C 65 75 72 3A 3D 27    ct';u^.valeur:='
00A8C0:  6C 6E 27 3B 75 5E 2E 67 3A 3D 6E 69 6C 3B 75 5E    ln';u^.g:=nil;u^
00A8D0:  2E 64 3A 3D 66 5E 2E 67 3B 0D 0A 20 20 20 20 20    .d:=f^.g;..     
00A8E0:  20 20 20 20 6E 65 77 28 76 29 3B 76 5E 2E 6E 61        new(v);v^.na
00A8F0:  74 75 72 65 3A 3D 27 6D 75 6C 74 69 27 3B 76 5E    ture:='multi';v^
00A900:  2E 76 61 6C 65 75 72 3A 3D 27 2A 27 3B 76 5E 2E    .valeur:='*';v^.
00A910:  67 3A 3D 64 65 72 69 76 65 28 66 5E 2E 64 29 3B    g:=derive(f^.d);
00A920:  76 5E 2E 64 3A 3D 75 3B 0D 0A 20 20 20 20 20 20    v^.d:=u;..      
00A930:  20 20 6E 65 77 28 77 29 3B 77 5E 2E 6E 61 74 75      new(w);w^.natu
00A940:  72 65 3A 3D 27 6D 75 6C 74 69 27 3B 77 5E 2E 76    re:='multi';w^.v
00A950:  61 6C 65 75 72 3A 3D 27 2A 27 3B 77 5E 2E 67 3A    aleur:='*';w^.g:
00A960:  3D 64 65 72 69 76 65 28 66 5E 2E 67 29 3B 77 5E    =derive(f^.g);w^
00A970:  2E 64 3A 3D 66 5E 2E 64 3B 0D 0A 20 20 20 20 20    .d:=f^.d;..     
00A980:  20 20 20 20 6E 65 77 28 71 29 3B 71 5E 2E 6E 61        new(q);q^.na
00A990:  74 75 72 65 3A 3D 27 64 69 76 69 73 65 27 3B 71    ture:='divise';q
00A9A0:  5E 2E 76 61 6C 65 75 72 3A 3D 27 2F 27 3B 71 5E    ^.valeur:='/';q^
00A9B0:  2E 67 3A 3D 77 3B 71 5E 2E 64 3A 3D 66 5E 2E 67    .g:=w;q^.d:=f^.g
00A9C0:  3B 0D 0A 20 20 20 20 20 20 20 20 20 6E 65 77 28    ;..         new(
00A9D0:  72 29 3B 72 5E 2E 6E 61 74 75 72 65 3A 3D 27 70    r);r^.nature:='p
00A9E0:  6C 75 73 27 3B 72 5E 2E 76 61 6C 65 75 72 3A 3D    lus';r^.valeur:=
00A9F0:  27 2B 27 3B 72 5E 2E 67 3A 3D 76 3B 72 5E 2E 64    '+';r^.g:=v;r^.d
00AA00:  3A 3D 71 3B 0D 0A 20 20 20 20 20 20 20 20 20 20    :=q;..          
00AA10:  20 20 20 20 20 70 5E 2E 6E 61 74 75 72 65 3A 3D         p^.nature:=
00AA20:  27 6D 75 6C 74 69 27 3B 70 5E 2E 76 61 6C 65 75    'multi';p^.valeu
00AA30:  72 3A 3D 27 2A 27 3B 70 5E 2E 67 3A 3D 72 3B 70    r:='*';p^.g:=r;p
00AA40:  5E 2E 64 3A 3D 66 3B 0D 0A 20 20 20 20 20 20 20    ^.d:=f;..       
00AA50:  65 6E 64 3B 0D 0A 20 20 20 20 20 65 6E 64 0D 0A    end;..     end..
00AA60:  20 20 20 20 65 6C 73 65 0D 0A 20 20 69 66 20 66        else..  if f
00AA70:  5E 2E 6E 61 74 75 72 65 3D 27 69 64 66 63 74 27    ^.nature='idfct'
00AA80:  20 74 68 65 6E 0D 0A 20 20 20 20 62 65 67 69 6E     then..    begin
00AA90:  0D 0A 20 20 20 20 20 20 69 66 20 66 5E 2E 76 61    ..      if f^.va
00AAA0:  6C 65 75 72 3D 27 73 69 6E 27 20 74 68 65 6E 0D    leur='sin' then.
00AAB0:  0A 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A    .        begin..
00AAC0:  20 20 20 20 20 20 20 20 20 6E 65 77 28 75 29 3B             new(u);
00AAD0:  75 5E 2E 6E 61 74 75 72 65 3A 3D 27 69 64 66 63    u^.nature:='idfc
00AAE0:  74 27 3B 75 5E 2E 76 61 6C 65 75 72 3A 3D 27 63    t';u^.valeur:='c
00AAF0:  6F 73 27 3B 75 5E 2E 67 3A 3D 6E 69 6C 3B 75 5E    os';u^.g:=nil;u^
00AB00:  2E 64 3A 3D 66 5E 2E 64 3B 0D 0A 20 20 20 20 20    .d:=f^.d;..     
00AB10:  20 20 20 20 70 5E 2E 6E 61 74 75 72 65 3A 3D 27        p^.nature:='
00AB20:  6D 75 6C 74 69 27 3B 70 5E 2E 76 61 6C 65 75 72    multi';p^.valeur
00AB30:  3A 3D 27 2A 27 3B 70 5E 2E 67 3A 3D 64 65 72 69    :='*';p^.g:=deri
00AB40:  76 65 28 66 5E 2E 64 29 3B 70 5E 2E 64 3A 3D 75    ve(f^.d);p^.d:=u
00AB50:  3B 0D 0A 20 20 20 20 20 20 20 20 65 6E 64 0D 0A    ;..        end..
00AB60:  20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20             else.. 
00AB70:  20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C 65 75         if f^.valeu
00AB80:  72 3D 27 63 6F 73 27 20 74 68 65 6E 0D 0A 20 20    r='cos' then..  
00AB90:  20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20          begin..   
00ABA0:  20 20 20 20 20 20 6E 65 77 28 76 29 3B 76 5E 2E          new(v);v^.
00ABB0:  6E 61 74 75 72 65 3A 3D 27 69 64 66 63 74 27 3B    nature:='idfct';
00ABC0:  76 5E 2E 76 61 6C 65 75 72 3A 3D 27 73 69 6E 27    v^.valeur:='sin'
00ABD0:  3B 76 5E 2E 67 3A 3D 6E 69 6C 3B 76 5E 2E 64 3A    ;v^.g:=nil;v^.d:
00ABE0:  3D 66 5E 2E 64 3B 0D 0A 20 20 20 20 20 20 20 20    =f^.d;..        
00ABF0:  20 6E 65 77 28 75 29 3B 75 5E 2E 6E 61 74 75 72     new(u);u^.natur
00AC00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
00AC10:  09 00 00 00 02 09 4E E5 09 00 41 02 00 00 00 02    ......N...A.....
00AC20:  09 00 42 02 00 00 00 02 09 00 43 02 00 00 00 02    ..B.......C.....
00AC30:  09 00 44 02 00 00 00 02 09 00 45 02 00 00 00 02    ..D.......E.....
00AC40:  09 00 46 02 00 00 00 02 09 00 47 02 00 00 00 02    ..F.......G.....
00AC50:  09 00 48 02 00 00 00 02 09 00 49 02 00 00 00 02    ..H.......I.....
00AC60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AC70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AC80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AC90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00ACA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00ACB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00ACC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00ACD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00ACE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00ACF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AD00:  65 3A 3D 27 6D 75 6C 74 69 27 3B 75 5E 2E 76 61    e:='multi';u^.va
00AD10:  6C 65 75 72 3A 3D 27 2A 27 3B 6E 65 77 28 75 5E    leur:='*';new(u^
00AD20:  2E 67 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 75    .g);..         u
00AD30:  5E 2E 67 5E 2E 6E 61 74 75 72 65 3A 3D 27 6E 6F    ^.g^.nature:='no
00AD40:  6D 62 72 65 27 3B 75 5E 2E 67 5E 2E 76 61 6C 65    mbre';u^.g^.vale
00AD50:  75 72 3A 3D 27 2D 31 27 3B 75 5E 2E 67 5E 2E 64    ur:='-1';u^.g^.d
00AD60:  3A 3D 6E 69 6C 3B 0D 0A 20 20 20 20 20 20 20 20    :=nil;..        
00AD70:  20 75 5E 2E 67 5E 2E 67 3A 3D 6E 69 6C 3B 75 5E     u^.g^.g:=nil;u^
00AD80:  2E 64 3A 3D 76 3B 0D 0A 20 20 20 20 20 20 20 20    .d:=v;..        
00AD90:  20 70 5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75 6C     p^.nature:='mul
00ADA0:  74 69 27 3B 70 5E 2E 76 61 6C 65 75 72 3A 3D 27    ti';p^.valeur:='
00ADB0:  2A 27 3B 70 5E 2E 67 3A 3D 64 65 72 69 76 65 28    *';p^.g:=derive(
00ADC0:  66 5E 2E 64 29 3B 70 5E 2E 64 3A 3D 75 3B 0D 0A    f^.d);p^.d:=u;..
00ADD0:  20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20            end..   
00ADE0:  20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20          else..    
00ADF0:  20 20 69 66 20 66 5E 2E 76 61 6C 65 75 72 3D 27      if f^.valeur='
00AE00:  74 61 6E 67 27 20 74 68 65 6E 0D 0A 20 20 20 20    tang' then..    
00AE10:  20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20        begin..     
00AE20:  20 20 20 20 6E 65 77 28 73 29 3B 73 5E 2E 6E 61        new(s);s^.na
00AE30:  74 75 72 65 3A 3D 27 6E 6F 6D 62 72 65 27 3B 73    ture:='nombre';s
00AE40:  5E 2E 76 61 6C 65 75 72 3A 3D 27 32 27 3B 73 5E    ^.valeur:='2';s^
00AE50:  2E 64 3A 3D 6E 69 6C 3B 73 5E 2E 67 3A 3D 6E 69    .d:=nil;s^.g:=ni
00AE60:  6C 3B 0D 0A 20 20 20 20 20 20 20 20 20 6E 65 77    l;..         new
00AE70:  28 77 29 3B 77 5E 2E 6E 61 74 75 72 65 3A 3D 27    (w);w^.nature:='
00AE80:  69 64 66 63 74 27 3B 77 5E 2E 76 61 6C 65 75 72    idfct';w^.valeur
00AE90:  3A 3D 27 63 6F 73 27 3B 77 5E 2E 67 3A 3D 6E 69    :='cos';w^.g:=ni
00AEA0:  6C 3B 77 5E 2E 64 3A 3D 66 5E 2E 64 3B 0D 0A 20    l;w^.d:=f^.d;.. 
00AEB0:  20 20 20 20 20 20 20 20 6E 65 77 28 76 29 3B 76            new(v);v
00AEC0:  5E 2E 6E 61 74 75 72 65 3A 3D 27 70 75 69 73 73    ^.nature:='puiss
00AED0:  27 3B 76 5E 2E 76 61 6C 65 75 72 3A 3D 27 5E 27    ';v^.valeur:='^'
00AEE0:  3B 76 5E 2E 67 3A 3D 77 3B 76 5E 2E 64 3A 3D 73    ;v^.g:=w;v^.d:=s
00AEF0:  3B 0D 0A 20 20 20 20 20 20 20 20 20 70 5E 2E 6E    ;..         p^.n
00AF00:  61 74 75 72 65 3A 3D 27 64 69 76 69 73 65 27 3B    ature:='divise';
00AF10:  70 5E 2E 76 61 6C 65 75 72 3A 3D 27 2F 27 3B 70    p^.valeur:='/';p
00AF20:  5E 2E 64 3A 3D 76 3B 70 5E 2E 67 3A 3D 64 65 72    ^.d:=v;p^.g:=der
00AF30:  69 76 65 28 66 5E 2E 64 29 3B 0D 0A 20 20 20 20    ive(f^.d);..    
00AF40:  20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20        end..       
00AF50:  20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 69       else..      i
00AF60:  66 20 66 5E 2E 76 61 6C 65 75 72 3D 27 6C 6E 27    f f^.valeur='ln'
00AF70:  20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20 62     then..        b
00AF80:  65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 70    egin..         p
00AF90:  5E 2E 6E 61 74 75 72 65 3A 3D 27 64 69 76 69 73    ^.nature:='divis
00AFA0:  65 27 3B 70 5E 2E 76 61 6C 65 75 72 3A 3D 27 2F    e';p^.valeur:='/
00AFB0:  27 3B 70 5E 2E 64 3A 3D 66 5E 2E 64 3B 70 5E 2E    ';p^.d:=f^.d;p^.
00AFC0:  67 3A 3D 64 65 72 69 76 65 28 66 5E 2E 64 29 3B    g:=derive(f^.d);
00AFD0:  0D 0A 20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20    ..        end.. 
00AFE0:  20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20             else.. 
00AFF0:  20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C 65 75         if f^.valeu
00B000:  72 3D 27 65 78 70 27 20 74 68 65 6E 0D 0A 20 20    r='exp' then..  
00B010:  20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20          begin..   
00B020:  20 20 20 20 20 20 6E 65 77 28 75 29 3B 75 5E 2E          new(u);u^.
00B030:  6E 61 74 75 72 65 3A 3D 27 69 64 66 63 74 27 3B    nature:='idfct';
00B040:  75 5E 2E 76 61 6C 65 75 72 3A 3D 27 65 78 70 27    u^.valeur:='exp'
00B050:  3B 75 5E 2E 67 3A 3D 6E 69 6C 3B 75 5E 2E 64 3A    ;u^.g:=nil;u^.d:
00B060:  3D 66 5E 2E 64 3B 0D 0A 20 20 20 20 20 20 20 20    =f^.d;..        
00B070:  20 70 5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75 6C     p^.nature:='mul
00B080:  74 69 27 3B 70 5E 2E 76 61 6C 65 75 72 3A 3D 27    ti';p^.valeur:='
00B090:  2A 27 3B 70 5E 2E 67 3A 3D 64 65 72 69 76 65 28    *';p^.g:=derive(
00B0A0:  66 5E 2E 64 29 3B 70 5E 2E 64 3A 3D 75 3B 0D 0A    f^.d);p^.d:=u;..
00B0B0:  20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20            end..   
00B0C0:  20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20          else..    
00B0D0:  20 20 69 66 20 66 5E 2E 76 61 6C 65 75 72 3D 27      if f^.valeur='
00B0E0:  73 71 72 74 27 20 74 68 65 6E 0D 0A 20 20 20 20    sqrt' then..    
00B0F0:  20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20        begin..     
00B100:  20 20 20 20 20 6E 65 77 28 75 29 3B 6E 65 77 28         new(u);new(
00B110:  76 29 3B 6E 65 77 28 77 29 3B 77 5E 2E 6E 61 74    v);new(w);w^.nat
00B120:  75 72 65 3A 3D 27 6E 6F 6D 62 72 65 27 3B 77 5E    ure:='nombre';w^
00B130:  2E 76 61 6C 65 75 72 3A 3D 27 32 27 3B 77 5E 2E    .valeur:='2';w^.
00B140:  67 3A 3D 6E 69 6C 3B 0D 0A 20 20 20 20 20 20 20    g:=nil;..       
00B150:  20 20 20 77 5E 2E 64 3A 3D 6E 69 6C 3B 76 5E 2E       w^.d:=nil;v^.
00B160:  6E 61 74 75 72 65 3A 3D 27 6D 75 6C 74 69 27 3B    nature:='multi';
00B170:  76 5E 2E 76 61 6C 65 75 72 3A 3D 27 2A 27 3B 76    v^.valeur:='*';v
00B180:  5E 2E 67 3A 3D 77 3B 76 5E 2E 64 3A 3D 66 3B 0D    ^.g:=w;v^.d:=f;.
00B190:  0A 20 20 20 20 20 20 20 20 20 20 70 5E 2E 6E 61    .          p^.na
00B1A0:  74 75 72 65 3A 3D 27 64 69 76 69 73 65 27 3B 70    ture:='divise';p
00B1B0:  5E 2E 76 61 6C 65 75 72 3A 3D 27 2F 27 3B 70 5E    ^.valeur:='/';p^
00B1C0:  2E 67 3A 3D 64 65 72 69 76 65 28 66 5E 2E 64 29    .g:=derive(f^.d)
00B1D0:  3B 70 5E 2E 64 3A 3D 76 3B 0D 0A 20 20 20 20 20    ;p^.d:=v;..     
00B1E0:  20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20       end..        
00B1F0:  65 6C 73 65 0D 0A 20 20 20 20 20 20 69 66 20 66    else..      if f
00B200:  5E 2E 76 61 6C 65 75 72 3D 27 73 68 27 20 74 68    ^.valeur='sh' th
00B210:  65 6E 0D 0A 20 20 20 20 20 20 20 20 62 65 67 69    en..        begi
00B220:  6E 0D 0A 20 20 20 20 20 20 20 20 20 6E 65 77 28    n..         new(
00B230:  75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D 27 69    u);u^.nature:='i
00B240:  64 66 63 74 27 3B 75 5E 2E 76 61 6C 65 75 72 3A    dfct';u^.valeur:
00B250:  3D 27 63 68 27 3B 75 5E 2E 67 3A 3D 6E 69 6C 3B    ='ch';u^.g:=nil;
00B260:  75 5E 2E 64 3A 3D 66 5E 2E 64 3B 0D 0A 20 20 20    u^.d:=f^.d;..   
00B270:  20 20 20 20 20 20 70 5E 2E 6E 61 74 75 72 65 3A          p^.nature:
00B280:  3D 27 6D 75 6C 74 69 27 3B 70 5E 2E 76 61 6C 65    ='multi';p^.vale
00B290:  75 72 3A 3D 27 2A 27 3B 70 5E 2E 67 3A 3D 64 65    ur:='*';p^.g:=de
00B2A0:  72 69 76 65 28 66 5E 2E 64 29 3B 70 5E 2E 64 3A    rive(f^.d);p^.d:
00B2B0:  3D 75 3B 0D 0A 20 20 20 20 20 20 20 20 65 6E 64    =u;..        end
00B2C0:  0D 0A 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A    ..        else..
00B2D0:  20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C 65          if f^.vale
00B2E0:  75 72 3D 27 63 68 27 20 74 68 65 6E 0D 0A 20 20    ur='ch' then..  
00B2F0:  20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20          begin..   
00B300:  20 20 20 20 20 20 6E 65 77 28 75 29 3B 75 5E 2E          new(u);u^.
00B310:  6E 61 74 75 72 65 3A 3D 27 69 64 66 63 74 27 3B    nature:='idfct';
00B320:  75 5E 2E 76 61 6C 65 75 72 3A 3D 27 73 68 27 3B    u^.valeur:='sh';
00B330:  75 5E 2E 67 3A 3D 6E 69 6C 3B 75 5E 2E 64 3A 3D    u^.g:=nil;u^.d:=
00B340:  66 5E 2E 64 3B 0D 0A 20 20 20 20 20 20 20 20 20    f^.d;..         
00B350:  70 5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75 6C 74    p^.nature:='mult
00B360:  69 27 3B 70 5E 2E 76 61 6C 65 75 72 3A 3D 27 2A    i';p^.valeur:='*
00B370:  27 3B 70 5E 2E 67 3A 3D 64 65 72 69 76 65 28 66    ';p^.g:=derive(f
00B380:  5E 2E 64 29 3B 70 5E 2E 64 3A 3D 75 3B 0D 0A 20    ^.d);p^.d:=u;.. 
00B390:  20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20           end..    
00B3A0:  20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20        else..      
00B3B0:  69 66 20 66 5E 2E 76 61 6C 65 75 72 3D 27 74 68    if f^.valeur='th
00B3C0:  27 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20    ' then..        
00B3D0:  62 65 67 69 6E 20 20 6E 65 77 28 76 29 3B 76 5E    begin  new(v);v^
00B3E0:  2E 6E 61 74 75 72 65 3A 3D 27 6E 6F 6D 62 72 65    .nature:='nombre
00B3F0:  27 3B 76 5E 2E 76 61 6C 65 75 72 3A 3D 27 32 27    ';v^.valeur:='2'
00B400:  3B 76 5E 2E 64 3A 3D 6E 69 6C 3B 76 5E 2E 67 3A    ;v^.d:=nil;v^.g:
00B410:  3D 6E 69 6C 3B 0D 0A 20 20 20 20 20 20 20 20 20    =nil;..         
00B420:  6E 65 77 28 75 29 3B 75 5E 2E 6E 61 74 75 72 65    new(u);u^.nature
00B430:  3A 3D 27 70 75 69 73 73 27 3B 75 5E 2E 76 61 6C    :='puiss';u^.val
00B440:  65 75 72 3A 3D 27 5E 27 3B 75 5E 2E 64 3A 3D 76    eur:='^';u^.d:=v
00B450:  3B 75 5E 2E 67 3A 3D 66 3B 0D 0A 20 20 20 20 20    ;u^.g:=f;..     
00B460:  20 20 20 20 6E 65 77 28 77 29 3B 77 5E 2E 6E 61        new(w);w^.na
00B470:  74 75 72 65 3A 3D 27 6E 6F 6D 62 72 65 27 3B 77    ture:='nombre';w
00B480:  5E 2E 76 61 6C 65 75 72 3A 3D 27 31 27 3B 77 5E    ^.valeur:='1';w^
00B490:  2E 64 3A 3D 6E 69 6C 3B 77 5E 2E 67 3A 3D 6E 69    .d:=nil;w^.g:=ni
00B4A0:  6C 3B 0D 0A 20 20 20 20 20 20 20 20 20 6E 65 77    l;..         new
00B4B0:  28 73 29 3B 73 5E 2E 6E 61 74 75 72 65 3A 3D 27    (s);s^.nature:='
00B4C0:  6D 6F 69 6E 73 27 3B 73 5E 2E 76 61 6C 65 75 72    moins';s^.valeur
00B4D0:  3A 3D 27 2D 27 3B 73 5E 2E 67 3A 3D 77 3B 73 5E    :='-';s^.g:=w;s^
00B4E0:  2E 64 3A 3D 75 3B 0D 0A 20 20 20 20 20 20 20 20    .d:=u;..        
00B4F0:  20 70 5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75 6C     p^.nature:='mul
00B500:  74 69 27 3B 70 5E 2E 76 61 6C 65 75 72 3A 3D 27    ti';p^.valeur:='
00B510:  2A 27 3B 70 5E 2E 67 3A 3D 64 65 72 69 76 65 28    *';p^.g:=derive(
00B520:  66 5E 2E 64 29 3B 70 5E 2E 64 3A 3D 73 3B 0D 0A    f^.d);p^.d:=s;..
00B530:  20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20            end..   
00B540:  20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20         else..     
00B550:  20 20 69 66 20 66 5E 2E 76 61 6C 65 75 72 3D 27      if f^.valeur='
00B560:  61 72 63 74 61 6E 27 20 74 68 65 6E 0D 0A 20 20    arctan' then..  
00B570:  20 20 20 20 20 20 62 65 67 69 6E 20 20 6E 65 77          begin  new
00B580:  28 76 29 3B 76 5E 2E 6E 61 74 75 72 65 3A 3D 27    (v);v^.nature:='
00B590:  6E 6F 6D 62 72 65 27 3B 76 5E 2E 76 61 6C 65 75    nombre';v^.valeu
00B5A0:  72 3A 3D 27 32 27 3B 76 5E 2E 64 3A 3D 6E 69 6C    r:='2';v^.d:=nil
00B5B0:  3B 76 5E 2E 67 3A 3D 6E 69 6C 3B 0D 0A 20 20 20    ;v^.g:=nil;..   
00B5C0:  20 20 20 20 20 20 6E 65 77 28 75 29 3B 75 5E 2E          new(u);u^.
00B5D0:  6E 61 74 75 72 65 3A 3D 27 70 75 69 73 73 27 3B    nature:='puiss';
00B5E0:  75 5E 2E 76 61 6C 65 75 72 3A 3D 27 5E 27 3B 75    u^.valeur:='^';u
00B5F0:  5E 2E 64 3A 3D 76 3B 75 5E 2E 67 3A 3D 66 5E 2E    ^.d:=v;u^.g:=f^.
00B600:  64 3B 0D 0A 20 20 20 20 20 20 20 20 20 6E 65 77    d;..         new
00B610:  28 77 29 3B 77 5E 2E 6E 61 74 75 72 65 3A 3D 27    (w);w^.nature:='
00B620:  6E 6F 6D 62 72 65 27 3B 77 5E 2E 76 61 6C 65 75    nombre';w^.valeu
00B630:  72 3A 3D 27 31 27 3B 77 5E 2E 64 3A 3D 6E 69 6C    r:='1';w^.d:=nil
00B640:  3B 77 5E 2E 67 3A 3D 6E 69 6C 3B 0D 0A 20 20 20    ;w^.g:=nil;..   
00B650:  20 20 20 20 20 20 6E 65 77 28 73 29 3B 73 5E 2E          new(s);s^.
00B660:  6E 61 74 75 72 65 3A 3D 27 70 6C 75 73 27 3B 73    nature:='plus';s
00B670:  5E 2E 76 61 6C 65 75 72 3A 3D 27 2B 27 3B 73 5E    ^.valeur:='+';s^
00B680:  2E 67 3A 3D 77 3B 73 5E 2E 64 3A 3D 75 3B 0D 0A    .g:=w;s^.d:=u;..
00B690:  20 20 20 20 20 20 20 20 20 70 5E 2E 6E 61 74 75             p^.natu
00B6A0:  72 65 3A 3D 27 64 69 76 69 73 65 27 3B 70 5E 2E    re:='divise';p^.
00B6B0:  76 61 6C 65 75 72 3A 3D 27 2F 27 3B 70 5E 2E 67    valeur:='/';p^.g
00B6C0:  3A 3D 64 65 72 69 76 65 28 66 5E 2E 64 29 3B 70    :=derive(f^.d);p
00B6D0:  5E 2E 64 3A 3D 73 3B 0D 0A 20 20 20 20 20 20 20    ^.d:=s;..       
00B6E0:  20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20 65 6C     end..        el
00B6F0:  73 65 0D 0A 20 20 20 20 20 20 69 66 20 66 5E 2E    se..      if f^.
00B700:  76 61 6C 65 75 72 3D 27 61 72 63 73 69 6E 27 20    valeur='arcsin' 
00B710:  74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20 62 65    then..        be
00B720:  67 69 6E 20 20 6E 65 77 28 76 29 3B 76 5E 2E 6E    gin  new(v);v^.n
00B730:  61 74 75 72 65 3A 3D 27 6E 6F 6D 62 72 65 27 3B    ature:='nombre';
00B740:  76 5E 2E 76 61 6C 65 75 72 3A 3D 27 32 27 3B 76    v^.valeur:='2';v
00B750:  5E 2E 64 3A 3D 6E 69 6C 3B 76 5E 2E 67 3A 3D 6E    ^.d:=nil;v^.g:=n
00B760:  69 6C 3B 0D 0A 20 20 20 20 20 20 20 20 20 6E 65    il;..         ne
00B770:  77 28 75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D    w(u);u^.nature:=
00B780:  27 70 75 69 73 73 27 3B 75 5E 2E 76 61 6C 65 75    'puiss';u^.valeu
00B790:  72 3A 3D 27 5E 27 3B 75 5E 2E 64 3A 3D 76 3B 75    r:='^';u^.d:=v;u
00B7A0:  5E 2E 67 3A 3D 66 5E 2E 64 3B 0D 0A 20 20 20 20    ^.g:=f^.d;..    
00B7B0:  20 20 20 20 20 6E 65 77 28 77 29 3B 77 5E 2E 6E         new(w);w^.n
00B7C0:  61 74 75 72 65 3A 3D 27 6E 6F 6D 62 72 65 27 3B    ature:='nombre';
00B7D0:  77 5E 2E 76 61 6C 65 75 72 3A 3D 27 31 27 3B 77    w^.valeur:='1';w
00B7E0:  5E 2E 64 3A 3D 6E 69 6C 3B 77 5E 2E 67 3A 3D 6E    ^.d:=nil;w^.g:=n
00B7F0:  69 6C 3B 0D 0A 20 20 20 20 20 20 20 20 20 6E 65    il;..         ne
00B800:  77 28 73 29 3B 73 5E 2E 6E 61 74 75 72 65 3A 3D    w(s);s^.nature:=
00B810:  27 6D 6F 69 6E 73 27 3B 73 5E 2E 76 61 6C 65 75    'moins';s^.valeu
00B820:  72 3A 3D 27 2D 27 3B 73 5E 2E 67 3A 3D 77 3B 73    r:='-';s^.g:=w;s
00B830:  5E 2E 64 3A 3D 75 3B 0D 0A 20 20 20 20 20 20 20    ^.d:=u;..       
00B840:  20 20 6E 65 77 28 72 29 3B 72 5E 2E 6E 61 74 75      new(r);r^.natu
00B850:  72 65 3A 3D 27 69 64 66 63 74 27 3B 72 5E 2E 76    re:='idfct';r^.v
00B860:  61 6C 65 75 72 3A 3D 27 73 71 72 74 27 3B 72 5E    aleur:='sqrt';r^
00B870:  2E 67 3A 3D 6E 69 6C 3B 72 5E 2E 64 3A 3D 73 3B    .g:=nil;r^.d:=s;
00B880:  0D 0A 20 20 20 20 20 20 20 20 20 70 5E 2E 6E 61    ..         p^.na
00B890:  74 75 72 65 3A 3D 27 64 69 76 69 73 65 27 3B 70    ture:='divise';p
00B8A0:  5E 2E 76 61 6C 65 75 72 3A 3D 27 2F 27 3B 70 5E    ^.valeur:='/';p^
00B8B0:  2E 67 3A 3D 64 65 72 69 76 65 28 66 5E 2E 64 29    .g:=derive(f^.d)
00B8C0:  3B 70 5E 2E 64 3A 3D 72 3B 0D 0A 20 20 20 20 20    ;p^.d:=r;..     
00B8D0:  20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20       end..        
00B8E0:  65 6C 73 65 0D 0A 20 20 20 20 20 20 69 66 20 66    else..      if f
00B8F0:  5E 2E 76 61 6C 65 75 72 3D 27 61 72 63 63 6F 73    ^.valeur='arccos
00B900:  27 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20    ' then..        
00B910:  62 65 67 69 6E 20 20 6E 65 77 28 76 29 3B 76 5E    begin  new(v);v^
00B920:  2E 6E 61 74 75 72 65 3A 3D 27 6E 6F 6D 62 72 65    .nature:='nombre
00B930:  27 3B 76 5E 2E 76 61 6C 65 75 72 3A 3D 27 32 27    ';v^.valeur:='2'
00B940:  3B 76 5E 2E 64 3A 3D 6E 69 6C 3B 76 5E 2E 67 3A    ;v^.d:=nil;v^.g:
00B950:  3D 6E 69 6C 3B 0D 0A 20 20 20 20 20 20 20 20 20    =nil;..         
00B960:  6E 65 77 28 75 29 3B 75 5E 2E 6E 61 74 75 72 65    new(u);u^.nature
00B970:  3A 3D 27 70 75 69 73 73 27 3B 75 5E 2E 76 61 6C    :='puiss';u^.val
00B980:  65 75 72 3A 3D 27 5E 27 3B 75 5E 2E 64 3A 3D 76    eur:='^';u^.d:=v
00B990:  3B 75 5E 2E 67 3A 3D 66 5E 2E 64 3B 0D 0A 20 20    ;u^.g:=f^.d;..  
00B9A0:  20 20 20 20 20 20 20 6E 65 77 28 77 29 3B 77 5E           new(w);w^
00B9B0:  2E 6E 61 74 75 72 65 3A 3D 27 6E 6F 6D 62 72 65    .nature:='nombre
00B9C0:  27 3B 77 5E 2E 76 61 6C 65 75 72 3A 3D 27 31 27    ';w^.valeur:='1'
00B9D0:  3B 77 5E 2E 64 3A 3D 6E 69 6C 3B 77 5E 2E 67 3A    ;w^.d:=nil;w^.g:
00B9E0:  3D 6E 69 6C 3B 0D 0A 20 20 20 20 20 20 20 20 20    =nil;..         
00B9F0:  6E 65 77 28 73 29 3B 73 5E 2E 6E 61 74 75 72 65    new(s);s^.nature
00BA00:  3A 3D 27 6D 6F 69 6E 73 27 3B 73 5E 2E 76 61 6C    :='moins';s^.val
00BA10:  65 75 72 3A 3D 27 2D 27 3B 73 5E 2E 67 3A 3D 77    eur:='-';s^.g:=w
00BA20:  3B 73 5E 2E 64 3A 3D 75 3B 0D 0A 20 20 20 20 20    ;s^.d:=u;..     
00BA30:  20 20 20 20 6E 65 77 28 72 29 3B 72 5E 2E 6E 61        new(r);r^.na
00BA40:  74 75 72 65 3A 3D 27 69 64 66 63 74 27 3B 72 5E    ture:='idfct';r^
00BA50:  2E 76 61 6C 65 75 72 3A 3D 27 73 71 72 74 27 3B    .valeur:='sqrt';
00BA60:  72 5E 2E 67 3A 3D 6E 69 6C 3B 72 5E 2E 64 3A 3D    r^.g:=nil;r^.d:=
00BA70:  73 3B 0D 0A 20 20 20 20 20 20 20 20 20 6E 65 77    s;..         new
00BA80:  28 71 29 3B 71 5E 2E 6E 61 74 75 72 65 3A 3D 27    (q);q^.nature:='
00BA90:  6E 6F 6D 62 72 65 27 3B 71 5E 2E 76 61 6C 65 75    nombre';q^.valeu
00BAA0:  72 3A 3D 27 2D 31 27 3B 71 5E 2E 67 3A 3D 6E 69    r:='-1';q^.g:=ni
00BAB0:  6C 3B 71 5E 2E 64 3A 3D 6E 69 6C 3B 0D 0A 20 20    l;q^.d:=nil;..  
00BAC0:  20 20 20 6E 65 77 28 70 5E 2E 67 29 3B 70 5E 2E       new(p^.g);p^.
00BAD0:  67 5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75 6C 74    g^.nature:='mult
00BAE0:  69 27 3B 70 5E 2E 67 5E 2E 76 61 6C 65 75 72 3A    i';p^.g^.valeur:
00BAF0:  3D 27 2A 27 3B 70 5E 2E 67 5E 2E 67 3A 3D 64 65    ='*';p^.g^.g:=de
00BB00:  72 69 76 65 28 66 5E 2E 64 29 3B 0D 0A 20 20 20    rive(f^.d);..   
00BB10:  20 20 70 5E 2E 67 5E 2E 64 3A 3D 71 3B 70 5E 2E      p^.g^.d:=q;p^.
00BB20:  6E 61 74 75 72 65 3A 3D 27 64 69 76 69 73 65 27    nature:='divise'
00BB30:  3B 70 5E 2E 76 61 6C 65 75 72 3A 3D 27 2F 27 3B    ;p^.valeur:='/';
00BB40:  70 5E 2E 64 3A 3D 72 3B 0D 0A 20 20 20 20 20 20    p^.d:=r;..      
00BB50:  20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20 65      end..        e
00BB60:  6C 73 65 0D 0A 20 20 20 20 20 20 20 20 62 65 67    lse..        beg
00BB70:  69 6E 20 70 3A 3D 6E 69 6C 3B 64 65 66 69 6E 69    in p:=nil;defini
00BB80:  3A 3D 66 61 6C 73 65 3B 20 65 6E 64 3B 0D 0A 20    :=false; end;.. 
00BB90:  20 20 65 6E 64 3B 0D 0A 20 20 20 65 6E 64 3B 0D      end;..   end;.
00BBA0:  0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
00BBB0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
00BBC0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
00BBD0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
00BBE0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
00BBF0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
00BC00:  20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20          else..    
00BC10:  20 20 69 66 20 66 5E 2E 76 61 6C 65 75 72 3D 27      if f^.valeur='
00BC20:  63 6F 73 27 20 74 68 65 6E 0D 0A 20 20 20 20 20    cos' then..     
00BC30:  20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20       begin..      
00BC40:  20 20 20 6E 65 77 28 76 29 3B 76 5E 2E 6E 61 74       new(v);v^.nat
00BC50:  75 72 65 3A 3D 27 69 64 66 63 74 27 3B 76 5E 2E    ure:='idfct';v^.
00BC60:  76 61 6C 65 75 72 3A 3D 27 73 69 6E 27 3B 76 5E    valeur:='sin';v^
00BC70:  2E 67 3A 3D 6E 69 6C 3B 76 5E 2E 64 3A 3D 66 5E    .g:=nil;v^.d:=f^
00BC80:  2E 64 3B 0D 0A 20 20 20 20 20 20 20 20 20 6E 65    .d;..         ne
00BC90:  77 28 75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D    w(u);u^.nature:=
00BCA0:  27 6D 75 6C 74 69 27 3B 75 5E 2E 76 61 6C 65 75    'multi';u^.valeu
00BCB0:  72 3A 3D 27 2A 27 3B 6E 65 77 28 75 5E 2E 67 29    r:='*';new(u^.g)
00BCC0:  3B 0D 0A 20 20 20 20 20 20 20 20 20 75 5E 2E 67    ;..         u^.g
00BCD0:  5E 2E 6E 61 74 75 72 65 3A 3D 27 6E 6F 6D 62 72    ^.nature:='nombr
00BCE0:  65 27 3B 75 5E 2E 67 5E 2E 76 61 6C 65 75 72 3A    e';u^.g^.valeur:
00BCF0:  3D 27 2D 31 27 3B 75 5E 2E 67 5E 2E 64 3A 3D 6E    ='-1';u^.g^.d:=n
00BD00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BD10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BD20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BD30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BD40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BD50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BD60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BD70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BD80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BD90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BDA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BDB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BDC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BDD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BDE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BDF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BE00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BE10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BE20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BE30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BE40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BE50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BE60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BE70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BE80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BE90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BEA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BEB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BEC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BED0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BEE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BEF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00BF00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
00BF10:  0A 00 00 00 02 09 4E E5 0A 00 41 02 00 00 00 02    ......N...A.....
00BF20:  0A 00 42 02 00 00 00 02 0A 00 43 02 00 00 00 02    ..B.......C.....
00BF30:  0A 00 44 02 00 00 00 02 0A 00 45 02 00 00 00 02    ..D.......E.....
00BF40:  0A 00 46 02 00 00 00 02 0A 00 47 02 00 00 00 02    ..F.......G.....
00BF50:  0A 00 48 02 00 00 00 02 0A 00 49 02 00 00 00 02    ..H.......I.....
00BF60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BF70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BF80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BF90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BFA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BFB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BFC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BFD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BFE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BFF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C000:  C3 E2 20 CD AB 43 6F 70 79 72 69 67 68 74 20 28    .. ..Copyright (
00C010:  43 29 20 31 39 38 35 20 42 4F 52 4C 41 4E 44 20    C) 1985 BORLAND 
00C020:  49 6E 63 00 04 00 A1 42 00 00 00 00 00 00 00 00    Inc....B........
00C030:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C040:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C050:  00 00 00 06 5A 65 6E 69 74 68 64 65 72 20 43 50    ....Zenithder CP
00C060:  43 34 36 34 2F 36 36 34 50 18 00 00 1C 00 0D 0D    C464/664P.......
00C070:  1C 01 01 01 1D 03 03 1B 1B 1B D5 00 1C 01 00 00    ................
00C080:  1C 00 17 17 1D 17 17 EF 9E CD BD 04 1B 59 00 00    .............Y..
00C090:  00 00 00 00 00 00 00 00 00 00 00 01 20 20 04 03    ............  ..
00C0A0:  00 00 02 1B 45 00 00 00 00 00 00 00 00 00 02 1B    ....E...........
00C0B0:  4C 00 00 00 02 1B 4D 00 00 00 00 00 02 1B 4B 00    L.....M.......K.
00C0C0:  00 00 02 1B 71 00 00 00 02 1B 70 00 00 00 00 00    ....q.....p.....
00C0D0:  7E B7 37 C8 23 F5 E5 7E CD E8 01 E1 F1 3D C8 18    ~.7.#..~.....=..
00C0E0:  F3 CD 00 02 0D 0A 00 C9 6F E5 CD A6 00 C9 FE 80    ........o.......
00C0F0:  DC 6B 02 D4 84 02 E6 7F 18 EE E5 21 EE 01 18 04    .k.........!....
00C100:  E5 21 E8 01 22 13 02 E1 E3 F5 C5 D5 7E 23 B7 28    .!..".......~#.(
00C110:  07 E5 CD E8 01 E1 18 F4 D1 C1 F1 E3 C9 7D B4 C8    .............}..
00C120:  3A 24 01 87 87 87 E3 E3 E3 E3 C5 01 D2 04 C1 3D    :$.............=
00C130:  20 F4 2B 18 E8 CD D0 01 D8 2A CE 01 18 DF F5 C5     .+......*......
00C140:  D5 E5 21 A8 01 CD 35 02 21 A2 01 CD D0 01 2A BA    ..!...5.!.....*.
00C150:  01 D4 1D 02 E1 D1 C1 F1 C9 F5 C5 D5 E5 21 B4 01    .............!..
00C160:  18 E9 F5 C5 D5 E5 21 AE 01 18 E0 F5 3A E0 00 B7    ......!.....:...
00C170:  28 10 C5 D5 E5 AF 32 E0 00 21 C8 01 CD 35 02 E1    (.....2..!...5..
00C180:  D1 C1 F1 C9 F5 3A E0 00 FE FF 28 F6 C5 D5 E5 3E    .....:....(....>
00C190:  FF 32 E0 00 21 C2 01 18 E3 F5 C5 D5 E5 21 BC 01    .2..!........!..
00C1A0:  18 DA F5 C5 D5 E5 E5 11 F0 00 21 8B 01 01 10 00    ..........!.....
00C1B0:  ED B0 D1 3A 9E 01 4F 3A 9C 01 82 D5 CD DC 02 D1    ...:..O:........
00C1C0:  3A 9F 01 4F 3A 9D 01 83 CD DC 02 21 F0 00 CD D0    :..O:......!....
00C1D0:  01 2A A0 01 CD 1D 02 E1 D1 C1 F1 C9 21 F0 00 06    .*..........!...
00C1E0:  00 09 EB 21 9B 01 34 35 28 02 12 C9 1B 1B 21 0A    ...!..45(.....!.
00C1F0:  03 06 03 2B 0E 2F 0C 96 30 FC 86 F5 79 FE 30 28    ...+./..0...y.0(
00C200:  01 12 13 F1 10 ED C9 01 0A 64 21 6B 01 C3 35 02    .........d!k..5.
00C210:  21 7B 01 C3 35 02 11 03 00 CD 5F 03 E6 01 18 06    !{..5....._.....
00C220:  11 06 00 CD 5F 03 6F 26 00 C9 11 12 00 18 F4 11    ...._.o&........
00C230:  0C 00 18 08 11 0F 00 18 03 11 09 00 E1 C1 E5 3A    ...............:
00C240:  DD 00 B7 28 1A D5 C5 CD A0 00 7C B5 28 0F CD E1    ...(......|.(...
00C250:  03 FE 13 20 08 CD E1 03 FE 03 CA D4 20 C1 D1 2A    ... ........ ..*
00C260:  01 00 19 E9 22 D2 00 78 32 DD 00 79 B7 28 0B 3E    ...."..x2..y.(.>
00C270:  C3 32 38 00 21 FB 1F 22 39 00 21 A5 03 11 A0 00    .28.!.."9.!.....
00C280:  01 18 00 ED B0 21 BD 03 11 B8 00 01 0C 00 ED B0    .....!..........
00C290:  AF 6F 67 32 D0 00 22 D4 00 22 D6 00 3E 7E 32 D1    .og2..".."..>~2.
00C2A0:  00 32 E0 00 C9 C3 16 03 C3 20 03 C3 39 03 C3 2F    .2....... ..9../
00C2B0:  03 C3 34 03 C3 2A 03 C3 39 03 C3 20 03 C1 00 82    ..4..*..9.. ....
00C2C0:  00 43 00 C4 00 C5 00 C1 00 C5 D5 E5 DD E5 FD E5    .C..............
00C2D0:  F5 6F 26 00 E5 CD A6 00 F1 FD E1 DD E1 E1 D1 C1    .o&.............
00C2E0:  C9 C5 D5 E5 DD E5 FD E5 CD A3 00 7D 18 EB 0E FF    .........£.}....
00C2F0:  18 0C 0E 00 ED 5B D2 00 13 1A FE 20 28 FA 21 65    .....[..... (.!e
00C300:  00 06 03 CD 7B 04 1A CD A6 04 FE 41 38 12 FE 51    ....{......A8..Q
00C310:  30 0E 47 13 1A FE 3A 20 06 78 D6 40 13 18 02 1B    0.G...: .x.@....
00C320:  AF 21 5C 00 77 23 0C 0D 28 19 1A CD 82 04 20 13    .!\.w#..(..... .
00C330:  FE 3F 28 0F FE 2A 28 0B FE 2E 28 07 06 0B CD 77    .?(..*(...(....w
00C340:  04 18 10 06 08 CD 5E 04 1A FE 2E 20 06 13 06 03    ......^.... ....
00C350:  CD 5E 04 21 68 00 06 18 36 00 23 10 FB C9 1A 0C    .^.!h...6.#.....
00C360:  0D 28 08 FE 3F 28 09 FE 2A 28 0B CD 82 04 28 0B    .(..?(..*(....(.
00C370:  77 23 13 10 E9 C9 13 3E 3F 18 02 3E 20 77 23 10    w#.....>?..> w#.
00C380:  FC C9 CD A6 04 FE 20 38 0D E5 C5 21 98 04 01 0E    ...... 8...!....
00C390:  00 ED B1 C1 E1 C9 BF C9 20 2E 2C 3B 3A 3D 3F 2A    ........ .,;:=?*
00C3A0:  5B 5D 3C 3E 7B 7D FE 61 D8 FE 7B D0 D6 20 C9 7C    []<>{}.a..{.. .|
00C3B0:  CD B4 04 7D F5 1F 1F 1F 1F CD BD 04 F1 E6 0F C6    ...}............
00C3C0:  90 27 CE 40 27 C3 C9 03 AF 37 CB 7C C0 7C B7 7D    .'.@'....7.|.|.}
00C3D0:  C8 3E FF C9 32 D8 00 C5 CD AF 1E C1 2A 06 00 B7    .>..2.......*...
00C3E0:  ED 42 DA A8 20 EB D1 F9 01 00 FC 09 22 C6 00 AF    .B.. ......."...
00C3F0:  6F 67 22 CE 00 32 DC 00 3E C3 32 D9 00 21 DE 20    og"..2..>.2..!. 
00C400:  22 DA 00 EB 22 CC 00 E9 E5 2A C6 00 B7 ED 42 22    "..."....*....B"
00C410:  C6 00 ED 5B C4 00 B7 ED 52 19 EB E1 DA 75 1D ED    ...[....R....u..
00C420:  B0 C9 2A C6 00 ED B0 22 C6 00 D9 C9 5E 23 56 23    ..*...."....^#V#
00C430:  D5 5E 23 56 23 4E 23 46 E1 C9 DD E1 EB 1A 4F 06    .^#V#N#F......O.
00C440:  00 2F 6F 26 FF 39 F9 EB 03 ED B0 DD E9 D1 1A 4F    ./o&.9.........O
00C450:  06 00 2F 6F 26 FF 39 F9 EB 03 ED B0 E9 DD E1 EB    ../o&.9.........
00C460:  21 E0 FF 39 F9 EB C5 04 05 28 05 AF 12 13 10 FC    !..9.....(......
00C470:  ED B0 C1 3E 20 90 91 28 06 47 AF 12 13 10 FC DD    ...> ..(.G......
00C480:  E9 DD E1 21 E0 FF 39 F9 06 20 AF 77 23 10 FC DD    ...!..9.. .w#...
00C490:  E9 DD E1 45 CD BA 05 B6 77 DD E9 DD E1 D1 7D 93    ...E....w.....}.
00C4A0:  38 F7 3C 4F 43 CD BA 05 5F 41 AF B3 CB 23 30 06    8.<OC..._A...#0.
00C4B0:  B6 77 23 AF 1E 01 10 F3 18 DD 78 E6 F8 0F 0F 0F    .w#.......x.....
00C4C0:  C6 02 6F 26 00 39 78 E6 07 3C 47 AF 37 17 10 FD    ..o&.9x..<G.7...
00C4D0:  C9 E5 D9 EB E3 73 23 72 23 D1 73 23 72 23 71 23    .....s#r#.s#r#q#
00C4E0:  70 C9 DD E1 78 EB 21 00 00 44 39 4E E5 09 23 E3    p...x.!..D9N..#.
00C4F0:  B9 38 01 79 12 13 23 B7 28 03 4F ED B0 E1 F9 DD    .8.y..#.(.O.....
00C500:  E9 DD E1 78 21 00 00 44 39 4E E5 09 23 5E 23 56    ...x!..D9N..#^#V
00C510:  18 DC DD E1 EB 68 26 00 44 39 ED B0 21 20 00 39    .....h&.D9..! .9
00C520:  F9 DD E9 DD E1 21 20 00 39 5E 23 56 68 26 00 44    .....! .9^#Vh&.D
00C530:  39 ED B0 21 22 00 18 E7 DD E1 EB 78 2F 6F 26 FF    9..!"......x/o&.
00C540:  39 F9 70 23 48 06 00 EB ED B0 DD E9 B7 ED 52 19    9.p#H.........R.
00C550:  D8 3E 90 C3 27 20 B7 ED 52 B7 ED 42 30 03 09 19    .>..' ..R..B0...
00C560:  C9 3E 91 C3 27 20 B7 ED 52 EB 13 EA 71 06 F0 18    .>..' ..R...q...
00C570:  01 F8 11 00 00 C9 D5 EB B7 ED 52 EB E1 18 EB B7    ..........R.....
00C580:  ED 52 21 01 00 C8 2B C9 CD DF 0B 18 F5 CD B0 09    .R!...+.........
00C590:  18 F0 B7 ED 52 21 01 00 C0 2B C9 CD DF 0B 18 F5    ....R!...+......
00C5A0:  CD B0 09 18 F0 CD 72 07 21 01 00 D0 2B C9 CD DF    ......r.!...+...
00C5B0:  0B 18 F5 CD B0 09 18 F0 CD 72 07 21 01 00 C8 D8    .........r.!....
00C5C0:  2B C9 CD DF 0B 18 F4 CD B0 09 18 EF CD 72 07 21    +............r.!
00C5D0:  00 00 C8 D8 23 C9 CD DF 0B 18 F4 CD B0 09 18 EF    ....#...........
00C5E0:  CD 72 07 21 01 00 D8 2B C9 CD DF 0B 18 F5 CD B0    .r.!...+........
00C5F0:  09 18 F0 54 5D 4B 42 EB 21 00 00 7A B7 3E 10 20    ...T]KB.!..z.>. 
00C600:  03 53 3E 08 29 EB 29 EB 30 01 09 3D 20 F6 C9 7C    .S>.).).0..= ..|
00C610:  B5 CA 03 0A 7C AA F5 CD 80 07 EB CD 80 07 EB 44    ....|..........D
00C620:  4D AF 67 6F 3E 11 ED 6A ED 42 30 02 09 37 3F CB    M.go>..j.B0..7?.
00C630:  13 CB 12 3D 20 F0 EB F1 F0 18 48 E5 CD 92 07 CB    ...= .....H.....
00C640:  3C CB 1D D1 EB CD 0F 07 EB CB 7A C8 18 35 CD 61    <.........z..5.a
00C650:  07 C8 29 10 FD C9 CD 61 07 C8 CB 3C CB 1D 10 FA    ..)....a...<....
00C660:  C9 EB 7A B7 20 08 7B FE 10 30 03 47 B7 C9 AF 67    ..z. .{..0.G...g
00C670:  6F C9 EB 7C AA 7C FA 7E 07 BA C0 7D BB C9 17 C9    o..|.|.~...}....
00C680:  CB 7C C8 7C 2F 67 7D 2F 6F 23 C9 7D E6 01 6F 26    .|.|/g}/o#.}..o&
00C690:  00 C9 ED 4B CA 00 ED 5B C8 00 C5 D5 78 41 4A 53    ...K...[....xAJS
00C6A0:  1E 00 1F CB 18 CB 19 CB 1A CB 1B E1 19 EB E1 ED    ................
00C6B0:  4A 44 4D 21 E9 62 19 22 C8 00 EB 21 19 36 ED 4A    JDM!.b."...!.6.J
00C6C0:  22 CA 00 44 4D C9 06 00 11 10 27 CD E2 07 11 E8    "..DM.....'.....
00C6D0:  03 CD E2 07 11 64 00 CD E2 07 1E 0A CD E2 07 7D    .....d.........}
00C6E0:  18 0D AF 3C ED 52 30 FB 19 04 3D 20 02 05 C8 C6    ...<.R0...= ....
00C6F0:  30 DD 77 00 DD 23 C9 DD 7E 00 D6 24 4F 21 00 00    0.w..#..~..$O!..
00C700:  20 02 DD 23 DD 7E 00 CD A6 04 D6 30 38 29 FE 0A     ..#.~.....08)..
00C710:  38 0E 0C 0D 20 21 D6 07 FE 0A 38 1B FE 10 30 17    8... !....8...0.
00C720:  54 5D 29 D8 29 D8 0C 0D 20 02 54 5D 19 D8 29 D8    T]).)... .T]..).
00C730:  5F 16 00 19 D8 18 CB 79 B7 C8 7C 87 C9 DD E1 E1    _......y..|.....
00C740:  E5 7D 26 00 23 39 4E 81 38 1C 77 EB 21 00 00 44    .}&.#9N.8.w.!..D
00C750:  ED 42 39 F9 EB E5 03 ED B0 EB E1 2B 1B 4F 03 ED    .B9........+.O..
00C760:  B8 EB 23 F9 DD E9 3E 10 C3 29 20 DD E1 CD C8 04    ..#...>..) .....
00C770:  57 E1 CD DD 09 5F E1 E5 7D 93 38 1A 14 15 28 16    W...._..}.8...(.
00C780:  BA 38 16 4A 06 00 60 39 7B 82 54 5D 3D 6F 60 39    .8.J..`9{.T]=o`9
00C790:  79 ED B8 EB 18 09 AF 18 03 3C 6B 2D 26 00 39 77    y........<k-&.9w
00C7A0:  F9 DD E9 DD E1 E1 E5 7D 26 00 23 39 F9 6F 26 00    .......}&.#9.o&.
00C7B0:  DD E9 DD E1 21 00 00 54 39 5E 4B 23 E5 19 5E 43    ....!..T9^K#..^C
00C7C0:  23 E5 19 E5 FD E1 D1 E1 79 90 38 10 3C 4F C5 D5    #.......y.8.<O..
00C7D0:  E5 1A BE 28 0C E1 D1 C1 23 0D 20 F2 21 00 00 18    ...(....#. .!...
00C7E0:  0E 23 13 10 EC D1 E1 C1 21 00 00 39 EB ED 52 FD    .#......!..9..R.
00C7F0:  F9 DD E9 DD E1 CD C8 04 4F E1 CD DD 09 5F E1 7E    ........O...._.~
00C800:  93 38 1B 0C 0D 28 17 91 38 12 F5 7E 91 77 06 00    .8...(..8..~.w..
00C810:  50 19 54 5D 09 F1 3C 4F ED B0 18 02 1D 73 DD E9    P.T]..<O.....s..
00C820:  DD E1 CD DD 09 4F D1 ED 53 E8 00 21 00 00 39 1A    .....O..S..!..9.
00C830:  F5 86 38 03 B8 38 01 78 12 F1 57 5E 91 38 2F 3C    ..8..8.x..W^.8/<
00C840:  6F 7A 83 38 04 B8 7D 38 08 78 93 38 26 91 38 23    oz.8..}8.x.8&.8#
00C850:  3C B7 28 1F C5 D5 2A E8 00 5F 1D 16 00 42 19 09    <.(...*.._...B..
00C860:  D1 D5 E5 50 19 EB E1 4F ED B8 D1 C1 18 05 7A 3C    ...P...O......z<
00C870:  28 19 4F 78 91 3C BB 38 01 7B B7 28 0E 2A E8 00    (.Ox.<.8.{.(.*..
00C880:  06 00 09 EB 21 01 00 39 4F ED B0 21 00 00 54 39    ....!..9O..!..T9
00C890:  5E 13 19 F9 DD E9 DD E1 E1 2D C2 66 08 6C 26 00    ^........-.f.l&.
00C8A0:  DD E9 21 02 00 54 39 5E 13 19 7E 36 01 23 77 C9    ..!..T9^..~6.#w.
00C8B0:  21 04 00 54 39 5E 4B 23 E5 19 5E 43 23 E5 19 E5    !..T9^K#..^C#...
00C8C0:  FD E1 D1 E1 AF B8 28 04 B9 20 08 78 B9 E1 D1 FD    ......(.. .x....
00C8D0:  F9 D5 E9 1A BE 20 F6 23 13 05 0D 18 E7 7C B7 20    ..... .#.....|. 
00C8E0:  03 7D B7 C0 3E 11 C3 29 20 CD 0D 0A D0 3E 01 C3    .}..>..) ....>..
00C8F0:  27 20 CD 81 0A 18 F5 CD AC 0F CD 97 0A 18 ED D9    ' ..............
00C900:  7D B7 D9 3E 02 CA 27 20 CD F5 0A 18 DF D9 CB 78    }..>..' .......x
00C910:  D9 C2 88 0A D9 7D B7 D9 C8 D9 C5 D5 E5 D9 7D B7    .....}........}.
00C920:  20 05 D9 CB B8 18 54 C5 CB F8 AF 08 D9 CB F8 7D     .....T........}
00C930:  D9 95 28 13 30 06 ED 44 08 3D 08 D9 CD 7A 0B 2C    ..(.0..D.=...z.,
00C940:  3D 20 F9 08 28 01 D9 F1 E6 80 20 0F CD 92 0B 30    = ..(..... ....0
00C950:  25 CD 7B 0B B7 2C 20 1E 37 18 20 CD C6 0B 3F F5    %.{.., .7. ...?.
00C960:  28 10 38 01 D9 CD AC 0B CB 78 20 09 CD 86 0B 2D    (.8......x ....-
00C970:  20 F6 CD 72 0B F1 38 02 CB B8 B7 D9 E1 D1 C1 D9     ..r..8.........
00C980:  C9 D9 CB 78 D9 C2 14 0A CD 8F 0A CD 14 0A D8 2C    ...x...........,
00C990:  2D C8 78 EE 80 47 C9 D9 7D B7 D9 CA 72 0B 7D B7    -.x..G..}...r.}.
00C9A0:  C8 D9 85 D9 CD 4D 0B C5 D5 E5 DD 39 CD 72 0B D9    .....M.....9.r..
00C9B0:  2E 05 D9 3E 08 DD 23 DD 6E 00 08 CB 1D 30 03 CD    ...>..#.n....0..
00C9C0:  92 0B CD 7B 0B 08 3D 20 F1 D9 2D D9 20 E5 DD 6E    ...{..= ..-. ..n
00C9D0:  FB CB 78 20 09 08 CD 87 0B 2C 2D 28 01 2D F1 F1    ..x .....,-(.-..
00C9E0:  F1 B7 08 F1 D9 C1 E1 D9 DD E1 CB B8 B0 47 2C 2D    .............G,-
00C9F0:  CC 72 0B 08 C9 7D B7 C8 D9 95 D9 3F CD 4D 0B E5    .r...}.....?.M..
00CA00:  E5 E5 DD 39 D9 2E 05 D9 3E 08 08 CD C6 0B 38 03    ...9....>.....8.
00CA10:  CD AC 0B 3F CB 15 08 3D 20 0C DD 75 05 DD 2B D9    ...?...= ..u..+.
00CA20:  2D D9 28 0E 3E 08 CD 86 0B 30 DF 08 CD AC 0B B7    -.(.>....0......
00CA30:  18 E1 CD 86 0B 38 04 CD C6 0B 3F E1 D1 C1 CB 78    .....8....?....x
00CA40:  20 05 CD 87 0B 18 9A 2C 20 97 37 18 95 38 06 C6     ......, .7..8..
00CA50:  80 38 06 18 1B C6 80 38 17 6F DD E3 D9 E5 C5 78    .8.....8.o.....x
00CA60:  CB F8 D9 A8 E6 80 F5 CB F8 DD E5 DD 21 00 00 C9    ............!...
00CA70:  E1 D8 AF 6F 47 4F 57 5F 67 C9 B7 CB 18 CB 19 CB    ...oGOW_g.......
00CA80:  1A CB 1B CB 1C C9 B7 CB 14 CB 13 CB 12 CB 11 CB    ................
00CA90:  10 C9 7C D9 84 D9 67 7B D9 8B D9 5F 7A D9 8A D9    ..|...g{..._z...
00CAA0:  57 79 D9 89 D9 4F 78 D9 88 D9 47 C9 7C D9 94 D9    Wy...Ox...G.|...
00CAB0:  67 7B D9 9B D9 5F 7A D9 9A D9 57 79 D9 99 D9 4F    g{..._z...Wy...O
00CAC0:  78 D9 98 D9 47 C9 78 D9 B8 D9 C0 79 D9 B9 D9 C0    x...G.x....y....
00CAD0:  7A D9 BA D9 C0 7B D9 BB D9 C0 7C D9 BC D9 C9 D9    z....{....|.....
00CAE0:  78 D9 A8 F2 E9 0B 78 17 C9 CB 78 28 06 CD F3 0B    x.....x...x(....
00CAF0:  C8 3F C9 7D D9 BD D9 C0 B7 C8 C3 C6 0B 7D D6 81    .?.}.........}..
00CB00:  DA 72 0B 3C FE 28 D0 D9 C5 D5 E5 08 CD 72 0B 08    .r.<.(.......r..
00CB10:  37 CD 7B 0B 3D 20 F9 D9 7C D9 A4 D9 67 7B D9 A3    7.{.= ..|...g{.£
00CB20:  D9 5F 7A D9 A2 D9 57 79 D9 A1 D9 4F 78 D9 A0 D9    ._z...Wy...Ox...
00CB30:  47 C3 7B 0A D9 C5 D5 E5 D9 CD AC 0F D9 CD FD 0B    G.{.............
00CB40:  D9 CD 81 0A 18 EB 7D B7 C8 CB 78 3E 03 C2 27 20    ......}...x>..' 
00CB50:  CD AC 0F 7D C6 80 CB 2F C6 80 6F D6 14 F5 D9 C5    ...}.../..o.....
00CB60:  D5 E5 CD F5 0A CD 0D 0A 2D C5 D5 E5 CD 81 0A 7D    ........-......}
00CB70:  E1 D1 C1 D9 E1 D1 C1 E3 BC E3 30 E3 F1 D9 C9 D9    ..........0.....
00CB80:  CD 8E 0F 2D CD 81 0A D9 CD 8E 0F 2C D9 7D FE 6C    ...-.......,.}.l
00CB90:  D8 C5 CB B8 CD DF 0B C1 38 09 CD F5 0A CD 34 0C    ........8.....4.
00CBA0:  CD 97 0A CB 78 28 03 CD 0D 0A D9 2D D9 CD DF 0B    ....x(.....-....
00CBB0:  F5 38 03 CD 81 0A D9 2D D9 CD DF 0B 38 05 D9 2C    .8.....-....8..,
00CBC0:  CD 81 0A 7D FE 6C 38 3B D9 01 AA 2A 11 AA AA 21    ...}.l8;...*...!
00CBD0:  7F AA CD 97 0A DD E5 DD 21 07 0D 3E 05 CD 34 0F    ........!..>..4.
00CBE0:  DD E1 CD AC 0F CD 97 0A CD 97 0A C5 D5 E5 D9 CD    ................
00CBF0:  AC 0F 2D 2D D9 2D CD 0D 0A D9 E1 D1 C1 D9 CD 81    ..--.-..........
00CC00:  0A 2C 2C F1 2C 2D C8 D8 78 EE 80 47 C9 67 AA 3F    .,,.,-..x..G.g.?
00CC10:  2B 32 D7 6E B6 2A 1D EF 38 74 0D D0 00 0D D0 7A    +2.n.*..8t.....z
00CC20:  88 88 88 88 08 7E AB AA AA AA AA 2C 2D 3E 04 CA    .....~.....,->..
00CC30:  27 20 CB 78 C2 27 20 D9 CD 98 0F D9 7D 2E 81 95    ' .x.' .....}...
00CC40:  F5 CD F5 0A D9 CD 86 0F D9 CD 81 0A C5 D5 E5 D9    ................
00CC50:  2C CD 0D 0A D9 E1 D1 C1 CD F5 0A DD E5 DD 21 8C    ,.............!.
00CC60:  0D 3E 06 CD 34 0F DD E1 2C D9 CD A2 0F 2D D9 CD    .>..4...,....-..
00CC70:  0D 0A F1 C5 D5 E5 6F 26 00 30 01 25 CD 08 10 D9    ......o&.0.%....
00CC80:  2C CD 97 0A D9 E1 D1 C1 CD 0D 0A 7D FE 67 DA 72    ,..........}.g.r
00CC90:  0B C9 7D 8A 9D D8 89 1D 7D E9 A2 8B 2E 3A 7D 8E    ..}.....}....:}.
00CCA0:  E3 38 8E 63 7E 49 92 24 49 12 7E CD CC CC CC 4C    .8.c~I.$I.~....L
00CCB0:  7F AB AA AA AA 2A D9 CD A2 0F D9 B7 CB 78 F5 CB    .....*.......x..
00CCC0:  B8 CD F5 0A 7D FE 88 30 47 C5 D5 E5 2C CD D0 0F    ....}..0G...,...
00CCD0:  E5 CB 3C CB 1D 7D E1 F5 CD 08 10 2C 2D 28 01 2D    ..<..}.....,-(.-
00CCE0:  D9 F1 E1 D1 C1 F5 CD 81 0A DD E5 DD 21 10 0E 3E    ............!..>
00CCF0:  08 CD 49 0F DD E1 F1 30 0A F5 D9 CD 98 0F D9 CD    ..I....0........
00CD00:  97 0A F1 85 6F 38 09 F1 C8 D9 CD 86 0F C3 F5 0A    ....o8..........
00CD10:  E1 3E 01 C3 27 20 6D 2E 1D 11 60 31 70 46 2C FE    .>..' m...`1pF,.
00CD20:  E5 7F 74 36 7C 89 84 21 77 53 3C FF C3 2E 7A D2    ..t6|..!wS<...z.
00CD30:  7D 5B 95 1D 7C 25 B8 46 58 63 7E 16 FC EF FD 75    }[..|%.FXc~....u
00CD40:  80 D2 F7 17 72 31 7D B7 C8 DD E5 D9 CD 86 0F D9    ....r1}.........
00CD50:  AF CB 78 28 03 3C CB B8 F5 CD DF 0B 38 08 D9 CD    ..x(.<......8...
00CD60:  F5 0A F1 CB FF F5 D9 01 CF 06 11 8E E9 21 7E 4A    .............!~J
00CD70:  D9 CD DF 0B 30 05 CD 2E 0F 18 4F DD 21 CE 0E 3E    ....0.....O.!..>
00CD80:  02 08 D9 11 12 00 DD 19 CD 73 0F D9 CD DF 0B 38    .........s.....8
00CD90:  0B 08 3D 20 EC D9 11 0C 00 DD 19 D9 D9 CD 6E 0F    ..= ..........n.
00CDA0:  CB F8 CD 0D 0A C5 D5 E5 CD 73 0F CD 97 0A D9 CD    .........s......
00CDB0:  86 0F CD 0D 0A D9 E1 D1 C1 CD F5 0A DD E5 CD 2E    ................
00CDC0:  0F DD E1 D9 CD 6E 0F CD 0D 0A F1 17 30 0A F5 D9    .....n......0...
00CDD0:  CD 8E 0F 2D CD 81 0A F1 DD E1 CB 4F C8 CB F8 C9    ...-.......O....
00CDE0:  7F E7 CF CC 13 54 7F F6 F4 A2 30 09 7F 6A C1 91    .....T....0..j..
00CDF0:  0A 06 80 B5 9E 8A 6F 44 80 82 2C 3A CD 13 80 6A    ......oD..,:...j
00CE00:  C1 91 0A 06 81 00 00 00 00 00 80 21 A2 DA 0F 49    ...........!...I
00CE10:  7D E8 A2 8B 2E BA 7D 8E E3 38 8E 63 7E 49 92 24    }.....}..8.c~I.$
00CE20:  49 92 7E CD CC CC CC 4C 7F AB AA AA AA AA DD 21    I.~....L.......!
00CE30:  0A 0F 3E 05 C5 D5 E5 F5 CD AC 0F CD 97 0A F1 CD    ..>.............
00CE40:  49 0F D9 E1 D1 C1 C3 97 0A F5 D9 CD 6E 0F 18 10    I...........n...
00CE50:  F5 D9 C5 D5 E5 CD 6E 0F CD 0D 0A D9 E1 D1 C1 D9    ......n.........
00CE60:  CD 97 0A F1 3D 20 E9 D9 CD 86 0F C3 0D 0A 11 06    ....= ..........
00CE70:  00 DD 19 DD 6E 00 DD 66 01 DD 5E 02 DD 56 03 DD    ....n..f..^..V..
00CE80:  4E 04 DD 46 05 C9 21 81 00 44 4C 54 5C C9 01 0F    N..F..!..DLT\...
00CE90:  49 11 A2 DA 21 82 21 C9 01 04 35 11 33 F3 21 81    I...!.!...5.3.!.
00CEA0:  FA C9 01 72 31 11 F7 17 21 80 D2 C9 C5 D5 E5 D9    ...r1...!.......
00CEB0:  E1 D1 C1 C9 CD 92 07 21 80 00 3E 20 CB 78 20 0D    .......!..> .x .
00CEC0:  CB 23 CB 12 CB 11 CB 10 2D 3D 20 F0 6F CB B8 C9    .#......-= .o...
00CED0:  CB 78 D9 CD 86 0F 28 02 CB F8 2D CD 0D 0A B7 CB    .x....(...-.....
00CEE0:  7D 28 1C CB 78 08 CB F8 3E 8F BD 38 16 28 06 CD    }(..x...>..8.(..
00CEF0:  7A 0B 2C 18 F3 CD 7A 0B 08 60 69 C8 C3 83 07 21    z.,...z..`i....!
00CF00:  00 00 C9 3E 92 C3 27 20 7C B5 CA 72 0B CB 7C 08    ...>..' |..r..|.
00CF10:  CD 80 07 3E 90 29 3D CB 7C 28 FA 44 4D 11 00 00    ...>.)=.|(.DM...
00CF20:  62 6F 08 C0 CB B8 C9 CD C8 04 EB 1E 00 38 04 FE    bo...........8..
00CF30:  19 38 18 1D CD C8 04 D9 CB 78 D9 16 07 28 01 14    .8.......x...(..
00CF40:  92 30 01 AF FE 09 38 02 3E 09 3C 57 D5 D9 FD 21    .0....8.>.<W...!
00CF50:  5D 00 DD E5 CD EB 10 DD E1 D1 4F 7A 3C CB 7B 20    ].........Oz<.{ 
00CF60:  10 81 F2 6B 10 FD 36 00 00 18 0B FE 0C 38 02 3E    ...k..6......8.>
00CF70:  0B D5 CD 80 11 D1 CB 78 28 05 3E 2D CD E5 10 CB    .......x(.>-....
00CF80:  7B 28 03 61 0E 00 CB 79 28 05 CD E3 10 18 07 CD    {(.a...y(.......
00CF90:  D9 10 0D F2 8F 10 7A B7 28 17 3E 2E CD E5 10 0C    ......z.(.>.....
00CFA0:  28 06 CD E3 10 15 20 F7 15 FA B1 10 CD D9 10 18    (..... .........
00CFB0:  F7 CB 7B C8 3E 45 CD E5 10 3E 2B CB 7C 28 06 7C    ..{.>E...>+.|(.|
00CFC0:  ED 44 67 3E 2D CD E5 10 7C 06 2F 04 D6 0A 30 FB    .Dg>-...|./...0.
00CFD0:  C6 3A DD 70 00 DD 23 18 0C FD 7E 00 FD 23 B7 20    .:.p..#...~..#. 
00CFE0:  04 FD 2B 3E 30 DD 77 00 DD 23 C9 FD E5 2C 2D 20    ..+>0.w..#...,- 
00CFF0:  0E 06 0C FD 36 00 30 FD 23 10 F8 AF C3 7D 11 C5    ....6.0.#....}..
00D000:  CB B8 7D D9 D6 80 6F 9F 67 11 4D 00 CD F5 06 11    ..}...o.g.M.....
00D010:  05 00 19 7C FE D9 20 01 3C FD 77 00 ED 44 CD 40    ...|.. .<.w..D.@
00D020:  12 7D FE 81 30 06 CD B3 12 FD 35 00 CB F8 3E 84    .}..0.....5...>.
00D030:  95 2E 00 28 08 CD 7A 0B CB 1D 3D 20 F8 FD 7E 00    ...(..z...= ..~.
00D040:  F5 3E 0C 08 78 1F 1F 1F 1F E6 0F C6 30 FD 77 00    .>..x.......0.w.
00D050:  FD 23 78 E6 0F 47 C5 D5 E5 CB 25 CD 87 0B CB 25    .#x..G....%....%
00D060:  CD 87 0B EB E3 19 D1 E3 ED 5A EB E1 E3 ED 4A 44    .........Z....JD
00D070:  4D E1 CB 25 CD 87 0B 08 3D 20 C8 F1 C1 FD E1 C9    M..%....= ......
00D080:  FD E5 E1 5F 16 00 19 7E 36 00 FE 35 D8 1D FA 9C    ..._...~6..5....
00D090:  11 2B 7E 3C 77 FE 3A D8 36 00 18 F1 36 31 23 36    .+~<w.:.6...61#6
00D0A0:  00 0C C9 D9 01 00 00 D9 CD 72 0B DD 7E 00 CD A6    .........r..~...
00D0B0:  04 FE 2E 20 0C D9 CB 70 37 C0 CB F0 D9 DD 23 18    ... ...p7.....#.
00D0C0:  EA FE 45 28 21 CD 39 12 30 54 08 CD B3 12 D8 08    ..E(!.9.0T......
00D0D0:  D9 C5 6F 26 00 CD 08 10 CD E9 09 D9 C1 D8 CB 70    ..o&...........p
00D0E0:  28 01 0D D9 18 D7 CD 1E 12 D8 D9 CB E0 DD 23 DD    (.............#.
00D0F0:  7E 00 FE 2B 28 06 FE 2D 20 04 CB E8 DD 23 CD 36    ~..+(..- ....#.6
00D100:  12 3F D8 4F DD 23 CD 36 12 30 0A DD 23 57 79 87    .?.O.#.6.0..#Wy.
00D110:  87 81 87 82 4F CB 68 28 04 79 ED 44 4F D9 D9 79    ....O.h(.y.DO..y
00D120:  C6 80 FE 5A D8 FE A6 3F D8 C5 DD E5 79 CD 40 12    ...Z...?....y.@.
00D130:  DD E1 D9 C1 D9 C9 DD 7E 00 D6 30 3F D0 FE 0A C9    .......~..0?....
00D140:  F5 B7 F2 47 12 ED 44 F5 CB 3F CB 3F 3C 21 FA FF    ...G..D..?.?<!..
00D150:  11 06 00 19 3D 20 FC EB DD 21 77 12 DD 19 CD 73    ....= ...!w....s
00D160:  0F F1 E6 03 28 08 F5 CD B3 12 F1 3D 20 F8 F1 B7    ....(......= ...
00D170:  F2 97 0A D9 C3 F5 0A 81 00 00 00 00 00 8E 00 00    ................
00D180:  00 40 1C 9B 00 00 20 BC 3E A8 00 10 A5 D4 68 B6    .@.... .>.....h.
00D190:  04 BF C9 1B 0E C3 AC C5 EB 78 2D D0 CD CE 1B C2    .........x-.....
00D1A0:  53 DE F9 78 39 3F 01 EB 2B A8 AD C5 1D F8 C9 7B    S..x9?..+......{
00D1B0:  CE 97 40 7D B7 C8 CB F8 C5 D5 7C CD 7A 0B CD 7A    ..@}......|.z..z
00D1C0:  0B 84 67 E3 ED 5A EB E1 E3 ED 4A 44 4D E1 30 06    ..g..Z....JDM.0.
00D1D0:  CD 7B 0B 2C 37 C8 7D C6 03 6F CB B8 C9 0E 01 18    .{.,7.}..o......
00D1E0:  02 0E 00 CD 3F 13 1A BE 20 08 23 13 10 F8 79 EE    ....?... .#...y.
00D1F0:  01 4F 21 40 00 39 F9 69 26 00 DD E9 0E 01 18 02    .O!@.9.i&.......
00D200:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
00D210:  0B 00 00 00 02 09 4E E5 0B 00 41 02 00 00 00 02    ......N...A.....
00D220:  0B 00 42 02 00 00 00 02 0B 00 43 02 00 00 00 02    ..B.......C.....
00D230:  0B 00 44 02 00 00 00 02 0B 00 45 02 00 00 00 02    ..D.......E.....
00D240:  0B 00 46 02 00 00 00 02 0B 00 47 02 00 00 00 02    ..F.......G.....
00D250:  0B 00 48 02 00 00 00 02 0B 00 49 02 00 00 00 02    ..H.......I.....
00D260:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D270:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D280:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D290:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D2A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D2B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D2C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D2D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D2E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D2F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D300:  0E 00 CD 3F 13 0D 20 01 EB 0E 00 1A B6 BE 20 E2    ...?.. ....... .
00D310:  23 13 10 F7 0E 01 18 DA CD 3F 13 1A B6 77 23 13    #........?...w#.
00D320:  10 F9 EB F9 DD E9 CD 3F 13 1A 2F A6 77 23 13 10    .......?../.w#..
00D330:  F8 18 EF CD 3F 13 1A A6 77 23 13 10 F9 18 E3 FD    ....?...w#......
00D340:  E1 DD E1 21 00 00 39 EB 21 20 00 45 39 FD E9 DD    ...!..9.! .E9...
00D350:  E1 21 21 00 39 7E B7 28 03 AF 18 06 2B 46 CD BA    .!!.9~.(....+F..
00D360:  05 A6 21 22 00 39 F9 21 00 00 28 01 23 DD E9 3E    ..!".9.!..(.#..>
00D370:  AF 32 E8 00 FD E1 2A D2 00 06 10 CD E2 05 AF 12    .2....*.........
00D380:  E1 22 E2 00 FD E5 7C B7 20 06 3E 22 32 D0 00 C9    ."....|. .>"2...
00D390:  3A E8 00 B7 28 0A CD B6 13 20 05 2A E2 00 77 C9    :...(.... .*..w.
00D3A0:  CD F2 03 2A E2 00 36 00 11 0C 00 19 EB 21 5C 00    ...*..6......!\.
00D3B0:  01 24 00 ED B0 C9 06 06 21 E6 13 C5 E5 06 03 ED    .$......!.......
00D3C0:  5B D2 00 13 1A FE 20 28 FA 1A CD A6 04 96 28 0A    [..... (......(.
00D3D0:  E1 C1 11 04 00 19 10 E3 B7 C9 23 13 10 EB C1 C1    ..........#.....
00D3E0:  1A FE 3A C0 7E C9 43 4F 4E C1 54 52 4D C1 4B 42    ..:.~.CON.TRM.KB
00D3F0:  44 82 4C 53 54 43 41 55 58 C4 55 53 52 C5 3E AF    D.LSTCAUX.USR.>.
00D400:  32 E8 00 CD 69 14 3A D0 00 B7 C0 2A E2 00 CB AE    2...i.:....*....
00D410:  7E E6 0F C0 CD 30 14 3A D0 00 B7 C0 2A E2 00 3A    ~....0.:....*..:
00D420:  E8 00 B7 01 80 80 28 03 01 40 00 71 23 23 70 C9    ......(..@.q##p.
00D430:  CD 5A 14 2A E2 00 11 0C 00 19 EB 3A E8 00 B7 01    .Z.*.......:....
00D440:  0F 01 28 0A D5 0E 13 CD 05 00 D1 01 16 F1 C5 CD    ..(.............
00D450:  05 00 C1 3C C0 78 32 D0 00 C9 2A E2 00 11 18 00    ...<.x2...*.....
00D460:  19 06 18 36 00 23 10 FB C9 22 E2 00 7E E6 0F C0    ...6.#..."..~...
00D470:  CB 76 28 0A 3E 1A CD C6 16 CD 0C 17 18 03 CB 7E    .v(.>..........~
00D480:  C8 2A E2 00 E5 11 0C 00 19 EB 0E 10 CD 05 00 E1    .*..............
00D490:  3C 20 05 3E FF 32 D0 00 36 00 C9 E3 22 E4 00 E3    < .>.2..6..."...
00D4A0:  E5 21 C2 00 22 E2 00 E1 C9 E3 22 E4 00 E3 22 E2    .!.."....."...".
00D4B0:  00 CB 7E C0 3E 02 32 D0 00 C9 E3 22 E4 00 E3 22    ..~.>.2...."..."
00D4C0:  E2 00 CB 76 C0 3E 03 32 D0 00 C9 3E AF E3 22 E4    ...v.>.2...>..".
00D4D0:  00 E3 E5 21 C2 00 22 E2 00 CB AE F5 CD E8 14 F1    ...!..".........
00D4E0:  B7 28 03 CD E1 01 E1 C9 06 00 21 D1 00 7E FE 7F    .(........!..~..
00D4F0:  38 02 3E 7E 4F 36 7E 2A D2 00 22 D4 00 16 00 CD    8.>~O6~*..".....
00D500:  E1 03 77 1E 01 FE 08 28 36 FE 7F 28 32 1D FE 18    ..w....(6..(2...
00D510:  28 2D FE 1B 28 29 FE 1A 28 36 FE 0D 28 38 FE 20    (-..()..(6..(8. 
00D520:  30 11 FE 03 20 D9 3A DD 00 B7 28 D3 DD 2A E4 00    0... .:...(..*..
00D530:  C3 16 20 79 BA 28 C8 7E 14 23 CD C9 03 18 C0 15    .. y.(.~.#......
00D540:  FA FD 14 2B CD 00 02 08 20 08 00 1D 28 B1 18 EF    ...+.... ...(...
00D550:  04 05 28 AB 18 04 04 05 20 04 36 1A 18 08 CD E1    ..(..... .6.....
00D560:  01 36 0D 23 36 0A 23 22 D6 00 C9 2A E2 00 3A D0    .6.#6.#"...*..:.
00D570:  00 B7 20 79 7E CB 6F 20 70 E6 0F 20 2E 23 23 7E    .. y~.o p.. .##~
00D580:  B7 F2 97 15 0E 14 E5 CD BA 19 E1 28 08 E5 11 2E    ...........(....
00D590:  00 19 36 1A E1 AF 77 34 C6 2E 5F 16 00 19 7E FE    ..6...w4.._...~.
00D5A0:  1A 20 3D 2A E2 00 23 23 35 18 35 3D 20 1B 2A D4    . =*..##5.5= .*.
00D5B0:  00 ED 5B D6 00 B7 ED 52 38 05 06 FF CD EA 14 2A    ..[....R8......*
00D5C0:  D4 00 7E 23 22 D4 00 18 17 3D 20 06 CD A3 00 7D    ..~#"....= ..£.}
00D5D0:  18 0E 3D 3D 20 06 CD AF 00 7D 18 04 CD B5 00 7D    ..== ....}.....}
00D5E0:  2A E2 00 CB EE 23 77 2B C9 23 7E 2B C9 3E 1A C9    *....#w+.#~+.>..
00D5F0:  E5 2A E2 00 7E E6 0F FE 06 28 27 CD 6B 15 FE 21    .*..~....('.k..!
00D600:  30 08 FE 1A 28 04 CB AE 18 F1 11 5D 00 06 1E C5    0...(......]....
00D610:  D5 CD 6B 15 D1 C1 FE 21 38 06 CB AE 12 13 10 EF    ..k....!8.......
00D620:  AF 12 E1 C9 DD 21 5D 00 DD 7E 00 B7 C8 06 00 FE    .....!]..~......
00D630:  2D C0 04 DD 23 C9 38 05 DD 7E 00 B7 C8 3E 10 32    -...#.8..~...>.2
00D640:  D0 00 37 C9 E5 CD 6B 15 CB AE E1 77 C9 3E AF 4F    ..7...k....w.>.O
00D650:  C5 CD F0 15 C1 CD 24 16 C8 C5 E5 CD F7 07 D1 C1    ......$.........
00D660:  CD 36 16 D8 05 CC 83 07 EB 73 0C 0D 20 02 23 72    .6.......s.. .#r
00D670:  EB C9 CD F0 15 CD 24 16 C8 C5 E5 CD A3 11 D9 E1    ......$.....£...
00D680:  C1 CD 36 16 D8 05 D9 CC 8F 0A D9 C3 D1 05 E5 EB    ..6.............
00D690:  0E 00 C5 D5 CD 6B 15 D1 C1 FE 0D 28 0B FE 1A 28    .....k.....(...(
00D6A0:  07 CB AE 0C 13 12 10 EA E1 71 C9 CD 6B 15 FE 1A    .........q..k...
00D6B0:  28 13 CB AE FE 0A 28 0D FE 0D 20 EF CD 6B 15 FE    (.....(... ..k..
00D6C0:  0A 20 02 CB AE C9 2A E2 00 4F 3A D0 00 B7 C0 7E    . ....*..O:....~
00D6D0:  E6 0F 20 10 23 23 E5 7E C6 2E 5F 16 00 19 71 E1    .. .##.~.._...q.
00D6E0:  34 F0 18 28 FE 06 28 15 E1 06 00 C5 E5 3D CA A6    4..(..(......=..
00D6F0:  00 3D 3D CA A9 00 3D CA AC 00 C3 B2 00 2A E8 00    .==...=......*..
00D700:  3A EA 00 BE C8 34 5E 16 00 19 71 C9 2A E2 00 23    :....4^...q.*..#
00D710:  23 7E B7 C8 36 00 0E 15 CD BA 19 C8 3E F0 32 D0    #~..6.......>.2.
00D720:  00 C9 7D C3 C6 16 C1 D1 C5 DD 2A D2 00 CB 7C 28    ..}.......*...|(
00D730:  06 CD 83 07 EB 18 0E EB CB 7C 28 09 CD 83 07 DD    .........|(.....
00D740:  36 00 2D DD 23 D5 CD C6 07 E1 CD C8 04 ED 5B D2    6.-.#.........[.
00D750:  00 DD E5 E1 B7 ED 52 4D EB 91 38 0E 28 0C 47 E5    ......RM..8.(.G.
00D760:  3E 20 C5 CD C6 16 C1 10 F7 E1 41 04 05 C8 7E C5    > ........A...~.
00D770:  E5 CD C6 16 E1 C1 23 18 F3 C1 D1 D9 E1 D1 C1 D9    ......#.........
00D780:  C5 DD 2A D2 00 D5 CD 27 10 18 BE C1 D1 C5 CD C8    ..*....'........
00D790:  04 CB 43 21 A1 17 0E 04 20 BF 21 A5 17 0E 05 18    ..C!.... .!.....
00D7A0:  B8 54 52 55 45 46 41 4C 53 45 CD C8 04 21 02 00    .TRUEFALSE...!..
00D7B0:  39 4E 23 CD 59 17 D1 F9 D5 C9 E1 7E 23 B7 28 0C    9N#.Y......~#.(.
00D7C0:  47 7E C5 E5 CD C6 16 E1 C1 23 10 F5 E9 3E 0D CD    G~.......#...>..
00D7D0:  C6 16 3E 0A C3 C6 16 11 0D 01 18 0D 11 0D 00 18    ..>.............
00D7E0:  08 11 1A 01 18 03 11 1A 00 22 E2 00 CB 7E 28 1C    ........."...~(.
00D7F0:  D5 CD 6B 15 D1 BB 28 10 FE 1A 28 0C FE 21 30 0C    ..k...(...(..!0.
00D800:  14 15 28 08 CB AE 18 E8 21 01 00 C9 21 00 00 C9    ..(.....!...!...
00D810:  3E AF 32 E8 00 ED 53 E6 00 CD 7A 18 3A D0 00 B7    >.2...S...z.:...
00D820:  C0 CD 30 14 3A D0 00 B7 C0 2A E2 00 36 D0 23 23    ..0.:....*..6.##
00D830:  77 11 06 00 19 77 23 77 11 24 00 19 77 23 77 11    w....w#w.$..w#w.
00D840:  D6 FF 19 3A E8 00 B7 20 1B E5 01 04 00 AF CD 09    ...:... ........
00D850:  19 E1 23 23 4E 23 46 2A E6 00 B7 ED 42 C8 3E 90    ..##N#F*....B.>.
00D860:  32 D0 00 C9 E5 AF 77 23 77 23 ED 5B E6 00 73 23    2.....w#w#.[..s#
00D870:  72 E1 01 04 00 3E 03 C3 09 19 22 E2 00 7E E6 C0    r....>...."..~..
00D880:  C8 CD AE 19 2A E2 00 11 2D 00 19 AF 77 23 77 11    ....*...-...w#w.
00D890:  D4 FF 19 77 23 23 01 04 00 3E 01 CD 09 19 CD AE    ...w##...>......
00D8A0:  19 C3 81 14 E3 22 E4 00 E3 22 E2 00 7E E6 C0 C0    ....."..."..~...
00D8B0:  3E 04 32 D0 00 C9 3A D0 00 B7 C0 E5 CD 5A 1A EB    >.2...:......Z..
00D8C0:  B7 ED 52 E1 30 10 AF CD 09 19 2A E2 00 11 08 00    ..R.0.....*.....
00D8D0:  19 34 C0 23 34 C9 3E 99 32 D0 00 C9 3A D0 00 B7    .4.#4.>.2...:...
00D8E0:  C0 E5 CD 5A 1A B7 ED 52 3E 01 20 10 2A E2 00 11    ...Z...R>. .*...
00D8F0:  04 00 19 34 20 04 23 34 28 08 3E 03 E1 CD 09 19    ...4 .#4(.>.....
00D900:  18 C8 E1 3E F2 32 D0 00 C9 32 E9 00 EB 2A E2 00    ...>.2...2...*..
00D910:  CB 66 28 2F CB A6 3A E9 00 CB 47 28 18 23 23 7E    .f(/..:...G(.##~
00D920:  2B 2B B7 20 10 3A E9 00 CB 4F 20 17 78 B7 20 13    ++. .:...O .x. .
00D930:  79 B7 FA 43 19 C5 D5 0E 21 CD BA 19 D1 C1 20 51    y..C....!..... Q
00D940:  2A E2 00 3A E9 00 CB 47 28 02 CB EE 23 23 7E C6    *..:...G(...##~.
00D950:  2E D5 5F 16 00 19 D1 D6 2E CD 9A 19 ED A0 E2 66    .._............f
00D960:  19 3C F2 5C 19 3D 3C CD 9A 19 2A E2 00 23 23 E6    .<.\.=<...*..##.
00D970:  7F 77 20 16 C5 D5 E5 CD AE 19 E1 D1 C1 20 15 D5    .w .......... ..
00D980:  11 2B 00 19 D1 34 20 02 23 34 78 B1 C2 0D 19 EB    .+...4 .#4x.....
00D990:  C9 3E 99 01 3E F0 32 D0 00 C9 F5 3A E9 00 CB 47    .>..>.2....:...G
00D9A0:  28 01 EB F1 C9 22 E2 00 CD AE 19 C8 18 E6 0E 22    (...."........."
00D9B0:  2A E2 00 CB E6 CB 6E C8 CB AE 2A E2 00 E5 C5 11    *.....n...*.....
00D9C0:  30 00 19 EB 0E 1A CD 05 00 C1 E1 11 0C 00 19 EB    0...............
00D9D0:  CD 05 00 B7 C9 C1 D1 ED 53 E2 00 C5 E5 CD 5A 1A    ........S.....Z.
00D9E0:  D1 B7 ED 52 38 40 2A E2 00 01 06 00 09 4E 23 46    ...R8@*......N#F
00D9F0:  23 73 23 72 CD 2C 1A 01 04 00 09 30 01 13 7D E6    #s#r.,.....0..}.
00DA00:  7F 29 EB ED 6A EB 53 5C 2A E2 00 23 23 77 01 2B    .)..j.S\*..##w.+
00DA10:  00 09 4E 23 46 EB B7 ED 42 09 C8 D5 E5 CD AE 19    ..N#F...B.......
00DA20:  D1 E1 72 2B 73 C9 3E 91 32 D0 00 C9 D5 D9 E1 D9    ..r+s.>.2.......
00DA30:  21 00 00 54 5D 3E 10 29 EB ED 6A EB D9 29 D9 30    !..T]>.)..j..).0
00DA40:  04 09 30 01 13 3D 20 EF C9 CD 5D 1A B7 ED 52 21    ..0..= ...]...R!
00DA50:  00 00 C0 23 C9 CD 5D 1A EB C9 2A E2 00 11 04 00    ...#..]...*.....
00DA60:  19 5E 23 56 23 D5 4E 23 46 23 5E 23 56 E1 C9 3E    .^#V#.N#F#^#V..>
00DA70:  AF 32 E8 00 CD B0 1A 3A D0 00 B7 C0 CD 30 14 3A    .2.....:.....0.:
00DA80:  D0 00 B7 C0 2A E2 00 36 C0 E5 11 0C 00 19 EB 0E    ....*..6........
00DA90:  23 CD 05 00 E1 11 2D 00 19 AF 4E 77 23 46 77 11    #.....-...Nw#Fw.
00DAA0:  D6 FF 19 71 23 70 23 36 80 23 77 23 77 23 77 C9    ...q#p#6.#w#w#w.
00DAB0:  22 E2 00 7E E6 C0 C8 C3 81 14 3E 22 18 02 3E 21    "..~......>"..>!
00DAC0:  44 4D 21 F0 00 22 E6 00 DD E1 D1 E1 DD E5 C5 CD    DM!.."..........
00DAD0:  FD 1A C1 3A D0 00 B7 C0 2A F0 00 ED 42 C8 3A E9    ...:....*...B.:.
00DAE0:  00 FE 21 3E 99 28 02 3E F0 32 D0 00 C9 3E 22 18    ..!>.(.>.2...>".
00DAF0:  02 3E 21 22 E6 00 DD E1 C1 D1 E1 DD E5 32 E9 00    .>!".........2..
00DB00:  22 E2 00 7E E6 C0 CA B0 18 2A E6 00 AF 77 23 77    "..~.....*...w#w
00DB10:  78 B1 28 39 C5 D5 0E 1A CD 05 00 2A E2 00 11 0C    x.(9.......*....
00DB20:  00 19 EB 3A E9 00 4F CD 05 00 D1 C1 B7 20 1E D5    ...:..O...... ..
00DB30:  2A E2 00 11 2D 00 19 34 20 02 23 34 D1 21 80 00    *...-..4 .#4.!..
00DB40:  19 EB 2A E6 00 34 20 02 23 34 0B 18 C3 2A E2 00    ..*..4 .#4...*..
00DB50:  11 2D 00 19 4E 23 46 11 DA FF 19 71 23 70 11 FC    .-..N#F....q#p..
00DB60:  FF 19 56 2B 5E EB B7 ED 42 D0 EB 71 23 70 C9 C1    ..V+^...B..q#p..
00DB70:  D1 ED 53 E2 00 C5 E5 CD 5A 1A D1 B7 ED 52 DA 26    ..S.....Z....R.&
00DB80:  1A 2A E2 00 01 08 00 09 73 23 72 01 24 00 09 73    .*......s#r.$..s
00DB90:  23 72 C9 CD 4C 1C C0 11 0C 00 19 EB 0E 13 CD 05    #r..L...........
00DBA0:  00 3C C0 18 3F FD E1 2A D2 00 06 10 CD E2 05 AF    .<..?..*........
00DBB0:  12 E1 FD E5 CD 4C 1C C0 E5 CD F2 03 E1 E5 11 1C    .....L..........
00DBC0:  00 19 EB 21 5C 00 01 0C 00 ED B0 E1 11 0C 00 19    ...!\...........
00DBD0:  E5 EB 0E 17 CD 05 00 D1 3C 28 09 21 5C 00 01 24    ........<(.!\..$
00DBE0:  00 ED B0 C9 3E 01 32 D0 00 C9 3E AF 32 E8 00 CD    ....>.2...>.2...
00DBF0:  4C 1C C0 3A D8 00 B7 3E 21 28 EB 2A E2 00 11 0C    L..:...>!(.*....
00DC00:  00 19 11 5C 00 01 24 00 ED B0 11 5C 00 0E 0F CD    ...\..$....\....
00DC10:  05 00 3C 28 CF 21 33 1C 11 B0 00 01 19 00 ED B0    ..<(.!3.........
00DC20:  11 00 01 3A E8 00 B7 20 04 ED 5B 01 01 31 00 01    ...:... ..[..1..
00DC30:  C3 B0 00 D5 0E 1A CD 05 00 11 5C 00 0E 14 CD 05    ..........\.....
00DC40:  00 D1 21 80 00 19 EB B7 28 E9 18 37 22 E2 00 7E    ..!.....(..7"..~
00DC50:  E6 0F C8 3E 20 32 D0 00 C9 22 E6 00 ED 53 E8 00    ...> 2..."...S..
00DC60:  EB E1 22 E2 00 4E 73 23 46 72 EB B7 ED 42 28 5A    .."..Ns#Fr...B(Z
00DC70:  EB 23 11 5C 00 3A DC 00 12 13 01 0B 00 ED B0 06    .#.\.:..........
00DC80:  18 AF 12 13 10 FC E5 11 5C 00 0E 0F CD 05 00 D1    ........\.......
00DC90:  3C 28 3F 2A E6 00 22 7D 00 ED 4B E8 00 C5 D5 0E    <(?*.."}..K.....
00DCA0:  1A CD 05 00 11 5C 00 0E 21 CD 05 00 D1 C1 B7 20    .....\..!...... 
00DCB0:  21 2A 7D 00 23 22 7D 00 21 80 00 19 EB 0B 78 B1    !*}.#"}.!.....x.
00DCC0:  20 DB 11 5C 00 0E 10 CD 05 00 2A E2 00 11 0D 00     ..\......*.....
00DCD0:  19 E9 DD 2A E2 00 3E F0 C3 29 20 CD C8 04 FE 11    ...*..>..) .....
00DCE0:  D0 32 DC 00 C9 22 F0 00 EB E1 E3 22 F2 00 13 13    .2..."....."....
00DCF0:  13 7B E6 FC 5F 21 DE 00 22 F8 00 DD 2A DE 00 DD    .{.._!.."...*...
00DD00:  6E 02 DD 66 03 7D B4 28 48 ED 52 30 0F DD 6E 00    n..f.}.(H.R0..n.
00DD10:  DD 66 01 E5 DD 22 F8 00 DD E1 18 E3 20 0A DD 5E    .f..."...... ..^
00DD20:  00 DD 56 01 DD E5 18 1B 4D 44 DD 6E 00 DD 66 01    ..V.....MD.n..f.
00DD30:  DD E5 DD 19 DD 75 00 DD 74 01 DD 71 02 DD 70 03    .....u..t..q..p.
00DD40:  DD E5 D1 2A F8 00 73 23 72 D1 2A F2 00 73 23 72    ...*..s#r.*..s#r
00DD50:  C9 DD E5 E1 19 22 C4 00 2A F0 00 01 04 00 09 DD    ....."..*.......
00DD60:  E5 C1 09 DA 75 1D ED 4B C6 00 ED 42 01 00 00 21    ....u..K...B...!
00DD70:  00 00 DA 30 1D 3E FF C3 27 20 EB E1 E3 7E 23 66    ...0.>..' ...~#f
00DD80:  6F 13 13 13 7B E6 FC 5F EB 22 F0 00 2A DE 00 E5    o...{.._."..*...
00DD90:  DD E1 B7 ED 52 30 52 DD 6E 00 DD 66 01 E5 B7 ED    ....R0R.n..f....
00DDA0:  52 30 04 DD E1 18 F0 E1 D5 FD E1 ED 4B F0 00 FD    R0..........K...
00DDB0:  71 02 FD 70 03 FD 75 00 FD 74 01 DD 73 00 DD 72    q..p..u..t..s..r
00DDC0:  01 DD E5 E1 DD 4E 02 DD 46 03 CD 04 1E 28 09 DD    .....N..F....(..
00DDD0:  5E 00 DD 56 01 D5 DD E1 DD E5 E1 DD 4E 02 DD 46    ^..V........N..F
00DDE0:  03 DD 5E 00 DD 56 01 18 1B 2A DE 00 ED 53 DE 00    ..^..V...*...S..
00DDF0:  D5 DD E1 DD 75 00 DD 74 01 ED 4B F0 00 DD 71 02    ....u..t..K...q.
00DE00:  DD 70 03 EB 09 B7 ED 52 C0 D5 FD E1 2A C4 00 B7    .p.....R....*...
00DE10:  ED 52 28 1B FD 7E 00 DD 77 00 FD 7E 01 DD 77 01    .R(..~..w..~..w.
00DE20:  FD 6E 02 FD 66 03 09 DD 75 02 DD 74 03 AF C9 DD    .n..f...u..t....
00DE30:  E5 E1 22 C4 00 06 04 36 00 23 10 FB C9 CD 4B 1E    .."....6.#....K.
00DE40:  2A F4 00 C9 CD 4B 1E 2A F6 00 C9 21 00 00 22 F4    *....K.*...!..".
00DE50:  00 22 F6 00 DD 2A DE 00 DD 4E 02 DD 46 03 79 B0    ."...*...N..F.y.
00DE60:  28 1E 2A F4 00 09 22 F4 00 2A F6 00 B7 ED 42 30    (.*..."..*....B0
00DE70:  04 ED 43 F6 00 DD 6E 00 DD 66 01 E5 DD E1 18 D8    ..C...n..f......
00DE80:  2A C6 00 01 FB FF 09 ED 5B C4 00 B7 ED 52 D8 EB    *.......[....R..
00DE90:  2A F4 00 19 22 F4 00 2A F6 00 B7 ED 52 D0 ED 53    *..."..*....R..S
00DEA0:  F6 00 C9 ED 5B C4 00 73 23 72 C9 5E 23 56 EB 22    ....[..s#r.^#V."
00DEB0:  C4 00 22 DE 00 06 04 36 00 23 10 FB C9 3E AF 4F    .."....6.#...>.O
00DEC0:  22 E8 00 AF 77 32 D0 00 78 32 EA 00 2A E2 00 22    "...w2..x2..*.."
00DED0:  ED 00 21 46 1F 22 E2 00 E1 22 E4 00 E1 0C 0D 20    ..!F."..."..... 
00DEE0:  05 CD 26 17 18 03 CD 79 17 2A ED 00 22 E2 00 2A    ..&....y.*.."..*
00DEF0:  E4 00 E9 3E AF 32 EC 00 22 E8 00 2A E2 00 22 ED    ...>.2.."..*..".
00DF00:  00 21 46 1F 22 E2 00 E1 22 E4 00 E1 22 EA 00 21    .!F."..."..."..!
00DF10:  5C 00 06 1E CD E2 05 AF 12 2A EA 00 3A EC 00 B7    \........*..:...
00DF20:  20 05 CD 4E 16 18 03 CD 72 16 21 D0 00 7E 36 00     ..N....r.!..~6.
00DF30:  B7 67 6F 28 08 DD E5 E1 11 5C 00 ED 52 EB 2A E8    .go(.....\..R.*.
00DF40:  00 73 23 72 18 A3 C6 00 ED 5F 32 CB 00 C9 EB DD    .s#r.£..._2.....
00DF50:  E1 C1 E1 78 B1 28 0B 73 0B 78 B1 28 05 54 5D 13    ...x.(.s.x.(.T].
00DF60:  ED B0 DD E9 44 4D DD E1 D1 E1 78 B1 28 F4 ED 52    ....DM....x.(..R
00DF70:  19 30 ED 0B 09 EB 09 EB 03 ED B8 DD E9 55 14 15    .0...........U..
00DF80:  28 03 CD 9D 1F DD E1 4F 06 00 2F 6F 26 FF 39 F9    (......O../o&.9.
00DF90:  71 23 EB 0C 0D 28 02 ED B0 DD E9 16 00 21 80 00    q#...(.......!..
00DFA0:  3E 1F 46 B8 30 02 06 1F 23 0E 00 04 05 28 0D 7E    >.F.0...#....(.~
00DFB0:  FE 20 28 04 FE 09 20 04 23 05 18 EF 5D 04 05 28    . (... .#...]..(
00DFC0:  0D 7E FE 20 28 08 FE 09 28 04 23 05 18 EF 7D 93    .~. (...(.#...}.
00DFD0:  28 04 0C 15 20 D5 69 26 00 54 C9 D1 C1 D5 2D 61    (... .i&.T....-a
00DFE0:  25 C3 A2 02 7D CD A6 04 6F C9 2A 01 00 19 19 19    %...}...o.*.....
00DFF0:  E9 21 D0 00 7E 36 00 6F 26 00 C9 CD 16 03 7C B5    .!..~6.o&.....|.
00E000:  C8 3A DD 00 F5 AF 32 DD 00 CD 20 03 F1 32 DD 00    .:....2... ..2..
00E010:  7D FE 03 C0 DD E1 11 01 00 18 11 3A D0 00 B7 C8    }..........:....
00E020:  DD E1 5F 16 01 18 05 DD E1 5F 16 02 D5 CD 7A 03    .._......_....z.
00E030:  D1 AF 32 DD 00 2A CE 00 7C B5 DD E5 E1 ED 4B CC    ..2..*..|.....K.
00E040:  00 ED 42 01 15 00 09 22 CE 00 B7 20 07 D5 D5 E5    ..B...."... ....
00E050:  CD D9 00 D1 7A B7 20 14 CD 00 02 5E 43 0D 0A 55    ....z. ....^C..U
00E060:  73 65 72 20 62 72 65 61 6B 00 18 2B 3D 20 0B CD    ser break..+= ..
00E070:  00 02 0D 0A 49 2F 4F 00 18 0E CD 00 02 0D 0A 52    ....I/O........R
00E080:  75 6E 2D 74 69 6D 65 00 CD 00 02 20 65 72 72 6F    un-time.... erro
00E090:  72 20 00 7B CD B4 04 CD 00 02 2C 20 50 43 3D 00    r .{......, PC=.
00E0A0:  2A CE 00 CD AF 04 18 15 CD 00 02 4E 6F 74 20 65    *..........Not e
00E0B0:  6E 6F 75 67 68 20 6D 65 6D 6F 72 79 00 CD 00 02    nough memory....
00E0C0:  0D 0A 50 72 6F 67 72 61 6D 20 61 62 6F 72 74 65    ..Program aborte
00E0D0:  64 0D 0A 00 3A D8 00 B7 CA 8E 27 C3 00 00 E1 D1    d...:.....'.....
00E0E0:  D1 E9 31 00 01 21 C2 F2 01 00 FF CD 64 03 21 16    ..1..!......d.!.
00E0F0:  A1 11 BE EC 01 42 F3 3E 01 CD D4 04 C3 CB A0 00    .....B.>........
00E100:  20 20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C           if f^.val
00E110:  65 75 72 3D 27 63 6F 73 27 20 74 68 65 6E 20 63    eur='cos' then c
00E120:  61 6C 63 75 6C 3A 3D 63 6F 73 28 6E 62 72 65 29    alcul:=cos(nbre)
00E130:  20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20     else..         
00E140:  20 20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C           if f^.val
00E150:  65 75 72 3D 27 73 69 6E 27 20 74 68 65 6E 20 63    eur='sin' then c
00E160:  61 6C 63 75 6C 3A 3D 73 69 6E 28 6E 62 72 65 29    alcul:=sin(nbre)
00E170:  20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20     else..         
00E180:  20 20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C           if f^.val
00E190:  65 75 72 3D 27 74 61 6E 67 27 20 74 68 65 6E 20    eur='tang' then 
00E1A0:  62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20    begin..         
00E1B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E1C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69                   i
00E1D0:  66 20 63 6F 73 28 6E 62 72 65 29 3D 30 20 74 68    f cos(nbre)=0 th
00E1E0:  65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20    en begin..      
00E1F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E200:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E210:  20 20 20 20 20 64 65 66 69 6E 69 3A 3D 66 61 6C         defini:=fal
00E220:  73 65 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    se;..           
00E230:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E240:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E250:  67 6F 74 6F 20 66 69 6E 63 61 6C 63 75 6C 3B 0D    goto fincalcul;.
00E260:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
00E270:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E280:  20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 20                end 
00E290:  65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20    else..          
00E2A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E2B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63                   c
00E2C0:  61 6C 63 75 6C 3A 3D 73 69 6E 28 6E 62 72 65 29    alcul:=sin(nbre)
00E2D0:  2F 63 6F 73 28 6E 62 72 65 29 0D 0A 20 20 20 20    /cos(nbre)..    
00E2E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E2F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E300:  20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20          end..     
00E310:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E320:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E330:  20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20         else..     
00E340:  20 20 20 20 20 20 20 20 20 20 20 69 66 20 66 5E               if f^
00E350:  2E 76 61 6C 65 75 72 3D 27 69 6E 74 27 20 74 68    .valeur='int' th
00E360:  65 6E 20 63 61 6C 63 75 6C 3A 3D 69 6E 74 28 6E    en calcul:=int(n
00E370:  62 72 65 29 20 65 6C 73 65 0D 0A 20 20 20 20 20    bre) else..     
00E380:  20 20 20 20 20 20 20 20 20 20 20 69 66 20 66 5E               if f^
00E390:  2E 76 61 6C 65 75 72 3D 27 61 62 73 27 20 74 68    .valeur='abs' th
00E3A0:  65 6E 20 63 61 6C 63 75 6C 3A 3D 61 62 73 28 6E    en calcul:=abs(n
00E3B0:  62 72 65 29 20 65 6C 73 65 0D 0A 20 20 20 20 20    bre) else..     
00E3C0:  20 20 20 20 20 20 20 20 20 20 20 69 66 20 66 5E               if f^
00E3D0:  2E 76 61 6C 65 75 72 3D 27 61 72 63 74 61 6E 27    .valeur='arctan'
00E3E0:  20 74 68 65 6E 20 63 61 6C 63 75 6C 3A 3D 61 72     then calcul:=ar
00E3F0:  63 74 61 6E 28 6E 62 72 65 29 20 65 6C 73 65 0D    ctan(nbre) else.
00E400:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
00E410:  20 69 66 20 66 5E 2E 76 61 6C 65 75 72 3D 27 65     if f^.valeur='e
00E420:  78 70 27 20 74 68 65 6E 20 63 61 6C 63 75 6C 3A    xp' then calcul:
00E430:  3D 65 78 70 28 6E 62 72 65 29 20 65 6C 73 65 0D    =exp(nbre) else.
00E440:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
00E450:  20 69 66 20 66 5E 2E 76 61 6C 65 75 72 3D 27 6C     if f^.valeur='l
00E460:  6E 27 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20    n' then..       
00E470:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E480:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E490:  20 20 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D              begin.
00E4A0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
00E4B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E4C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E4D0:  20 20 69 66 20 6E 62 72 65 3C 3D 30 20 74 68 65      if nbre<=0 the
00E4E0:  6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    n..             
00E4F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E500:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
00E510:  0C 00 00 00 02 09 4E E5 0C 00 41 02 00 00 00 02    ......N...A.....
00E520:  0C 00 42 02 00 00 00 02 0C 00 43 02 00 00 00 02    ..B.......C.....
00E530:  0C 00 44 02 00 00 00 02 0C 00 45 02 00 00 00 02    ..D.......E.....
00E540:  0C 00 46 02 00 00 00 02 0C 00 47 02 00 00 00 02    ..F.......G.....
00E550:  0C 00 48 02 00 00 00 02 0C 00 49 02 00 00 00 02    ..H.......I.....
00E560:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E570:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E580:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E590:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E5A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E5B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E5C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E5D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E5E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E5F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E600:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E610:  20 20 20 20 20 20 20 20 20 20 20 20 20 62 65 67                 beg
00E620:  69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    in..            
00E630:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E640:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E650:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 65                  de
00E660:  66 69 6E 69 3A 3D 66 61 6C 73 65 3B 0D 0A 20 20    fini:=false;..  
00E670:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E680:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E690:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E6A0:  20 20 20 20 20 20 20 20 67 6F 74 6F 20 66 69 6E            goto fin
00E6B0:  63 61 6C 63 75 6C 3B 0D 0A 20 20 20 20 20 20 20    calcul;..       
00E6C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E6D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E6E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E6F0:  20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20       end..        
00E700:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E710:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E720:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E730:  20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20       else..       
00E740:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E750:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E760:  20 20 20 20 20 20 20 20 20 20 63 61 6C 63 75 6C              calcul
00E770:  3A 3D 6C 6E 28 6E 62 72 65 29 0D 0A 20 20 20 20    :=ln(nbre)..    
00E780:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E790:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E7A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64                 end
00E7B0:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
00E7C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E7D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E7E0:  20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20        else..      
00E7F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E800:  20 20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C           if f^.val
00E810:  65 75 72 3D 27 73 71 72 74 27 20 74 68 65 6E 0D    eur='sqrt' then.
00E820:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
00E830:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E840:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E850:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20      begin..       
00E860:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E870:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E880:  20 20 20 20 20 20 20 20 20 20 69 66 20 6E 62 72              if nbr
00E890:  65 3C 30 20 74 68 65 6E 0D 0A 20 20 20 20 20 20    e<0 then..      
00E8A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E8B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E8C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E8D0:  20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20        begin..     
00E8E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E8F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E900:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E910:  20 20 20 20 20 64 65 66 69 6E 69 3A 3D 66 61 6C         defini:=fal
00E920:  73 65 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    se;..           
00E930:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E940:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E950:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 67                   g
00E960:  6F 74 6F 20 66 69 6E 63 61 6C 63 75 6C 3B 0D 0A    oto fincalcul;..
00E970:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E980:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E990:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E9A0:  20 20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20              end.. 
00E9B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E9C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E9D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00E9E0:  20 20 20 20 20 20 20 20 20 20 20 65 6C 73 65 0D               else.
00E9F0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
00EA00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00EA10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00EA20:  20 20 63 61 6C 63 75 6C 3A 3D 73 71 72 74 28 6E      calcul:=sqrt(n
00EA30:  62 72 65 29 0D 0A 20 20 20 20 20 20 20 20 20 20    bre)..          
00EA40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00EA50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00EA60:  20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20           end..    
00EA70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00EA80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00EA90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C                  el
00EAA0:  73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    se..            
00EAB0:  20 20 69 66 20 66 5E 2E 76 61 6C 65 75 72 3D 27      if f^.valeur='
00EAC0:  73 68 27 20 74 68 65 6E 20 63 61 6C 63 75 6C 3A    sh' then calcul:
00EAD0:  3D 30 2E 35 2A 28 65 78 70 28 6E 62 72 65 29 2D    =0.5*(exp(nbre)-
00EAE0:  65 78 70 28 6E 62 72 65 2A 2D 31 29 29 0D 0A 20    exp(nbre*-1)).. 
00EAF0:  20 20 20 20 20 20 65 6C 73 65 20 20 20 69 66 20          else   if 
00EB00:  66 5E 2E 76 61 6C 65 75 72 3D 27 63 68 27 20 74    f^.valeur='ch' t
00EB10:  68 65 6E 20 63 61 6C 63 75 6C 3A 3D 30 2E 35 2A    hen calcul:=0.5*
00EB20:  28 65 78 70 28 6E 62 72 65 29 2B 65 78 70 28 6E    (exp(nbre)+exp(n
00EB30:  62 72 65 2A 2D 31 29 29 0D 0A 20 20 20 20 20 20    bre*-1))..      
00EB40:  20 65 6C 73 65 20 20 20 69 66 20 66 5E 2E 76 61     else   if f^.va
00EB50:  6C 65 75 72 3D 27 74 68 27 20 74 68 65 6E 0D 0A    leur='th' then..
00EB60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00EB70:  63 61 6C 63 75 6C 3A 3D 28 65 78 70 28 6E 62 72    calcul:=(exp(nbr
00EB80:  65 29 2D 65 78 70 28 6E 62 72 65 2A 2D 31 29 29    e)-exp(nbre*-1))
00EB90:  2F 28 65 78 70 28 6E 62 72 65 29 2B 65 78 70 28    /(exp(nbre)+exp(
00EBA0:  6E 62 72 65 2A 2D 31 29 29 0D 0A 20 20 20 20 20    nbre*-1))..     
00EBB0:  20 20 65 6C 73 65 20 20 20 69 66 20 66 5E 2E 76      else   if f^.v
00EBC0:  61 6C 65 75 72 3D 27 61 72 63 73 69 6E 27 20 74    aleur='arcsin' t
00EBD0:  68 65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20    hen begin..     
00EBE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00EBF0:  20 20 20 20 20 20 20 20 69 66 20 6E 62 72 65 3D            if nbre=
00EC00:  2D 31 20 74 68 65 6E 20 63 61 6C 63 75 6C 3A 3D    -1 then calcul:=
00EC10:  2D 30 2E 35 2A 70 69 20 65 6C 73 65 0D 0A 20 20    -0.5*pi else..  
00EC20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00EC30:  20 20 20 20 20 20 20 20 20 20 20 69 66 20 6E 62               if nb
00EC40:  72 65 3D 31 20 74 68 65 6E 20 63 61 6C 63 75 6C    re=1 then calcul
00EC50:  3A 3D 30 2E 35 2A 70 69 20 65 6C 73 65 0D 0A 20    :=0.5*pi else.. 
00EC60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00EC70:  20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 28                if (
00EC80:  28 6E 62 72 65 3C 2D 31 29 6F 72 28 6E 62 72 65    (nbre<-1)or(nbre
00EC90:  3E 31 29 29 20 74 68 65 6E 0D 0A 20 20 20 20 20    >1)) then..     
00ECA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00ECB0:  20 20 20 20 20 20 20 20 62 65 67 69 6E 20 64 65            begin de
00ECC0:  66 69 6E 69 3A 3D 66 61 6C 73 65 3B 67 6F 74 6F    fini:=false;goto
00ECD0:  20 66 69 6E 63 61 6C 63 75 6C 3B 0D 0A 20 20 20     fincalcul;..   
00ECE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00ECF0:  20 20 20 20 20 20 20 20 20 20 65 6E 64 20 20 65              end  e
00ED00:  6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20    lse..           
00ED10:  20 63 61 6C 63 75 6C 3A 3D 61 72 63 74 61 6E 28     calcul:=arctan(
00ED20:  6E 62 72 65 2F 73 71 72 74 28 31 2D 6E 62 72 65    nbre/sqrt(1-nbre
00ED30:  2A 6E 62 72 65 29 29 3B 0D 0A 20 20 20 20 20 20    *nbre));..      
00ED40:  20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20          end..     
00ED50:  20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20      else..        
00ED60:  20 20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C           if f^.val
00ED70:  65 75 72 3D 27 61 72 63 63 6F 73 27 20 74 68 65    eur='arccos' the
00ED80:  6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20    n begin..       
00ED90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00EDA0:  20 20 20 20 20 20 69 66 20 6E 62 72 65 3D 2D 31          if nbre=-1
00EDB0:  20 74 68 65 6E 20 63 61 6C 63 75 6C 3A 3D 70 69     then calcul:=pi
00EDC0:  20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20     else..         
00EDD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00EDE0:  20 20 20 20 69 66 20 6E 62 72 65 3D 31 20 74 68        if nbre=1 th
00EDF0:  65 6E 20 63 61 6C 63 75 6C 3A 3D 30 20 65 6C 73    en calcul:=0 els
00EE00:  65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    e..             
00EE10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00EE20:  69 66 20 28 28 6E 62 72 65 3C 2D 31 29 6F 72 28    if ((nbre<-1)or(
00EE30:  6E 62 72 65 3E 31 29 29 20 74 68 65 6E 0D 0A 20    nbre>1)) then.. 
00EE40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00EE50:  20 20 20 20 20 20 20 20 20 20 20 20 62 65 67 69                begi
00EE60:  6E 20 64 65 66 69 6E 69 3A 3D 66 61 6C 73 65 3B    n defini:=false;
00EE70:  67 6F 74 6F 20 66 69 6E 63 61 6C 63 75 6C 3B 0D    goto fincalcul;.
00EE80:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
00EE90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6E                  en
00EEA0:  64 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20    d  else..       
00EEB0:  20 20 20 20 20 63 61 6C 63 75 6C 3A 3D 28 70 69         calcul:=(pi
00EEC0:  2F 32 29 2D 61 72 63 74 61 6E 28 6E 62 72 65 2F    /2)-arctan(nbre/
00EED0:  73 71 72 74 28 31 2D 6E 62 72 65 2A 6E 62 72 65    sqrt(1-nbre*nbre
00EEE0:  29 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    ));..           
00EEF0:  20 65 6E 64 0D 0A 20 20 20 20 20 20 20 65 6C 73     end..       els
00EF00:  65 0D 0A 20 20 65 72 72 65 75 72 28 31 30 29 0D    e..  erreur(10).
00EF10:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
00EF20:  20 20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64                 end
00EF30:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
00EF40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C                  el
00EF50:  73 65 0D 0A 20 20 69 66 20 66 3D 6E 69 6C 20 74    se..  if f=nil t
00EF60:  68 65 6E 20 63 61 6C 63 75 6C 3A 3D 30 3B 0D 0A    hen calcul:=0;..
00EF70:  20 20 66 69 6E 63 61 6C 63 75 6C 3A 3B 0D 0A 65      fincalcul:;..e
00EF80:  6E 64 3B 0D 0A 0D 0A 66 75 6E 63 74 69 6F 6E 20    nd;....function 
00EF90:  20 74 61 70 65 66 6F 6E 63 74 69 6F 6E 3B 0D 0A     tapefonction;..
00EFA0:  76 61 72 0D 0A 77 77 77 2C 77 77 78 3A 73 74 72    var..www,wwx:str
00EFB0:  32 30 30 3B 0D 0A 63 6F 65 66 66 3A 72 65 61 6C    200;..coeff:real
00EFC0:  3B 72 65 73 75 6C 74 61 74 3A 69 6E 74 65 67 65    ;resultat:intege
00EFD0:  72 3B 0D 0A 66 6F 72 6D 61 74 3A 73 74 72 31 30    r;..format:str10
00EFE0:  3B 0D 0A 62 65 67 69 6E 0D 0A 69 66 20 66 5E 2E    ;..begin..if f^.
00EFF0:  6E 61 74 75 72 65 3D 27 69 64 66 63 74 27 20 74    nature='idfct' t
00F000:  68 65 6E 0D 0A 74 61 70 65 66 6F 6E 63 74 69 6F    hen..tapefonctio
00F010:  6E 3A 3D 66 5E 2E 76 61 6C 65 75 72 2B 27 28 27    n:=f^.valeur+'('
00F020:  2B 74 61 70 65 66 6F 6E 63 74 69 6F 6E 28 66 5E    +tapefonction(f^
00F030:  2E 64 2C 76 29 2B 27 29 27 20 65 6C 73 65 0D 0A    .d,v)+')' else..
00F040:  69 66 20 66 5E 2E 6E 61 74 75 72 65 3D 27 6E 6F    if f^.nature='no
00F050:  6D 62 72 65 27 20 74 68 65 6E 20 20 74 61 70 65    mbre' then  tape
00F060:  66 6F 6E 63 74 69 6F 6E 3A 3D 66 5E 2E 76 61 6C    fonction:=f^.val
00F070:  65 75 72 20 65 6C 73 65 0D 0A 69 66 20 66 5E 2E    eur else..if f^.
00F080:  6E 61 74 75 72 65 3D 27 70 61 72 61 6D 27 20 74    nature='param' t
00F090:  68 65 6E 0D 0A 74 61 70 65 66 6F 6E 63 74 69 6F    hen..tapefonctio
00F0A0:  6E 3A 3D 27 70 28 27 2B 66 5E 2E 76 61 6C 65 75    n:='p('+f^.valeu
00F0B0:  72 2B 27 29 27 20 65 6C 73 65 0D 0A 69 66 20 66    r+')' else..if f
00F0C0:  5E 2E 6E 61 74 75 72 65 3D 27 76 61 72 69 61 62    ^.nature='variab
00F0D0:  27 20 74 68 65 6E 0D 0A 74 61 70 65 66 6F 6E 63    ' then..tapefonc
00F0E0:  74 69 6F 6E 3A 3D 76 20 65 6C 73 65 0D 0A 69 66    tion:=v else..if
00F0F0:  20 28 28 66 5E 2E 6E 61 74 75 72 65 3D 27 70 6C     ((f^.nature='pl
00F100:  75 73 27 29 20 6F 72 20 28 66 5E 2E 6E 61 74 75    us') or (f^.natu
00F110:  72 65 3D 27 6D 6F 69 6E 73 27 29 29 20 74 68 65    re='moins')) the
00F120:  6E 0D 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20    n..    begin..  
00F130:  20 20 77 77 77 3A 3D 74 61 70 65 66 6F 6E 63 74      www:=tapefonct
00F140:  69 6F 6E 28 66 5E 2E 64 2C 76 29 3B 77 77 78 3A    ion(f^.d,v);wwx:
00F150:  3D 74 61 70 65 66 6F 6E 63 74 69 6F 6E 28 66 5E    =tapefonction(f^
00F160:  2E 67 2C 76 29 3B 0D 0A 20 20 20 20 69 66 20 28    .g,v);..    if (
00F170:  28 28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27    ((f^.d^.valeur='
00F180:  2B 27 29 6F 72 28 66 5E 2E 64 5E 2E 76 61 6C 65    +')or(f^.d^.vale
00F190:  75 72 3D 27 2D 27 29 29 61 6E 64 28 66 5E 2E 76    ur='-'))and(f^.v
00F1A0:  61 6C 65 75 72 3D 27 2B 27 29 29 20 74 68 65 6E    aleur='+')) then
00F1B0:  0D 0A 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20    ..     begin..  
00F1C0:  20 20 20 64 65 6C 65 74 65 28 77 77 77 2C 31 2C       delete(www,1,
00F1D0:  31 29 3B 64 65 6C 65 74 65 28 77 77 77 2C 6C 65    1);delete(www,le
00F1E0:  6E 67 74 68 28 77 77 77 29 2C 31 29 3B 0D 0A 20    ngth(www),1);.. 
00F1F0:  20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 69 66        end;..    if
00F200:  00 00 00 00 EF FF 03 00 00 00 40 FE FF FF 07 00    ..........@.....
00F210:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 C3    ................
00F220:  6E 2C 01 0A 00 21 B1 F1 CD 08 05 FD E1 E1 22 B9    n,...!........".
00F230:  F1 FD E5 2A B9 F1 5E 23 56 EB E5 21 00 00 D1 CD    ...*..^#V..!....
00F240:  92 06 CB 45 CA 6F 21 2A B9 F1 E5 21 16 00 CD 7A    ...E.o!*...!...z
00F250:  1D 21 00 00 EB 2A B9 F1 73 23 72 21 C8 F1 E5 2A    .!...*..s#r!...*
00F260:  98 F2 2B 29 D1 19 E5 21 00 00 EB E1 73 23 72 01    ..+)...!....s#r.
00F270:  0A 00 11 B1 F1 C3 22 05 01 0A 00 21 A7 F1 CD 08    ......"....!....
00F280:  05 FD E1 E1 22 AF F1 FD E5 CD 9B 14 CD CD 17 CD    ...."...........
00F290:  1B 20 CD 9B 14 CD BA 17 1F 45 72 72 65 75 72 20    . .......Erreur 
00F2A0:  64 65 20 73 79 6E 74 61 78 65 20 61 20 6C 27 65    de syntaxe a l'e
00F2B0:  6E 74 72 65 65 20 6E 2E CD 1B 20 2A AF F1 CD 9B    ntree n... *....
00F2C0:  14 E5 21 00 00 CD 26 17 CD CD 17 CD 1B 20 21 A6    ..!...&...... !.
00F2D0:  F2 E5 2A 98 F2 2B 29 D1 19 E5 CD 22 21 21 A6 F2    ..*..+)...."!!..
00F2E0:  E5 2A 98 F2 2B 29 D1 19 E5 CD 1F 21 01 0A 00 11    .*..+).....!....
00F2F0:  A7 F1 C3 22 05 01 08 00 21 9F F1 CD 08 05 21 BA    ..."....!.....!.
00F300:  00 CD A9 14 21 A5 F2 CD 44 16 CD 1B 20 2A A5 F2    ....!...D... *..
00F310:  26 00 E5 21 FF 20 01 20 00 CD 5D 05 CD 4F 13 E5    &..!. . ..]..O..
00F320:  2A A5 F2 26 00 E5 21 0D 00 D1 CD 7F 06 D1 7D B3    *..&..!.......}.
00F330:  6F CB 45 CA FE 21 2A A5 F2 26 00 CD 9B 14 CD 22    o.E..!*..&....."
00F340:  17 CD 1B 20 01 08 00 11 9F F1 C3 22 05 01 08 00    ... ......."....
00F350:  21 97 F1 CD 08 05 CD F5 21 2A A5 F2 26 00 65 2E    !.......!*..&.e.
00F360:  01 E5 06 0A 21 9A F2 CD E2 05 2A A5 F2 26 00 E5    ....!.....*..&..
00F370:  CD 81 05 21 30 00 E5 21 39 00 CD 9B 05 CD 4F 13    ...!0..!9.....O.
00F380:  E5 21 9A F2 CD 3A 05 CD A3 08 E5 21 06 00 D1 CD    .!...:..£..!....
00F390:  E0 06 D1 7D A3 6F CB 45 CA BB 22 CD F5 21 21 9A    ...}£o.E.."..!!.
00F3A0:  F2 CD 3A 05 2A A5 F2 26 00 65 2E 01 E5 CD 3D 08    ..:.*..&.e....=.
00F3B0:  06 0A 21 9A F2 CD E2 05 C3 6A 22 21 9A F2 CD 3A    ..!......j"!...:
00F3C0:  05 21 01 00 E5 21 9A F2 CD 3A 05 CD A3 08 E5 21    .!...!...:..£..!
00F3D0:  01 00 D1 EB B7 ED 52 CD 6B 08 06 0A 21 9A F2 CD    ......R.k...!...
00F3E0:  E2 05 01 08 00 11 97 F1 C3 22 05 01 0C 00 21 8B    ........."....!.
00F3F0:  F1 CD 08 05 FD E1 E1 22 95 F1 FD E5 CD F5 21 2A    ......."......!*
00F400:  A5 F2 26 00 E5 21 28 00 D1 CD 92 06 CB 45 CA 1B    ..&..!(......E..
00F410:  23 21 01 00 E5 CD 78 21 C3 CF 23 CD 4D 22 2A A5    #!....x!..#.M"*.
00F420:  F2 26 00 E5 21 29 00 D1 CD 92 06 CB 45 CA 3A 23    .&..!)......E.:#
00F430:  21 02 00 E5 CD 78 21 C3 CF 23 2A 95 F1 5E 23 56    !....x!..#*..^#V
00F440:  EB E5 CD 4D 05 05 70 61 72 61 6D 06 06 CD 01 06    ...M..param.....
00F450:  2A 95 F1 5E 23 56 EB 11 07 00 19 E5 21 9A F2 CD    *..^#V......!...
00F460:  3A 05 06 0A CD 01 06 2A 95 F1 5E 23 56 EB 11 12    :......*..^#V...
00F470:  00 19 E5 21 00 00 EB E1 73 23 72 2A 95 F1 5E 23    ...!....s#r*..^#
00F480:  56 EB 11 14 00 19 E5 21 00 00 EB E1 73 23 72 21    V......!....s#r!
00F490:  9A F2 CD 3A 05 21 8B F1 E5 21 94 F2 CD F4 1E 21    ...:.!...!.....!
00F4A0:  C8 F1 E5 2A 98 F2 2B 29 D1 19 5E 23 56 EB E5 2A    ...*..+)..^#V..*
00F4B0:  8B F1 D1 CD E0 06 CB 45 CA CF 23 21 C8 F1 E5 2A    .......E..#!...*
00F4C0:  98 F2 2B 29 D1 19 E5 2A 8B F1 EB E1 73 23 72 CD    ..+)...*....s#r.
00F4D0:  F5 21 01 0C 00 11 8B F1 C3 22 05 01 0A 00 21 81    .!......."....!.
00F4E0:  F1 CD 08 05 FD E1 E1 22 89 F1 FD E5 2A 89 F1 5E    ......."....*..^
00F4F0:  23 56 EB E5 CD 4D 05 06 76 61 72 69 61 62 06 06    #V...M..variab..
00F500:  CD 01 06 2A 89 F1 5E 23 56 EB 11 07 00 19 E5 21    ...*..^#V......!
00F510:  78 00 65 2E 01 E5 06 0A CD 01 06 2A 89 F1 5E 23    x.e........*..^#
00F520:  56 EB 11 12 00 19 E5 21 00 00 EB E1 73 23 72 2A    V......!....s#r*
00F530:  89 F1 5E 23 56 EB 11 14 00 19 E5 21 00 00 EB E1    ..^#V......!....
00F540:  73 23 72 CD F5 21 01 0A 00 11 81 F1 C3 22 05 C3    s#r..!......."..
00F550:  CB 2A 01 0A 00 21 77 F1 CD 08 05 FD E1 E1 22 7F    .*...!w.......".
00F560:  F1 FD E5 2A A5 F2 26 00 65 2E 01 E5 06 0A 21 9A    ...*..&.e.....!.
00F570:  F2 CD E2 05 2A A5 F2 26 00 E5 CD 81 05 21 61 00    ....*..&.....!a.
00F580:  E5 21 7A 00 CD 9B 05 CD 4F 13 E5 21 9A F2 CD 3A    .!z.....O..!...:
00F590:  05 CD A3 08 E5 21 07 00 D1 CD E0 06 D1 7D A3 6F    ..£..!.......}£o
00F5A0:  CB 45 CA C5 24 CD F5 21 21 9A F2 CD 3A 05 2A A5    .E..$..!!...:.*.
00F5B0:  F2 26 00 65 2E 01 E5 CD 3D 08 06 0A 21 9A F2 CD    .&.e....=...!...
00F5C0:  E2 05 C3 74 24 21 9A F2 CD 3A 05 21 01 00 E5 21    ...t$!...:.!...!
00F5D0:  9A F2 CD 3A 05 CD A3 08 E5 21 01 00 D1 EB B7 ED    ...:..£..!......
00F5E0:  52 CD 6B 08 06 0A 21 9A F2 CD E2 05 21 9A F2 CD    R.k...!.....!...
00F5F0:  3A 05 CD 4D 05 03 73 69 6E CD 8D 06 E5 21 9A F2    :..M..sin....!..
00F600:  CD 3A 05 CD 4D 05 03 63 6F 73 CD 8D 06 D1 7D B3    .:..M..cos....}.
00F610:  6F E5 21 9A F2 CD 3A 05 CD 4D 05 04 74 61 6E 67    o.!...:..M..tang
00F620:  CD 8D 06 D1 7D B3 6F E5 21 9A F2 CD 3A 05 CD 4D    ....}.o.!...:..M
00F630:  05 03 65 78 70 CD 8D 06 D1 7D B3 6F E5 21 9A F2    ..exp....}.o.!..
00F640:  CD 3A 05 CD 4D 05 02 6C 6E CD 8D 06 D1 7D B3 6F    .:..M..ln....}.o
00F650:  E5 21 9A F2 CD 3A 05 CD 4D 05 06 61 72 63 74 61    .!...:..M..arcta
00F660:  6E CD 8D 06 D1 7D B3 6F E5 21 9A F2 CD 3A 05 CD    n....}.o.!...:..
00F670:  4D 05 03 69 6E 74 CD 8D 06 D1 7D B3 6F E5 21 9A    M..int....}.o.!.
00F680:  F2 CD 3A 05 CD 4D 05 03 61 62 73 CD 8D 06 D1 7D    ..:..M..abs....}
00F690:  B3 6F E5 21 9A F2 CD 3A 05 CD 4D 05 04 73 71 72    .o.!...:..M..sqr
00F6A0:  74 CD 8D 06 D1 7D B3 6F E5 21 9A F2 CD 3A 05 CD    t....}.o.!...:..
00F6B0:  4D 05 02 73 68 CD 8D 06 D1 7D B3 6F E5 21 9A F2    M..sh....}.o.!..
00F6C0:  CD 3A 05 CD 4D 05 02 63 68 CD 8D 06 D1 7D B3 6F    .:..M..ch....}.o
00F6D0:  E5 21 9A F2 CD 3A 05 CD 4D 05 02 74 68 CD 8D 06    .!...:..M..th...
00F6E0:  D1 7D B3 6F E5 21 9A F2 CD 3A 05 CD 4D 05 06 61    .}.o.!...:..M..a
00F6F0:  72 63 73 69 6E CD 8D 06 D1 7D B3 6F E5 21 9A F2    rcsin....}.o.!..
00F700:  CD 3A 05 CD 4D 05 06 61 72 63 63 6F 73 CD 8D 06    .:..M..arccos...
00F710:  D1 7D B3 6F CB 45 CA AA 26 2A 7F F1 5E 23 56 EB    .}.o.E..&*..^#V.
00F720:  E5 CD 4D 05 05 69 64 66 63 74 06 06 CD 01 06 2A    ..M..idfct.....*
00F730:  7F F1 5E 23 56 EB 11 07 00 19 E5 21 9A F2 CD 3A    ..^#V......!...:
00F740:  05 06 0A CD 01 06 2A 7F F1 5E 23 56 EB 11 14 00    ......*..^#V....
00F750:  19 E5 21 00 00 EB E1 73 23 72 2A A5 F2 26 00 E5    ..!....s#r*..&..
00F760:  21 28 00 D1 CD 7F 06 CB 45 CA A0 26 CD F5 21 2A    !(......E..&..!*
00F770:  7F F1 5E 23 56 EB 11 12 00 19 E5 CD 4F 24 2A A5    ..^#V.......O$*.
00F780:  F2 26 00 E5 21 29 00 D1 CD 92 06 CB 45 CA 9A 26    .&..!)......E..&
00F790:  21 03 00 E5 CD 78 21 C3 9D 26 CD F5 21 C3 A7 26    !....x!..&..!..&
00F7A0:  21 04 00 E5 CD 78 21 C3 B1 26 21 05 00 E5 CD 78    !....x!..&!....x
00F7B0:  21 01 0A 00 11 77 F1 C3 22 05 C3 E5 28 01 0C 00    !....w.."...(...
00F7C0:  21 6B F1 CD 08 05 FD E1 E1 22 75 F1 FD E5 21 6B    !k......."u...!k
00F7D0:  F1 E5 21 16 00 CD E5 1C 2A 6B F1 11 14 00 19 E5    ..!.....*k......
00F7E0:  2A 75 F1 5E 23 56 EB EB E1 73 23 72 2A 6B F1 EB    *u.^#V...s#r*k..
00F7F0:  2A 75 F1 73 23 72 2A 75 F1 5E 23 56 EB E5 CD 4D    *u.s#r*u.^#V...M
00F800:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
00F810:  0D 00 00 00 02 09 4E E5 0D 00 41 02 00 00 00 02    ......N...A.....
00F820:  0D 00 42 02 00 00 00 02 0D 00 43 02 00 00 00 02    ..B.......C.....
00F830:  0D 00 44 02 00 00 00 02 0D 00 45 02 00 00 00 02    ..D.......E.....
00F840:  0D 00 46 02 00 00 00 02 0D 00 47 02 00 00 00 02    ..F.......G.....
00F850:  0D 00 48 02 00 00 00 02 0D 00 49 02 00 00 00 02    ..H.......I.....
00F860:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F870:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F880:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F890:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F8A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F8B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F8C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F8D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F8E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F8F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F900:  05 05 70 75 69 73 73 06 06 CD 01 06 2A 75 F1 5E    ..puiss.....*u.^
00F910:  23 56 EB 11 07 00 19 E5 21 5E 00 65 2E 01 E5 06    #V......!^.e....
00F920:  0A CD 01 06 2A 75 F1 5E 23 56 EB 11 12 00 19 E5    ....*u.^#V......
00F930:  21 16 00 CD E5 1C CD F5 21 2A 75 F1 5E 23 56 EB    !.......!*u.^#V.
00F940:  11 12 00 19 E5 CD BA 26 01 0C 00 11 6B F1 C3 22    .......&....k.."
00F950:  05 01 10 00 21 5B F1 CD 08 05 FD E1 E1 22 69 F1    ....![......."i.
00F960:  FD E5 2A A5 F2 26 00 65 2E 01 E5 06 0A 21 9A F2    ..*..&.e.....!..
00F970:  CD E2 05 21 30 00 7D 32 A5 F2 2A A5 F2 26 00 E5    ...!0.}2..*..&..
00F980:  CD 81 05 21 30 00 E5 21 39 00 CD 9B 05 CD 4F 13    ...!0..!9.....O.
00F990:  E5 21 9A F2 CD 3A 05 CD A3 08 E5 21 0A 00 D1 CD    .!...:..£..!....
00F9A0:  E0 06 D1 7D A3 6F CB 45 CA CB 27 CD F5 21 21 9A    ...}£o.E..'..!!.
00F9B0:  F2 CD 3A 05 2A A5 F2 26 00 65 2E 01 E5 CD 3D 08    ..:.*..&.e....=.
00F9C0:  06 0A 21 9A F2 CD E2 05 C3 7A 27 2A A5 F2 26 00    ..!......z'*..&.
00F9D0:  E5 21 2E 00 D1 CD 7F 06 CB 45 CA 35 28 21 30 00    .!.......E.5(!0.
00F9E0:  7D 32 A5 F2 2A A5 F2 26 00 E5 CD 81 05 21 30 00    }2..*..&.....!0.
00F9F0:  E5 21 39 00 CD 9B 05 CD 4F 13 E5 21 9A F2 CD 3A    .!9.....O..!...:
00FA00:  05 CD A3 08 E5 21 0A 00 D1 CD E0 06 D1 7D A3 6F    ..£..!.......}£o
00FA10:  CB 45 CA 35 28 CD F5 21 21 9A F2 CD 3A 05 2A A5    .E.5(..!!...:.*.
00FA20:  F2 26 00 65 2E 01 E5 CD 3D 08 06 0A 21 9A F2 CD    .&.e....=...!...
00FA30:  E2 05 C3 E4 27 21 9A F2 CD 3A 05 21 01 00 E5 21    ....'!...:.!...!
00FA40:  9A F2 CD 3A 05 CD A3 08 E5 21 01 00 D1 EB B7 ED    ...:..£..!......
00FA50:  52 CD 6B 08 06 0A 21 9A F2 CD E2 05 21 9A F2 CD    R.k...!.....!...
00FA60:  3A 05 21 5B F1 E5 21 94 F2 CD F3 1E 2A 94 F2 E5    :.![..!.....*...
00FA70:  21 00 00 D1 CD 92 06 CB 45 CA 86 28 21 06 00 E5    !.......E..(!...
00FA80:  CD 78 21 C3 DC 28 2A 69 F1 5E 23 56 EB E5 CD 4D    .x!..(*i.^#V...M
00FA90:  05 06 6E 6F 6D 62 72 65 06 06 CD 01 06 2A 69 F1    ..nombre.....*i.
00FAA0:  5E 23 56 EB 11 07 00 19 E5 21 9A F2 CD 3A 05 06    ^#V......!...:..
00FAB0:  0A CD 01 06 2A 69 F1 5E 23 56 EB 11 12 00 19 E5    ....*i.^#V......
00FAC0:  21 00 00 EB E1 73 23 72 2A 69 F1 5E 23 56 EB 11    !....s#r*i.^#V..
00FAD0:  14 00 19 E5 21 00 00 EB E1 73 23 72 01 10 00 11    ....!....s#r....
00FAE0:  5B F1 C3 22 05 01 0A 00 21 51 F1 CD 08 05 FD E1    [.."....!Q......
00FAF0:  E1 22 59 F1 FD E5 2A A5 F2 26 00 11 70 00 B7 ED    ."Y...*..&..p...
00FB00:  52 C2 0E 29 2A 59 F1 E5 CD EB 22 C3 BD 29 19 11    R..)*Y...."..)..
00FB10:  78 00 B7 ED 52 C2 22 29 2A 59 F1 E5 CD DB 23 C3    x...R.")*Y....#.
00FB20:  BD 29 19 11 28 00 B7 ED 52 C2 58 29 CD F5 21 2A    .)..(...R.X)..!*
00FB30:  59 F1 E5 CD 4F 24 2A A5 F2 26 00 E5 21 29 00 D1    Y...O$*..&..!)..
00FB40:  CD 92 06 CB 45 CA 52 29 21 07 00 E5 CD 78 21 C3    ....E.R)!....x!.
00FB50:  55 29 CD F5 21 C3 BD 29 19 11 2B 00 B7 ED 52 CA    U)..!..)..+...R.
00FB60:  7C 29 19 11 2D 00 B7 ED 52 CA 7C 29 19 11 30 00    |)..-...R.|)..0.
00FB70:  01 0A 00 B7 ED 52 B7 ED 42 D2 86 29 2A 59 F1 E5    .....R..B..)*Y..
00FB80:  CD 51 27 C3 BD 29 19 09 11 61 00 01 17 00 B7 ED    .Q'..)...a......
00FB90:  52 B7 ED 42 DA AC 29 19 09 11 79 00 B7 ED 52 CA    R..B..)...y...R.
00FBA0:  AC 29 19 11 7A 00 B7 ED 52 C2 B6 29 2A 59 F1 E5    .)..z...R..)*Y..
00FBB0:  CD 52 24 C3 BD 29 21 08 00 E5 CD 78 21 2A A5 F2    .R$..)!....x!*..
00FBC0:  26 00 E5 21 5E 00 D1 CD 7F 06 CB 45 CA D9 29 2A    &..!^......E..)*
00FBD0:  59 F1 E5 CD BD 26 C3 BD 29 01 0A 00 11 51 F1 C3    Y....&..)....Q..
00FBE0:  22 05 01 0C 00 21 45 F1 CD 08 05 FD E1 E1 22 4F    "....!E......."O
00FBF0:  F1 FD E5 2A 4F F1 E5 CD BA 26 2A A5 F2 26 00 E5    ...*O....&*..&..
00FC00:  CD 81 05 21 2A 00 CD 91 05 21 2F 00 CD 91 05 CD    ...!*....!/.....
00FC10:  4F 13 CB 45 CA C2 2A 21 45 F1 E5 21 16 00 CD E5    O..E..*!E..!....
00FC20:  1C 2A 45 F1 11 14 00 19 E5 2A 4F F1 5E 23 56 EB    .*E......*O.^#V.
00FC30:  EB E1 73 23 72 2A 45 F1 EB 2A 4F F1 73 23 72 2A    ..s#r*E..*O.s#r*
00FC40:  A5 F2 26 00 E5 21 2A 00 D1 CD 7F 06 CB 45 CA 6A    ..&..!*......E.j
00FC50:  2A 2A 4F F1 5E 23 56 EB E5 CD 4D 05 05 6D 75 6C    **O.^#V...M..mul
00FC60:  74 69 06 06 CD 01 06 C3 81 2A 2A 4F F1 5E 23 56    ti.......**O.^#V
00FC70:  EB E5 CD 4D 05 06 64 69 76 69 73 65 06 06 CD 01    ...M..divise....
00FC80:  06 2A 4F F1 5E 23 56 EB 11 07 00 19 E5 2A A5 F2    .*O.^#V......*..
00FC90:  26 00 65 2E 01 E5 06 0A CD 01 06 2A 4F F1 5E 23    &.e........*O.^#
00FCA0:  56 EB 11 12 00 19 E5 21 16 00 CD E5 1C CD F5 21    V......!.......!
00FCB0:  2A 4F F1 5E 23 56 EB 11 12 00 19 E5 CD BA 26 C3    *O.^#V........&.
00FCC0:  FA 29 01 0C 00 11 45 F1 C3 22 05 01 0C 00 21 39    .)....E.."....!9
00FCD0:  F1 CD 08 05 FD E1 E1 22 43 F1 FD E5 2A 43 F1 E5    ......."C...*C..
00FCE0:  21 16 00 CD E5 1C 2A A5 F2 26 00 E5 CD 81 05 21    !.....*..&.....!
00FCF0:  2B 00 CD 91 05 21 2D 00 CD 91 05 CD 4F 13 CB 45    +....!-.....O..E
00FD00:  CA 98 2B 2A A5 F2 26 00 E5 21 2B 00 D1 CD 7F 06    ..+*..&..!+.....
00FD10:  CB 45 CA 2D 2B 2A 43 F1 5E 23 56 EB E5 CD 4D 05    .E.-+*C.^#V...M.
00FD20:  04 70 6C 75 73 06 06 CD 01 06 C3 43 2B 2A 43 F1    .plus......C+*C.
00FD30:  5E 23 56 EB E5 CD 4D 05 05 6D 6F 69 6E 73 06 06    ^#V...M..moins..
00FD40:  CD 01 06 2A 43 F1 5E 23 56 EB 11 07 00 19 E5 2A    ...*C.^#V......*
00FD50:  A5 F2 26 00 65 2E 01 E5 06 0A CD 01 06 2A 43 F1    ..&.e........*C.
00FD60:  5E 23 56 EB 11 14 00 19 E5 21 00 00 EB E1 73 23    ^#V......!....s#
00FD70:  72 2A 43 F1 5E 23 56 EB 11 12 00 19 E5 21 16 00    r*C.^#V......!..
00FD80:  CD E5 1C CD F5 21 2A 43 F1 5E 23 56 EB 11 12 00    .....!*C.^#V....
00FD90:  19 E5 CD E2 29 C3 9F 2B 2A 43 F1 E5 CD E2 29 2A    ....)..+*C....)*
00FDA0:  A5 F2 26 00 E5 CD 81 05 21 2B 00 CD 91 05 21 2D    ..&.....!+....!-
00FDB0:  00 CD 91 05 CD 4F 13 CB 45 CA 65 2C 21 39 F1 E5    .....O..E.e,!9..
00FDC0:  21 16 00 CD E5 1C 2A 39 F1 11 14 00 19 E5 2A 43    !.....*9......*C
00FDD0:  F1 5E 23 56 EB EB E1 73 23 72 2A 39 F1 EB 2A 43    .^#V...s#r*9..*C
00FDE0:  F1 73 23 72 2A A5 F2 26 00 E5 21 2B 00 D1 CD 7F    .s#r*..&..!+....
00FDF0:  06 CB 45 CA 0E 2C 2A 43 F1 5E 23 56 EB E5 CD 4D    ..E..,*C.^#V...M
00FE00:  05 04 70 6C 75 73 06 06 CD 01 06 C3 24 2C 2A 43    ..plus......$,*C
00FE10:  F1 5E 23 56 EB E5 CD 4D 05 05 6D 6F 69 6E 73 06    .^#V...M..moins.
00FE20:  06 CD 01 06 2A 43 F1 5E 23 56 EB 11 07 00 19 E5    ....*C.^#V......
00FE30:  2A A5 F2 26 00 65 2E 01 E5 06 0A CD 01 06 2A 43    *..&.e........*C
00FE40:  F1 5E 23 56 EB 11 12 00 19 E5 21 16 00 CD E5 1C    .^#V......!.....
00FE50:  CD F5 21 2A 43 F1 5E 23 56 EB 11 12 00 19 E5 CD    ..!*C.^#V.......
00FE60:  E2 29 C3 9F 2B 01 0C 00 11 39 F1 C3 22 05 01 0A    .)..+....9.."...
00FE70:  00 21 2F F1 CD 08 05 FD E1 E1 22 37 F1 FD E5 2A    .!/......."7...*
00FE80:  37 F1 5E 23 56 EB E5 21 00 00 D1 CD 92 06 CB 45    7.^#V..!.......E
00FE90:  CA 9A 2C 2A 37 F1 E5 CD 22 21 CD 9B 14 CD BA 17    ..,*7..."!......
00FEA0:  15 45 6E 74 72 65 7A 20 76 6F 74 72 65 20 66 6F    .Entrez votre fo
00FEB0:  6E 63 74 69 6F 6E CD CD 17 CD 1B 20 CD F5 21 2A    nction..... ..!*
00FEC0:  37 F1 E5 CD 4F 24 2A A5 F2 26 00 E5 21 0D 00 D1    7...O$*..&..!...
00FED0:  CD 92 06 CB 45 CA DF 2C 21 09 00 E5 CD 78 21 01    ....E..,!....x!.
00FEE0:  0A 00 11 2F F1 C3 22 05 01 08 00 21 27 F1 CD 08    .../.."....!'...
00FEF0:  05 CD 9B 14 CD CD 17 CD 1B 20 21 01 00 E5 21 19    ......... !...!.
00FF00:  00 CD DB 1F CD 9B 14 CD BA 17 27 61 70 70 75 79    ..........'appuy
00FF10:  65 7A 20 75 6E 65 20 74 6F 75 63 68 65 20 70 6F    ez une touche po
00FF20:  75 72 20 72 65 76 65 6E 69 72 20 61 75 20 6D 65    ur revenir au me
00FF30:  6E 75 CD 1B 20 CD A0 00 7D EE 01 6F CB 45 CA 44    nu.. ...}..o.E.D
00FF40:  2D C3 35 2D 01 08 00 11 27 F1 C3 22 05 C3 38 36    -.5-....'.."..86
00FF50:  C3 22 44 C3 D7 3F 01 12 00 21 15 F1 CD 08 05 FD    ."D..?...!......
00FF60:  E1 E1 22 25 F1 FD E5 2A 25 F1 5E 23 56 EB E5 21    .."%...*%.^#V..!
00FF70:  00 00 D1 CD 92 06 CB 45 CA 2C 36 2A 25 F1 5E 23    .......E.,6*%.^#
00FF80:  56 EB 11 12 00 19 5E 23 56 EB CD 3A 05 CD 4D 05    V.....^#V..:..M.
00FF90:  06 6E 6F 6D 62 72 65 CD 8D 06 E5 2A 25 F1 5E 23    .nombre....*%.^#
00FFA0:  56 EB 11 14 00 19 5E 23 56 EB CD 3A 05 CD 4D 05    V.....^#V..:..M.
00FFB0:  06 6E 6F 6D 62 72 65 CD 8D 06 D1 7D A3 6F E5 2A    .nombre....}£o.*
00FFC0:  25 F1 5E 23 56 EB 11 07 00 19 CD 3A 05 21 2F 00    %.^#V......:.!/.
00FFD0:  65 2E 01 E5 CD A0 06 D1 7D A3 6F CB 45 CA E1 2E    e.......}£o.E...
00FFE0:  2A 25 F1 5E 23 56 EB E5 21 00 00 CD 08 10 C5 D5    *%.^#V..!.......
00FFF0:  E5 CD 4D 2D D9 21 15 F1 CD D1 05 21 15 F1 CD 2C    ..M-.!.....!...,
010000:  05 CD 34 0C C5 D5 E5 21 00 00 CD 08 10 D9 E1 D1    ..4....!........
010010:  C1 CD 88 06 CB 45 CA 3A 2E 21 15 F1 CD 2C 05 CD    .....E.:.!...,..
010020:  D0 0F E5 21 00 00 E5 2A 25 F1 5E 23 56 EB 11 07    ...!...*%.^#V...
010030:  00 19 06 0A CD BE 1E C3 99 2E 21 15 F1 CD 2C 05    ..........!...,.
010040:  C5 D5 E5 21 08 00 E5 21 03 00 E5 2A 25 F1 5E 23    ...!...!...*%.^#
010050:  56 EB 11 07 00 19 06 0A CD BD 1E 21 20 00 65 2E    V..........! .e.
010060:  01 E5 2A 25 F1 5E 23 56 EB 11 07 00 19 CD 3A 05    ..*%.^#V......:.
010070:  CD B2 08 E5 21 00 00 D1 CD 92 06 CB 45 CA 99 2E    ....!.......E...
010080:  2A 25 F1 5E 23 56 EB 11 07 00 19 E5 21 01 00 E5    *%.^#V......!...
010090:  21 01 00 CD F3 08 C3 5B 2E 2A 25 F1 5E 23 56 EB    !......[.*%.^#V.
0100A0:  E5 CD 4D 05 06 6E 6F 6D 62 72 65 06 06 CD 01 06    ..M..nombre.....
0100B0:  2A 25 F1 5E 23 56 EB 11 14 00 19 E5 21 00 00 EB    *%.^#V......!...
0100C0:  E1 73 23 72 2A 25 F1 5E 23 56 EB 11 12 00 19 E5    .s#r*%.^#V......
0100D0:  21 00 00 EB E1 73 23 72 21 01 00 22 94 F2 C3 2C    !....s#r!.."...,
0100E0:  36 2A 25 F1 5E 23 56 EB 11 07 00 19 CD 3A 05 21    6*%.^#V......:.!
0100F0:  2A 00 65 2E 01 E5 CD 8D 06 E5 2A 25 F1 5E 23 56    *.e.......*%.^#V
010100:  EB 11 12 00 19 5E 23 56 EB CD 3A 05 CD 4D 05 06    .....^#V..:..M..
010110:  6E 6F 6D 62 72 65 CD 8D 06 D1 7D A3 6F E5 2A 25    nombre....}£o.*%
010120:  F1 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 07 00    .^#V.....^#V....
010130:  19 CD 3A 05 21 31 00 65 2E 01 E5 CD 8D 06 D1 7D    ..:.!1.e.......}
010140:  A3 6F CB 45 CA 6D 2F 2A 25 F1 5E 23 56 EB 11 14    £o.E.m/*%.^#V...
010150:  00 19 5E 23 56 EB EB 2A 25 F1 73 23 72 2A 25 F1    ..^#V..*%.s#r*%.
010160:  E5 CD 56 2D 21 01 00 22 94 F2 C3 2C 36 2A 25 F1    ..V-!.."...,6*%.
010170:  5E 23 56 EB 11 07 00 19 CD 3A 05 21 2A 00 65 2E    ^#V......:.!*.e.
010180:  01 E5 CD 8D 06 E5 2A 25 F1 5E 23 56 EB 11 14 00    ......*%.^#V....
010190:  19 5E 23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62    .^#V..:..M..nomb
0101A0:  72 65 CD 8D 06 D1 7D A3 6F E5 2A 25 F1 5E 23 56    re....}£o.*%.^#V
0101B0:  EB 11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05    .....^#V......:.
0101C0:  21 31 00 65 2E 01 E5 CD 8D 06 D1 7D A3 6F CB 45    !1.e.......}£o.E
0101D0:  CA F9 2F 2A 25 F1 5E 23 56 EB 11 12 00 19 5E 23    ../*%.^#V.....^#
0101E0:  56 EB EB 2A 25 F1 73 23 72 2A 25 F1 E5 CD 56 2D    V..*%.s#r*%...V-
0101F0:  21 01 00 22 94 F2 C3 2C 36 2A 25 F1 5E 23 56 EB    !.."...,6*%.^#V.
010200:  11 07 00 19 CD 3A 05 21 2A 00 65 2E 01 E5 CD 8D    .....:.!*.e.....
010210:  06 E5 2A 25 F1 5E 23 56 EB 11 07 00 19 CD 3A 05    ..*%.^#V......:.
010220:  21 2F 00 65 2E 01 E5 CD 8D 06 D1 7D B3 6F E5 2A    !/.e.......}.o.*
010230:  25 F1 5E 23 56 EB 11 14 00 19 5E 23 56 EB CD 3A    %.^#V.....^#V..:
010240:  05 CD 4D 05 06 6E 6F 6D 62 72 65 CD 8D 06 E5 2A    ..M..nombre....*
010250:  25 F1 5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 07    %.^#V.....^#V...
010260:  00 19 CD 3A 05 21 30 00 65 2E 01 E5 CD 8D 06 D1    ...:.!0.e.......
010270:  7D A3 6F E5 2A 25 F1 5E 23 56 EB 11 14 00 19 5E    }£o.*%.^#V.....^
010280:  23 56 EB E5 21 00 00 D1 CD 7F 06 D1 7D B3 6F D1    #V..!.......}.o.
010290:  7D A3 6F CB 45 CA AB 30 21 00 00 EB 2A 25 F1 73    }£o.E..0!...*%.s
0102A0:  23 72 21 01 00 22 94 F2 C3 2C 36 2A 25 F1 5E 23    #r!.."...,6*%.^#
0102B0:  56 EB 11 07 00 19 CD 3A 05 21 2A 00 65 2E 01 E5    V......:.!*.e...
0102C0:  CD 8D 06 E5 2A 25 F1 5E 23 56 EB 11 12 00 19 5E    ....*%.^#V.....^
0102D0:  23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62 72 65    #V..:..M..nombre
0102E0:  CD 8D 06 E5 2A 25 F1 5E 23 56 EB 11 12 00 19 5E    ....*%.^#V.....^
0102F0:  23 56 EB 11 07 00 19 CD 3A 05 21 30 00 65 2E 01    #V......:.!0.e..
010300:  E5 CD 8D 06 D1 7D A3 6F E5 2A 25 F1 5E 23 56 EB    .....}£o.*%.^#V.
010310:  11 12 00 19 5E 23 56 EB E5 21 00 00 D1 CD 7F 06    ....^#V..!......
010320:  D1 7D B3 6F D1 7D A3 6F CB 45 CA 40 31 21 00 00    .}.o.}£o.E.@1!..
010330:  EB 2A 25 F1 73 23 72 21 01 00 22 94 F2 C3 2C 36    .*%.s#r!.."...,6
010340:  2A 25 F1 5E 23 56 EB 11 07 00 19 CD 3A 05 21 2A    *%.^#V......:.!*
010350:  00 65 2E 01 E5 CD 8D 06 E5 2A 25 F1 5E 23 56 EB    .e.......*%.^#V.
010360:  11 14 00 19 5E 23 56 EB CD 3A 05 CD 4D 05 06 6E    ....^#V..:..M..n
010370:  6F 6D 62 72 65 CD 8D 06 D1 7D A3 6F E5 2A 25 F1    ombre....}£o.*%.
010380:  5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 07 00 19    ^#V.....^#V.....
010390:  CD 3A 05 21 2A 00 65 2E 01 E5 CD 8D 06 D1 7D A3    .:.!*.e.......}£
0103A0:  6F E5 2A 25 F1 5E 23 56 EB 11 12 00 19 5E 23 56    o.*%.^#V.....^#V
0103B0:  EB 11 14 00 19 5E 23 56 EB CD 3A 05 CD 4D 05 06    .....^#V..:..M..
0103C0:  6E 6F 6D 62 72 65 CD 8D 06 D1 7D A3 6F CB 45 CA    nombre....}£o.E.
0103D0:  8D 32 2A 25 F1 5E 23 56 EB 11 12 00 19 5E 23 56    .2*%.^#V.....^#V
0103E0:  EB 22 1B F1 2A 25 F1 5E 23 56 EB 11 12 00 19 E5    ."..*%.^#V......
0103F0:  2A 25 F1 5E 23 56 EB 11 14 00 19 5E 23 56 EB EB    *%.^#V.....^#V..
010400:  E1 73 23 72 2A 25 F1 5E 23 56 EB 11 14 00 19 E5    .s#r*%.^#V......
010410:  2A 1B F1 EB E1 73 23 72 2A 25 F1 5E 23 56 EB 11    *....s#r*%.^#V..
010420:  14 00 19 5E 23 56 EB 11 12 00 19 5E 23 56 EB 22    ...^#V.....^#V."
010430:  1B F1 2A 25 F1 5E 23 56 EB 11 14 00 19 5E 23 56    ..*%.^#V.....^#V
010440:  EB 11 12 00 19 E5 2A 25 F1 5E 23 56 EB 11 12 00    ......*%.^#V....
010450:  19 5E 23 56 EB EB E1 73 23 72 2A 25 F1 5E 23 56    .^#V...s#r*%.^#V
010460:  EB 11 12 00 19 E5 2A 1B F1 EB E1 73 23 72 2A 25    ......*....s#r*%
010470:  F1 5E 23 56 EB 11 12 00 19 E5 CD 56 2D 2A 25 F1    .^#V.......V-*%.
010480:  E5 CD 56 2D 21 01 00 22 94 F2 C3 2C 36 2A 25 F1    ..V-!.."...,6*%.
010490:  5E 23 56 EB CD 3A 05 CD 4D 05 04 70 6C 75 73 CD    ^#V..:..M..plus.
0104A0:  8D 06 E5 2A 25 F1 5E 23 56 EB CD 3A 05 CD 4D 05    ...*%.^#V..:..M.
0104B0:  05 6D 6F 69 6E 73 CD 8D 06 D1 7D B3 6F E5 2A 25    .moins....}.o.*%
0104C0:  F1 5E 23 56 EB 11 12 00 19 5E 23 56 EB E5 21 00    .^#V.....^#V..!.
0104D0:  00 D1 CD 7F 06 E5 2A 25 F1 5E 23 56 EB 11 12 00    ......*%.^#V....
0104E0:  19 5E 23 56 EB 11 07 00 19 CD 3A 05 21 30 00 65    .^#V......:.!0.e
0104F0:  2E 01 E5 CD 8D 06 D1 7D B3 6F D1 7D A3 6F CB 45    .......}.o.}£o.E
010500:  CA 29 33 2A 25 F1 5E 23 56 EB 11 14 00 19 5E 23    .)3*%.^#V.....^#
010510:  56 EB EB 2A 25 F1 73 23 72 2A 25 F1 E5 CD 56 2D    V..*%.s#r*%...V-
010520:  21 01 00 22 94 F2 C3 2C 36 2A 25 F1 5E 23 56 EB    !.."...,6*%.^#V.
010530:  CD 3A 05 CD 4D 05 04 70 6C 75 73 CD 8D 06 E5 2A    .:..M..plus....*
010540:  25 F1 5E 23 56 EB CD 3A 05 CD 4D 05 05 6D 6F 69    %.^#V..:..M..moi
010550:  6E 73 CD 8D 06 D1 7D B3 6F E5 2A 25 F1 5E 23 56    ns....}.o.*%.^#V
010560:  EB 11 14 00 19 5E 23 56 EB E5 21 00 00 D1 CD 7F    .....^#V..!.....
010570:  06 E5 2A 25 F1 5E 23 56 EB 11 14 00 19 5E 23 56    ..*%.^#V.....^#V
010580:  EB 11 07 00 19 CD 3A 05 21 30 00 65 2E 01 E5 CD    ......:.!0.e....
010590:  8D 06 D1 7D B3 6F D1 7D A3 6F CB 45 CA FB 33 2A    ...}.o.}£o.E..3*
0105A0:  25 F1 5E 23 56 EB 11 07 00 19 CD 3A 05 21 2D 00    %.^#V......:.!-.
0105B0:  65 2E 01 E5 CD 8D 06 CB 45 CA D5 33 2A 25 F1 5E    e.......E..3*%.^
0105C0:  23 56 EB 11 12 00 19 E5 CD 50 2D EB 2A 25 F1 73    #V.......P-.*%.s
0105D0:  23 72 C3 EB 33 2A 25 F1 5E 23 56 EB 11 12 00 19    #r..3*%.^#V.....
0105E0:  5E 23 56 EB EB 2A 25 F1 73 23 72 2A 25 F1 E5 CD    ^#V..*%.s#r*%...
0105F0:  56 2D 21 01 00 22 94 F2 C3 2C 36 2A 25 F1 5E 23    V-!.."...,6*%.^#
010600:  56 EB CD 3A 05 CD 4D 05 05 70 75 69 73 73 CD 8D    V..:..M..puiss..
010610:  06 E5 2A 25 F1 5E 23 56 EB 11 12 00 19 5E 23 56    ..*%.^#V.....^#V
010620:  EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62 72 65 CD 8D    ..:..M..nombre..
010630:  06 D1 7D A3 6F E5 2A 25 F1 5E 23 56 EB 11 12 00    ..}£o.*%.^#V....
010640:  19 5E 23 56 EB 11 07 00 19 CD 3A 05 21 31 00 65    .^#V......:.!1.e
010650:  2E 01 E5 CD 8D 06 D1 7D A3 6F CB 45 CA 85 34 2A    .......}£o.E..4*
010660:  25 F1 5E 23 56 EB 11 14 00 19 5E 23 56 EB EB 2A    %.^#V.....^#V..*
010670:  25 F1 73 23 72 2A 25 F1 E5 CD 56 2D 21 01 00 22    %.s#r*%...V-!.."
010680:  94 F2 C3 2C 36 2A 25 F1 5E 23 56 EB CD 3A 05 CD    ...,6*%.^#V..:..
010690:  4D 05 05 70 75 69 73 73 CD 8D 06 E5 2A 25 F1 5E    M..puiss....*%.^
0106A0:  23 56 EB 11 12 00 19 5E 23 56 EB CD 3A 05 CD 4D    #V.....^#V..:..M
0106B0:  05 06 6E 6F 6D 62 72 65 CD 8D 06 D1 7D A3 6F E5    ..nombre....}£o.
0106C0:  2A 25 F1 5E 23 56 EB 11 14 00 19 5E 23 56 EB CD    *%.^#V.....^#V..
0106D0:  3A 05 CD 4D 05 05 70 75 69 73 73 CD 8D 06 D1 7D    :..M..puiss....}
0106E0:  A3 6F E5 2A 25 F1 5E 23 56 EB 11 14 00 19 5E 23    £o.*%.^#V.....^#
0106F0:  56 EB 11 12 00 19 5E 23 56 EB CD 3A 05 CD 4D 05    V.....^#V..:..M.
010700:  7A 3A 3D 31 20 74 6F 20 6D 5B 69 5D 20 64 6F 0D    z:=1 to m[i] do.
010710:  0A 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20    .       begin.. 
010720:  20 20 20 20 20 20 77 72 69 74 65 28 27 56 61 6C          write('Val
010730:  65 75 72 20 64 75 20 70 61 72 61 6D 65 74 72 65    eur du parametre
010740:  20 6E 2E 27 29 3B 77 72 69 74 65 28 7A 29 3B 77     n.');write(z);w
010750:  72 69 74 65 28 27 20 3D 27 29 3B 72 65 61 64 6C    rite(' =');readl
010760:  6E 28 70 5B 7A 2C 69 5D 29 3B 0D 0A 20 20 20 20    n(p[z,i]);..    
010770:  20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20 20 20       end;..       
010780:  65 6E 64 3B 0D 0A 20 20 20 20 20 20 20 63 61 6C    end;..       cal
010790:  63 75 6C 66 6F 6E 63 74 69 6F 6E 28 66 5B 69 5D    culfonction(f[i]
0107A0:  29 3B 0D 0A 20 20 20 20 20 20 20 65 6E 64 3B 0D    );..       end;.
0107B0:  0A 20 33 3A 20 20 20 20 67 72 61 70 68 65 28 30    . 3:    graphe(0
0107C0:  29 3B 0D 0A 0D 0A 65 6E 64 3B 0D 0A 75 6E 74 69    );....end;..unti
0107D0:  6C 20 63 68 6F 69 78 3D 34 3B 0D 0A 65 6E 64 3B    l choix=4;..end;
0107E0:  0D 0A 0D 0D 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0107F0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
010800:  6D 65 27 29 3B 0D 0A 77 72 69 74 65 6C 6E 3B 77    me');..writeln;w
010810:  72 69 74 65 6C 6E 28 27 20 56 4F 54 52 45 20 43    riteln(' VOTRE C
010820:  48 4F 49 58 3F 20 27 29 3B 0D 0A 72 65 61 64 6C    HOIX? ');..readl
010830:  6E 28 63 68 6F 69 78 29 3B 6D 65 6E 75 3A 3D 63    n(choix);menu:=c
010840:  68 6F 69 78 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 66    hoix;..end;....f
010850:  75 6E 63 74 69 6F 6E 20 6E 75 6D 66 6F 6E 63 3A    unction numfonc:
010860:  69 6E 74 65 67 65 72 3B 0D 0A 76 61 72 20 6A 3A    integer;..var j:
010870:  69 6E 74 65 67 65 72 3B 0D 0A 0D 0A 62 65 67 69    integer;....begi
010880:  6E 0D 0A 63 61 72 3A 3D 27 20 27 3B 0D 0A 72 65    n..car:=' ';..re
010890:  70 65 61 74 0D 0A 72 65 61 64 28 6B 62 64 2C 63    peat..read(kbd,c
0108A0:  61 72 29 3B 0D 0A 75 6E 74 69 6C 20 28 28 63 61    ar);..until ((ca
0108B0:  72 3E 27 30 27 29 20 61 6E 64 20 28 63 61 72 3C    r>'0') and (car<
0108C0:  27 3A 27 29 29 3B 0D 0A 77 72 69 74 65 6C 6E 28    ':'));..writeln(
0108D0:  63 61 72 29 3B 0D 0A 76 61 6C 28 63 61 72 2C 6A    car);..val(car,j
0108E0:  2C 72 65 73 75 6C 74 29 3B 0D 0A 6E 75 6D 66 6F    ,result);..numfo
0108F0:  6E 63 3A 3D 6A 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A    nc:=j;..end;....
010900:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010910:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010920:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010930:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010940:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010950:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010960:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010970:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010980:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010990:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0109A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0109B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0109C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0109D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0109E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0109F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010A00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010A10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010A20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010A30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010A40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010A50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010A60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010A70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010A80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010A90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010AA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010AB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010AC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010AD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010AE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010AF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
010B00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
010B10:  0E 00 00 00 02 09 4E E5 0E 00 41 02 00 00 00 02    ......N...A.....
010B20:  0E 00 42 02 00 00 00 02 0E 00 43 02 00 00 00 02    ..B.......C.....
010B30:  0E 00 44 02 00 00 00 02 0E 00 45 02 00 00 00 02    ..D.......E.....
010B40:  0E 00 46 02 00 00 00 02 0E 00 47 02 00 00 00 02    ..F.......G.....
010B50:  0E 00 48 02 00 00 00 02 0E 00 49 02 00 00 00 02    ..H.......I.....
010B60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010B70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010B80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010B90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010BA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010BB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010BC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010BD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010BE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010BF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010C00:  06 6E 6F 6D 62 72 65 CD 8D 06 D1 7D A3 6F CB 45    .nombre....}£o.E
010C10:  CA D6 35 21 1B F1 E5 21 16 00 CD E5 1C CD 4D 05    ..5!...!......M.
010C20:  05 6D 75 6C 74 69 06 06 2A 1B F1 CD E2 05 2A 1B    .multi..*.....*.
010C30:  F1 11 07 00 19 E5 21 2A 00 65 2E 01 E5 06 0A CD    ......!*.e......
010C40:  01 06 2A 1B F1 11 12 00 19 E5 2A 25 F1 5E 23 56    ..*.......*%.^#V
010C50:  EB 11 12 00 19 5E 23 56 EB EB E1 73 23 72 2A 1B    .....^#V...s#r*.
010C60:  F1 11 14 00 19 E5 2A 25 F1 5E 23 56 EB 11 14 00    ......*%.^#V....
010C70:  19 5E 23 56 EB 11 12 00 19 5E 23 56 EB EB E1 73    .^#V.....^#V...s
010C80:  23 72 2A 25 F1 5E 23 56 EB 11 12 00 19 E5 2A 1B    #r*%.^#V......*.
010C90:  F1 EB E1 73 23 72 2A 25 F1 5E 23 56 EB 11 14 00    ...s#r*%.^#V....
010CA0:  19 E5 2A 25 F1 5E 23 56 EB 11 14 00 19 5E 23 56    ..*%.^#V.....^#V
010CB0:  EB 11 14 00 19 5E 23 56 EB EB E1 73 23 72 2A 25    .....^#V...s#r*%
010CC0:  F1 5E 23 56 EB 11 12 00 19 E5 CD 56 2D 21 01 00    .^#V.......V-!..
010CD0:  22 94 F2 C3 2C 36 2A 25 F1 5E 23 56 EB 11 12 00    "...,6*%.^#V....
010CE0:  19 5E 23 56 EB E5 21 00 00 D1 CD 92 06 CB 45 CA    .^#V..!.......E.
010CF0:  01 36 2A 25 F1 5E 23 56 EB 11 12 00 19 E5 CD 56    .6*%.^#V.......V
010D00:  2D 2A 25 F1 5E 23 56 EB 11 14 00 19 5E 23 56 EB    -*%.^#V.....^#V.
010D10:  E5 21 00 00 D1 CD 92 06 CB 45 CA 2C 36 2A 25 F1    .!.......E.,6*%.
010D20:  5E 23 56 EB 11 14 00 19 E5 CD 56 2D 01 12 00 11    ^#V.......V-....
010D30:  15 F1 C3 22 05 C3 26 49 01 1E 00 21 F7 F0 CD 08    ..."..&I...!....
010D40:  05 FD E1 E1 D1 C1 D9 21 07 F1 CD D1 05 E1 22 0D    .......!......".
010D50:  F1 FD E5 2A 0D F1 CD 3A 05 CD 4D 05 06 6E 6F 6D    ...*...:..M..nom
010D60:  62 72 65 CD 8D 06 CB 45 CA 8F 36 2A 0D F1 11 07    bre....E..6*....
010D70:  00 19 CD 3A 05 21 F9 F0 E5 21 F7 F0 CD F3 1E 21    ...:.!...!.....!
010D80:  F9 F0 CD 2C 05 D9 21 0F F1 CD D1 05 C3 C7 3F 2A    ...,..!.......?*
010D90:  0D F1 CD 3A 05 CD 4D 05 05 70 61 72 61 6D CD 8D    ...:..M..param..
010DA0:  06 CB 45 CA EB 36 2A 0D F1 11 07 00 19 CD 3A 05    ..E..6*.......:.
010DB0:  21 92 F2 E5 21 F7 F0 CD F4 1E 21 DC F1 E5 2A 92    !...!.....!...*.
010DC0:  F2 2B 29 29 E5 29 E5 29 E5 29 D1 19 D1 19 D1 19    .+)).).).)......
010DD0:  D1 19 E5 2A 98 F2 2B 29 5D 54 29 19 D1 19 CD 2C    ...*..+)]T)....,
010DE0:  05 D9 21 0F F1 CD D1 05 C3 C7 3F 2A 0D F1 CD 3A    ..!.......?*...:
010DF0:  05 CD 4D 05 06 76 61 72 69 61 62 CD 8D 06 CB 45    ..M..variab....E
010E00:  CA 13 37 21 07 F1 CD 2C 05 D9 21 0F F1 CD D1 05    ..7!...,..!.....
010E10:  C3 C7 3F 2A 0D F1 CD 3A 05 CD 4D 05 04 70 6C 75    ..?*...:..M..plu
010E20:  73 CD 8D 06 CB 45 CA 6D 37 2A 0D F1 11 14 00 19    s....E.m7*......
010E30:  5E 23 56 EB E5 21 07 F1 CD 2C 05 C5 D5 E5 CD 4D    ^#V..!...,.....M
010E40:  2D C5 D5 E5 2A 0D F1 11 12 00 19 5E 23 56 EB E5    -...*......^#V..
010E50:  21 07 F1 CD 2C 05 C5 D5 E5 CD 4D 2D D9 E1 D1 C1    !...,.....M-....
010E60:  CD E9 09 D9 21 0F F1 CD D1 05 C3 C7 3F 2A 0D F1    ....!.......?*..
010E70:  CD 3A 05 CD 4D 05 05 6D 6F 69 6E 73 CD 8D 06 CB    .:..M..moins....
010E80:  45 CA C8 37 2A 0D F1 11 14 00 19 5E 23 56 EB E5    E..7*......^#V..
010E90:  21 07 F1 CD 2C 05 C5 D5 E5 CD 4D 2D C5 D5 E5 2A    !...,.....M-...*
010EA0:  0D F1 11 12 00 19 5E 23 56 EB E5 21 07 F1 CD 2C    ......^#V..!...,
010EB0:  05 C5 D5 E5 CD 4D 2D D9 E1 D1 C1 CD F2 09 D9 21    .....M-........!
010EC0:  0F F1 CD D1 05 C3 C7 3F 2A 0D F1 CD 3A 05 CD 4D    .......?*...:..M
010ED0:  05 05 6D 75 6C 74 69 CD 8D 06 CB 45 CA 23 38 2A    ..multi....E.#8*
010EE0:  0D F1 11 14 00 19 5E 23 56 EB E5 21 07 F1 CD 2C    ......^#V..!...,
010EF0:  05 C5 D5 E5 CD 4D 2D C5 D5 E5 2A 0D F1 11 12 00    .....M-...*.....
010F00:  19 5E 23 56 EB E5 21 07 F1 CD 2C 05 C5 D5 E5 CD    .^#V..!...,.....
010F10:  4D 2D D9 E1 D1 C1 CD FA 09 D9 21 0F F1 CD D1 05    M-........!.....
010F20:  C3 C7 3F 2A 0D F1 CD 3A 05 CD 4D 05 05 70 75 69    ..?*...:..M..pui
010F30:  73 73 CD 8D 06 CB 45 CA 31 39 2A 0D F1 11 12 00    ss....E.19*.....
010F40:  19 5E 23 56 EB E5 21 07 F1 CD 2C 05 C5 D5 E5 CD    .^#V..!...,.....
010F50:  4D 2D CD 34 0C C5 D5 E5 21 00 00 CD 08 10 D9 E1    M-.4....!.......
010F60:  D1 C1 CD 88 06 CB 45 CA AD 38 2A 0D F1 11 14 00    ......E..8*.....
010F70:  19 5E 23 56 EB E5 21 07 F1 CD 2C 05 C5 D5 E5 CD    .^#V..!...,.....
010F80:  4D 2D C5 D5 E5 2A 0D F1 11 12 00 19 5E 23 56 EB    M-...*......^#V.
010F90:  E5 21 07 F1 CD 2C 05 C5 D5 E5 CD 4D 2D C5 D5 E5    .!...,.....M-...
010FA0:  CD 35 36 D9 21 0F F1 CD D1 05 C3 2E 39 2A 0D F1    .56.!.......9*..
010FB0:  11 14 00 19 5E 23 56 EB E5 21 07 F1 CD 2C 05 C5    ....^#V..!...,..
010FC0:  D5 E5 CD 4D 2D C5 D5 E5 21 00 00 CD 08 10 D9 E1    ...M-...!.......
010FD0:  D1 C1 CD C2 06 CB 45 CA E7 38 21 00 00 7D 32 C7    ......E..8!..}2.
010FE0:  F1 C3 C7 3F C3 2E 39 2A 0D F1 11 14 00 19 5E 23    ...?..9*......^#
010FF0:  56 EB E5 21 07 F1 CD 2C 05 C5 D5 E5 CD 4D 2D CD    V..!...,.....M-.
011000:  2B 0D C5 D5 E5 2A 0D F1 11 12 00 19 5E 23 56 EB    +....*......^#V.
011010:  E5 21 07 F1 CD 2C 05 C5 D5 E5 CD 4D 2D D9 E1 D1    .!...,.....M-...
011020:  C1 CD FA 09 CD B6 0D D9 21 0F F1 CD D1 05 C3 C7    ........!.......
011030:  3F 2A 0D F1 CD 3A 05 CD 4D 05 06 64 69 76 69 73    ?*...:..M..divis
011040:  65 CD 8D 06 CB 45 CA C7 39 2A 0D F1 11 12 00 19    e....E..9*......
011050:  5E 23 56 EB E5 21 07 F1 CD 2C 05 C5 D5 E5 CD 4D    ^#V..!...,.....M
011060:  2D C5 D5 E5 21 00 00 CD 08 10 D9 E1 D1 C1 CD 88    -...!...........
011070:  06 CB 45 CA 83 39 21 00 00 7D 32 C7 F1 C3 C7 3F    ..E..9!..}2....?
011080:  C3 C4 39 2A 0D F1 11 14 00 19 5E 23 56 EB E5 21    ..9*......^#V..!
011090:  07 F1 CD 2C 05 C5 D5 E5 CD 4D 2D C5 D5 E5 2A 0D    ...,.....M-...*.
0110A0:  F1 11 12 00 19 5E 23 56 EB E5 21 07 F1 CD 2C 05    .....^#V..!...,.
0110B0:  C5 D5 E5 CD 4D 2D D9 E1 D1 C1 CD FF 09 D9 21 0F    ....M-........!.
0110C0:  F1 CD D1 05 C3 C7 3F 2A 0D F1 CD 3A 05 CD 4D 05    ......?*...:..M.
0110D0:  05 69 64 66 63 74 CD 8D 06 CB 45 CA AA 3F 2A 0D    .idfct....E..?*.
0110E0:  F1 11 12 00 19 5E 23 56 EB E5 21 07 F1 CD 2C 05    .....^#V..!...,.
0110F0:  C5 D5 E5 CD 4D 2D D9 21 F9 F0 CD D1 05 2A 0D F1    ....M-.!.....*..
011100:  11 07 00 19 CD 3A 05 CD 4D 05 03 63 6F 73 CD 8D    .....:..M..cos..
011110:  06 CB 45 CA 29 3A 21 F9 F0 CD 2C 05 CD 7F 0C D9    ..E.):!...,.....
011120:  21 0F F1 CD D1 05 C3 A7 3F 2A 0D F1 11 07 00 19    !.......?*......
011130:  CD 3A 05 CD 4D 05 03 73 69 6E CD 8D 06 CB 45 CA    .:..M..sin....E.
011140:  55 3A 21 F9 F0 CD 2C 05 CD 87 0C D9 21 0F F1 CD    U:!...,.....!...
011150:  D1 05 C3 A7 3F 2A 0D F1 11 07 00 19 CD 3A 05 CD    ....?*.......:..
011160:  4D 05 04 74 61 6E 67 CD 8D 06 CB 45 CA C0 3A 21    M..tang....E..:!
011170:  F9 F0 CD 2C 05 CD 7F 0C C5 D5 E5 21 00 00 CD 08    ...,.......!....
011180:  10 D9 E1 D1 C1 CD 88 06 CB 45 CA 9A 3A 21 00 00    .........E..:!..
011190:  7D 32 C7 F1 C3 C7 3F C3 BD 3A 21 F9 F0 CD 2C 05    }2....?..:!...,.
0111A0:  CD 87 0C C5 D5 E5 21 F9 F0 CD 2C 05 CD 7F 0C D9    ......!...,.....
0111B0:  E1 D1 C1 CD FF 09 D9 21 0F F1 CD D1 05 C3 A7 3F    .......!.......?
0111C0:  2A 0D F1 11 07 00 19 CD 3A 05 CD 4D 05 03 69 6E    *.......:..M..in
0111D0:  74 CD 8D 06 CB 45 CA EC 3A 21 F9 F0 CD 2C 05 CD    t....E..:!...,..
0111E0:  FD 0B D9 21 0F F1 CD D1 05 C3 A7 3F 2A 0D F1 11    ...!.......?*...
0111F0:  07 00 19 CD 3A 05 CD 4D 05 03 61 62 73 CD 8D 06    ....:..M..abs...
011200:  CB 45 CA 17 3B 21 F9 F0 CD 2C 05 CB B8 D9 21 0F    .E..;!...,....!.
011210:  F1 CD D1 05 C3 A7 3F 2A 0D F1 11 07 00 19 CD 3A    ......?*.......:
011220:  05 CD 4D 05 06 61 72 63 74 61 6E CD 8D 06 CB 45    ..M..arctan....E
011230:  CA 46 3B 21 F9 F0 CD 2C 05 CD 46 0E D9 21 0F F1    .F;!...,..F..!..
011240:  CD D1 05 C3 A7 3F 2A 0D F1 11 07 00 19 CD 3A 05    .....?*.......:.
011250:  CD 4D 05 03 65 78 70 CD 8D 06 CB 45 CA 72 3B 21    .M..exp....E.r;!
011260:  F9 F0 CD 2C 05 CD B6 0D D9 21 0F F1 CD D1 05 C3    ...,.....!......
011270:  A7 3F 2A 0D F1 11 07 00 19 CD 3A 05 CD 4D 05 02    .?*.......:..M..
011280:  6C 6E CD 8D 06 CB 45 CA C5 3B 21 F9 F0 CD 2C 05    ln....E..;!...,.
011290:  C5 D5 E5 21 00 00 CD 08 10 D9 E1 D1 C1 CD C2 06    ...!............
0112A0:  CB 45 CA B2 3B 21 00 00 7D 32 C7 F1 C3 C7 3F C3    .E..;!..}2....?.
0112B0:  C2 3B 21 F9 F0 CD 2C 05 CD 2B 0D D9 21 0F F1 CD    .;!...,..+..!...
0112C0:  D1 05 C3 A7 3F 2A 0D F1 11 07 00 19 CD 3A 05 CD    ....?*.......:..
0112D0:  4D 05 04 73 71 72 74 CD 8D 06 CB 45 CA 1A 3C 21    M..sqrt....E..<!
0112E0:  F9 F0 CD 2C 05 C5 D5 E5 21 00 00 CD 08 10 D9 E1    ...,....!.......
0112F0:  D1 C1 CD E9 06 CB 45 CA 07 3C 21 00 00 7D 32 C7    ......E..<!..}2.
011300:  F1 C3 C7 3F C3 17 3C 21 F9 F0 CD 2C 05 CD 46 0C    ...?..<!...,..F.
011310:  D9 21 0F F1 CD D1 05 C3 A7 3F 2A 0D F1 11 07 00    .!.......?*.....
011320:  19 CD 3A 05 CD 4D 05 02 73 68 CD 8D 06 CB 45 CA    ..:..M..sh....E.
011330:  7B 3C 21 80 00 11 00 00 01 00 00 C5 D5 E5 21 F9    {<!...........!.
011340:  F0 CD 2C 05 CD B6 0D C5 D5 E5 21 F9 F0 CD 2C 05    ..,.......!...,.
011350:  C5 D5 E5 21 FF FF CD 08 10 D9 E1 D1 C1 CD FA 09    ...!............
011360:  CD B6 0D D9 E1 D1 C1 CD F2 09 D9 E1 D1 C1 CD FA    ................
011370:  09 D9 21 0F F1 CD D1 05 C3 A7 3F 2A 0D F1 11 07    ..!.......?*....
011380:  00 19 CD 3A 05 CD 4D 05 02 63 68 CD 8D 06 CB 45    ...:..M..ch....E
011390:  CA DC 3C 21 80 00 11 00 00 01 00 00 C5 D5 E5 21    ..<!...........!
0113A0:  F9 F0 CD 2C 05 CD B6 0D C5 D5 E5 21 F9 F0 CD 2C    ...,.......!...,
0113B0:  05 C5 D5 E5 21 FF FF CD 08 10 D9 E1 D1 C1 CD FA    ....!...........
0113C0:  09 CD B6 0D D9 E1 D1 C1 CD E9 09 D9 E1 D1 C1 CD    ................
0113D0:  FA 09 D9 21 0F F1 CD D1 05 C3 A7 3F 2A 0D F1 11    ...!.......?*...
0113E0:  07 00 19 CD 3A 05 CD 4D 05 02 74 68 CD 8D 06 CB    ....:..M..th....
0113F0:  45 CA 60 3D 21 F9 F0 CD 2C 05 CD B6 0D C5 D5 E5    E.`=!...,.......
011400:  21 F9 F0 CD 2C 05 C5 D5 E5 21 FF FF CD 08 10 D9    !...,....!......
011410:  E1 D1 C1 CD FA 09 CD B6 0D D9 E1 D1 C1 CD F2 09    ................
011420:  C5 D5 E5 21 F9 F0 CD 2C 05 CD B6 0D C5 D5 E5 21    ...!...,.......!
011430:  F9 F0 CD 2C 05 C5 D5 E5 21 FF FF CD 08 10 D9 E1    ...,....!.......
011440:  D1 C1 CD FA 09 CD B6 0D D9 E1 D1 C1 CD E9 09 D9    ................
011450:  E1 D1 C1 CD FF 09 D9 21 0F F1 CD D1 05 C3 A7 3F    .......!.......?
011460:  2A 0D F1 11 07 00 19 CD 3A 05 CD 4D 05 06 61 72    *.......:..M..ar
011470:  63 73 69 6E CD 8D 06 CB 45 CA 83 3E 21 F9 F0 CD    csin....E..>!...
011480:  2C 05 C5 D5 E5 21 FF FF CD 08 10 D9 E1 D1 C1 CD    ,....!..........
011490:  88 06 CB 45 CA BD 3D 21 80 00 11 00 00 01 00 80    ...E..=!........
0114A0:  C5 D5 E5 21 82 21 11 A2 DA 01 0F 49 D9 E1 D1 C1    ...!.!.....I....
0114B0:  CD FA 09 D9 21 0F F1 CD D1 05 C3 80 3E 21 F9 F0    ....!.......>!..
0114C0:  CD 2C 05 C5 D5 E5 21 01 00 CD 08 10 D9 E1 D1 C1    .,....!.........
0114D0:  CD 88 06 CB 45 CA FE 3D 21 80 00 11 00 00 01 00    ....E..=!.......
0114E0:  00 C5 D5 E5 21 82 21 11 A2 DA 01 0F 49 D9 E1 D1    ....!.!.....I...
0114F0:  C1 CD FA 09 D9 21 0F F1 CD D1 05 C3 80 3E 21 F9    .....!.......>!.
011500:  F0 CD 2C 05 C5 D5 E5 21 FF FF CD 08 10 D9 E1 D1    ..,....!........
011510:  C1 CD E9 06 E5 21 F9 F0 CD 2C 05 C5 D5 E5 21 01    .....!...,....!.
011520:  00 CD 08 10 D9 E1 D1 C1 CD D6 06 D1 7D B3 6F CB    ............}.o.
011530:  45 CA 41 3E 21 00 00 7D 32 C7 F1 C3 C7 3F C3 80    E.A>!..}2....?..
011540:  3E 21 F9 F0 CD 2C 05 C5 D5 E5 21 01 00 E5 21 F9    >!...,....!...!.
011550:  F0 CD 2C 05 C5 D5 E5 21 F9 F0 CD 2C 05 D9 E1 D1    ..,....!...,....
011560:  C1 CD FA 09 D9 E1 CD 08 10 CD F2 09 CD 46 0C D9    .............F..
011570:  E1 D1 C1 CD FF 09 CD 46 0E D9 21 0F F1 CD D1 05    .......F..!.....
011580:  C3 A7 3F 2A 0D F1 11 07 00 19 CD 3A 05 CD 4D 05    ..?*.......:..M.
011590:  06 61 72 63 63 6F 73 CD 8D 06 CB 45 CA A0 3F 21    .arccos....E..?!
0115A0:  F9 F0 CD 2C 05 C5 D5 E5 21 FF FF CD 08 10 D9 E1    ...,....!.......
0115B0:  D1 C1 CD 88 06 CB 45 CA CD 3E 21 82 21 11 A2 DA    ......E..>!.!...
0115C0:  01 0F 49 D9 21 0F F1 CD D1 05 C3 9D 3F 21 F9 F0    ..I.!.......?!..
0115D0:  CD 2C 05 C5 D5 E5 21 01 00 CD 08 10 D9 E1 D1 C1    .,....!.........
0115E0:  CD 88 06 CB 45 CA F8 3E 21 00 00 CD 08 10 D9 21    ....E..>!......!
0115F0:  0F F1 CD D1 05 C3 9D 3F 21 F9 F0 CD 2C 05 C5 D5    .......?!...,...
011600:  E5 21 FF FF CD 08 10 D9 E1 D1 C1 CD E9 06 E5 21    .!.............!
011610:  F9 F0 CD 2C 05 C5 D5 E5 21 01 00 CD 08 10 D9 E1    ...,....!.......
011620:  D1 C1 CD D6 06 D1 7D B3 6F CB 45 CA 3B 3F 21 00    ......}.o.E.;?!.
011630:  00 7D 32 C7 F1 C3 C7 3F C3 9D 3F 21 82 21 11 A2    .}2....?..?!.!..
011640:  DA 01 0F 49 C5 D5 E5 21 02 00 CD 08 10 D9 E1 D1    ...I...!........
011650:  C1 CD FF 09 C5 D5 E5 21 F9 F0 CD 2C 05 C5 D5 E5    .......!...,....
011660:  21 01 00 E5 21 F9 F0 CD 2C 05 C5 D5 E5 21 F9 F0    !...!...,....!..
011670:  CD 2C 05 D9 E1 D1 C1 CD FA 09 D9 E1 CD 08 10 CD    .,..............
011680:  F2 09 CD 46 0C D9 E1 D1 C1 CD FF 09 CD 46 0E D9    ...F.........F..
011690:  E1 D1 C1 CD F2 09 D9 21 0F F1 CD D1 05 C3 A7 3F    .......!.......?
0116A0:  21 0A 00 E5 CD 78 21 C3 C7 3F 2A 0D F1 E5 21 00    !....x!..?*...!.
0116B0:  00 D1 CD 7F 06 CB 45 CA C7 3F 21 00 00 CD 08 10    ......E..?!.....
0116C0:  D9 21 0F F1 CD D1 05 21 0F F1 CD 2C 05 D9 01 1E    .!.....!...,....
0116D0:  00 11 F7 F0 C3 22 05 01 0F 03 21 E8 ED CD 08 05    ....."....!.....
0116E0:  FD E1 E1 7D 32 F9 EF E1 22 FA EF FD E5 2A FA EF    ...}2..."....*..
0116F0:  CD 3A 05 CD 4D 05 05 69 64 66 63 74 CD 8D 06 CB    .:..M..idfct....
011700:  45 CA 45 40 2A FA EF 11 07 00 19 CD 3A 05 21 28    E.E@*.......:.!(
011710:  00 65 2E 01 E5 CD 3D 08 2A FA EF 11 12 00 19 5E    .e....=.*......^
011720:  23 56 EB E5 2A F9 EF 26 00 E5 CD 53 2D CD 3D 08    #V..*..&...S-.=.
011730:  21 29 00 65 2E 01 E5 CD 3D 08 06 FA 21 FC EF CD    !).e....=...!...
011740:  E2 05 C3 0F 44 2A FA EF CD 3A 05 CD 4D 05 06 6E    ....D*...:..M..n
011750:  6F 6D 62 72 65 CD 8D 06 CB 45 CA 72 40 2A FA EF    ombre....E.r@*..
011760:  11 07 00 19 CD 3A 05 06 FA 21 FC EF CD E2 05 C3    .....:...!......
011770:  0F 44 2A FA EF CD 3A 05 CD 4D 05 05 70 61 72 61    .D*...:..M..para
011780:  6D CD 8D 06 CB 45 CA B1 40 CD 4D 05 02 70 28 2A    m....E..@.M..p(*
011790:  FA EF 11 07 00 19 CD 3A 05 CD 3D 08 21 29 00 65    .......:..=.!).e
0117A0:  2E 01 E5 CD 3D 08 06 FA 21 FC EF CD E2 05 C3 0F    ....=...!.......
0117B0:  44 2A FA EF CD 3A 05 CD 4D 05 06 76 61 72 69 61    D*...:..M..varia
0117C0:  62 CD 8D 06 CB 45 CA DD 40 2A F9 EF 26 00 65 2E    b....E..@*..&.e.
0117D0:  01 E5 06 FA 21 FC EF CD E2 05 C3 0F 44 2A FA EF    ....!.......D*..
0117E0:  CD 3A 05 CD 4D 05 04 70 6C 75 73 CD 8D 06 E5 2A    .:..M..plus....*
0117F0:  FA EF CD 3A 05 CD 4D 05 05 6D 6F 69 6E 73 CD 8D    ...:..M..moins..
011800:  06 D1 7D B3 6F CB 45 CA 78 43 2A FA EF 11 12 00    ..}.o.E.xC*.....
011810:  19 5E 23 56 EB E5 2A F9 EF 26 00 E5 CD 53 2D 06    .^#V..*..&...S-.
011820:  FA 21 F6 EE CD E2 05 2A FA EF 11 14 00 19 5E 23    .!.....*......^#
011830:  56 EB E5 2A F9 EF 26 00 E5 CD 53 2D 06 FA 21 FB    V..*..&...S-..!.
011840:  ED CD E2 05 2A FA EF 11 12 00 19 5E 23 56 EB 11    ....*......^#V..
011850:  07 00 19 CD 3A 05 21 2B 00 65 2E 01 E5 CD 8D 06    ....:.!+.e......
011860:  E5 2A FA EF 11 12 00 19 5E 23 56 EB 11 07 00 19    .*......^#V.....
011870:  CD 3A 05 21 2D 00 65 2E 01 E5 CD 8D 06 D1 7D B3    .:.!-.e.......}.
011880:  6F E5 2A FA EF 11 07 00 19 CD 3A 05 21 2B 00 65    o.*.......:.!+.e
011890:  2E 01 E5 CD 8D 06 D1 7D A3 6F CB 45 CA C1 41 21    .......}£o.E..A!
0118A0:  F6 EE E5 21 01 00 E5 21 01 00 CD F3 08 21 F6 EE    ...!...!.....!..
0118B0:  E5 21 F6 EE CD 3A 05 CD A3 08 E5 21 01 00 CD F3    .!...:..£..!....
0118C0:  08 2A FA EF 11 14 00 19 5E 23 56 EB 11 07 00 19    .*......^#V.....
0118D0:  CD 3A 05 21 2B 00 65 2E 01 E5 CD 8D 06 E5 2A FA    .:.!+.e.......*.
0118E0:  EF 11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05    .....^#V......:.
0118F0:  21 2D 00 65 2E 01 E5 CD 8D 06 D1 7D B3 6F CB 45    !-.e.......}.o.E
011900:  CA 25 42 21 FB ED E5 21 01 00 E5 21 01 00 CD F3    .%B!...!...!....
011910:  08 21 FB ED E5 21 FB ED CD 3A 05 CD A3 08 E5 21    .!...!...:..£..!
011920:  01 00 CD F3 08 21 01 00 CD 08 10 D9 21 F5 ED CD    .....!......!...
011930:  D1 05 2A FA EF 11 12 00 19 5E 23 56 EB CD 3A 05    ..*......^#V..:.
011940:  CD 4D 05 06 6E 6F 6D 62 72 65 CD 8D 06 CB 45 CA    .M..nombre....E.
011950:  6E 42 2A FA EF 11 12 00 19 5E 23 56 EB 11 07 00    nB*......^#V....
011960:  19 CD 3A 05 21 F5 ED E5 21 F3 ED CD F3 1E 2A FA    ..:.!...!.....*.
011970:  EF 11 12 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05    .....^#V......:.
011980:  21 2A 00 65 2E 01 E5 CD 8D 06 E5 2A FA EF 11 12    !*.e.......*....
011990:  00 19 5E 23 56 EB 11 14 00 19 5E 23 56 EB CD 3A    ..^#V.....^#V..:
0119A0:  05 CD 4D 05 06 6E 6F 6D 62 72 65 CD 8D 06 D1 7D    ..M..nombre....}
0119B0:  A3 6F CB 45 CA DB 42 2A FA EF 11 12 00 19 5E 23    £o.E..B*......^#
0119C0:  56 EB 11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A    V.....^#V......:
0119D0:  05 21 F5 ED E5 21 F3 ED CD F3 1E 2A FA EF 11 07    .!...!.....*....
0119E0:  00 19 CD 3A 05 21 2B 00 65 2E 01 E5 CD 8D 06 E5    ...:.!+.e.......
0119F0:  21 F5 ED CD 2C 05 C5 D5 E5 21 00 00 CD 08 10 D9    !...,....!......
011A00:  E1 D1 C1 CD E9 06 D1 7D A3 6F CB 45 CA 3D 43 21    .......}£o.E.=C!
011A10:  28 00 E5 21 FB ED CD 3A 05 CD A2 09 CD 3D 08 21    (..!...:.....=.!
011A20:  F6 EE CD 3A 05 CD 3D 08 21 29 00 65 2E 01 E5 CD    ...:..=.!).e....
011A30:  3D 08 06 FA 21 FC EF CD E2 05 C3 75 43 21 28 00    =...!......uC!(.
011A40:  E5 21 FB ED CD 3A 05 CD A2 09 CD 3D 08 2A FA EF    .!...:.....=.*..
011A50:  11 07 00 19 CD 3A 05 CD 3D 08 21 F6 EE CD 3A 05    .....:..=.!...:.
011A60:  CD 3D 08 21 29 00 65 2E 01 E5 CD 3D 08 06 FA 21    .=.!).e....=...!
011A70:  FC EF CD E2 05 C3 0F 44 2A FA EF CD 3A 05 CD 4D    .......D*...:..M
011A80:  05 06 64 69 76 69 73 65 CD 8D 06 E5 2A FA EF CD    ..divise....*...
011A90:  3A 05 CD 4D 05 05 6D 75 6C 74 69 CD 8D 06 D1 7D    :..M..multi....}
011AA0:  B3 6F E5 2A FA EF CD 3A 05 CD 4D 05 05 70 75 69    .o.*...:..M..pui
011AB0:  73 73 CD 8D 06 D1 7D B3 6F CB 45 CA 03 44 2A FA    ss....}.o.E..D*.
011AC0:  EF 11 14 00 19 5E 23 56 EB E5 2A F9 EF 26 00 E5    .....^#V..*..&..
011AD0:  CD 53 2D 2A FA EF 11 07 00 19 CD 3A 05 CD 3D 08    .S-*.......:..=.
011AE0:  2A FA EF 11 12 00 19 5E 23 56 EB E5 2A F9 EF 26    *......^#V..*..&
011AF0:  00 E5 CD 53 2D CD 3D 08 06 FA 21 FC EF CD E2 05    ...S-.=...!.....
011B00:  C3 0F 44 CD 4D 05 00 06 FA 21 FC EF CD E2 05 FD    ..D.M....!......
011B10:  E1 21 FC EF CD 3A 05 FD E5 01 0F 03 11 E8 ED C3    .!...:..........
011B20:  22 05 01 1A 00 21 CE ED CD 08 05 FD E1 E1 22 E4    "....!........".
011B30:  ED FD E5 2A E4 ED 5E 23 56 EB 11 07 00 19 CD 3A    ...*..^#V......:
011B40:  05 21 2A 00 65 2E 01 E5 CD 8D 06 E5 2A E4 ED 5E    .!*.e.......*..^
011B50:  23 56 EB 11 14 00 19 5E 23 56 EB CD 3A 05 CD 4D    #V.....^#V..:..M
011B60:  05 06 6E 6F 6D 62 72 65 CD 8D 06 D1 7D A3 6F CB    ..nombre....}£o.
011B70:  45 CA E4 44 21 DA ED E5 21 16 00 CD E5 1C CD 4D    E..D!...!......M
011B80:  05 05 6D 75 6C 74 69 06 06 2A DA ED CD E2 05 2A    ..multi..*.....*
011B90:  DA ED 11 07 00 19 E5 21 2A 00 65 2E 01 E5 06 0A    .......!*.e.....
011BA0:  CD 01 06 2A DA ED 11 12 00 19 E5 2A E4 ED 5E 23    ...*.......*..^#
011BB0:  56 EB 11 12 00 19 5E 23 56 EB EB E1 73 23 72 2A    V.....^#V...s#r*
011BC0:  DA ED 11 14 00 19 E5 2A E4 ED 5E 23 56 EB 11 14    .......*..^#V...
011BD0:  00 19 E5 CD 50 2D EB E1 73 23 72 2A DA ED 22 E6    ....P-..s#r*..".
011BE0:  ED C3 19 49 2A E4 ED 5E 23 56 EB 11 07 00 19 CD    ...I*..^#V......
011BF0:  3A 05 21 2A 00 65 2E 01 E5 CD 8D 06 E5 2A E4 ED    :.!*.e.......*..
011C00:  66 75 6E 63 74 69 6F 6E 20 63 61 6C 63 75 6C 28    function calcul(
011C10:  66 3A 66 6F 6E 63 74 69 6F 6E 3B 78 3A 72 65 61    f:fonction;x:rea
011C20:  6C 29 3A 72 65 61 6C 3B 0D 0A 66 6F 72 77 61 72    l):real;..forwar
011C30:  64 3B 0D 0A 0D 0A 66 75 6E 63 74 69 6F 6E 20 6F    d;....function o
011C40:  70 70 6F 73 65 28 76 61 72 20 66 3A 66 6F 6E 63    ppose(var f:fonc
011C50:  74 69 6F 6E 29 3A 66 6F 6E 63 74 69 6F 6E 3B 0D    tion):fonction;.
011C60:  0A 66 6F 72 77 61 72 64 3B 0D 0A 0D 0A 66 75 6E    .forward;....fun
011C70:  63 74 69 6F 6E 20 20 74 61 70 65 66 6F 6E 63 74    ction  tapefonct
011C80:  69 6F 6E 28 66 3A 66 6F 6E 63 74 69 6F 6E 3B 76    ion(f:fonction;v
011C90:  3A 63 68 61 72 29 3A 73 74 72 32 30 30 3B 0D 0A    :char):str200;..
011CA0:  66 6F 72 77 61 72 64 3B 0D 0A 0D 0A 70 72 6F 63    forward;....proc
011CB0:  65 64 75 72 65 20 73 69 6D 70 6C 69 66 28 76 61    edure simplif(va
011CC0:  72 20 66 3A 66 6F 6E 63 74 69 6F 6E 29 3B 0D 0A    r f:fonction);..
011CD0:  76 61 72 20 68 3A 66 6F 6E 63 74 69 6F 6E 3B 6E    var h:fonction;n
011CE0:  62 72 65 3A 72 65 61 6C 3B 0D 0A 62 65 67 69 6E    bre:real;..begin
011CF0:  0D 0A 69 66 20 66 3C 3E 6E 69 6C 20 74 68 65 6E    ..if f<>nil then
011D00:  0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 20 69 66    ..  begin..   if
011D10:  20 28 28 66 5E 2E 64 5E 2E 6E 61 74 75 72 65 3D     ((f^.d^.nature=
011D20:  27 6E 6F 6D 62 72 65 27 29 61 6E 64 28 66 5E 2E    'nombre')and(f^.
011D30:  67 5E 2E 6E 61 74 75 72 65 3D 27 6E 6F 6D 62 72    g^.nature='nombr
011D40:  65 27 29 61 6E 64 28 66 5E 2E 76 61 6C 65 75 72    e')and(f^.valeur
011D50:  3C 3E 27 2F 27 29 29 0D 0A 20 20 20 20 74 68 65    <>'/'))..    the
011D60:  6E 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20    n     begin..   
011D70:  20 20 20 20 20 20 6E 62 72 65 3A 3D 63 61 6C 63          nbre:=calc
011D80:  75 6C 28 66 2C 30 29 3B 69 66 20 66 72 61 63 28    ul(f,0);if frac(
011D90:  6E 62 72 65 29 3D 30 20 74 68 65 6E 20 73 74 72    nbre)=0 then str
011DA0:  28 72 6F 75 6E 64 28 6E 62 72 65 29 2C 66 5E 2E    (round(nbre),f^.
011DB0:  76 61 6C 65 75 72 29 0D 0A 20 20 20 20 20 20 65    valeur)..      e
011DC0:  6C 73 65 0D 0A 20 20 20 20 20 20 62 65 67 69 6E    lse..      begin
011DD0:  0D 0A 20 20 20 20 20 20 73 74 72 28 6E 62 72 65    ..      str(nbre
011DE0:  3A 38 3A 33 2C 66 5E 2E 76 61 6C 65 75 72 29 3B    :8:3,f^.valeur);
011DF0:  0D 0A 20 20 20 20 20 20 77 68 69 6C 65 20 70 6F    ..      while po
011E00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
011E10:  0F 00 00 00 02 09 4E E5 0F 00 41 02 00 00 00 02    ......N...A.....
011E20:  0F 00 42 02 00 00 00 02 0F 00 43 02 00 00 00 02    ..B.......C.....
011E30:  0F 00 44 02 00 00 00 02 0F 00 45 02 00 00 00 02    ..D.......E.....
011E40:  0F 00 46 02 00 00 00 02 0F 00 47 02 00 00 00 02    ..F.......G.....
011E50:  0F 00 48 02 00 00 00 02 0F 00 49 02 00 00 00 02    ..H.......I.....
011E60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011E70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011E80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011E90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011EA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011EB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011EC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011ED0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011EE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011EF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011F00:  73 28 27 20 27 2C 66 5E 2E 76 61 6C 65 75 72 29    s(' ',f^.valeur)
011F10:  3C 3E 30 20 64 6F 20 64 65 6C 65 74 65 28 66 5E    <>0 do delete(f^
011F20:  2E 76 61 6C 65 75 72 2C 31 2C 31 29 3B 0D 0A 20    .valeur,1,1);.. 
011F30:  20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20         end;..     
011F40:  20 66 5E 2E 6E 61 74 75 72 65 3A 3D 27 6E 6F 6D     f^.nature:='nom
011F50:  62 72 65 27 3B 0D 0A 20 20 20 20 20 20 66 5E 2E    bre';..      f^.
011F60:  67 3A 3D 6E 69 6C 3B 66 5E 2E 64 3A 3D 6E 69 6C    g:=nil;f^.d:=nil
011F70:  3B 72 65 73 75 6C 74 3A 3D 31 3B 0D 0A 20 20 20    ;result:=1;..   
011F80:  20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20         end..      
011F90:  20 20 65 6C 73 65 0D 0A 20 20 20 69 66 20 28 28      else..   if ((
011FA0:  66 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20 61    f^.valeur='*') a
011FB0:  6E 64 20 28 66 5E 2E 64 5E 2E 6E 61 74 75 72 65    nd (f^.d^.nature
011FC0:  3D 27 6E 6F 6D 62 72 65 27 29 20 61 6E 64 20 28    ='nombre') and (
011FD0:  66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 31 27    f^.d^.valeur='1'
011FE0:  29 29 0D 0A 20 20 20 20 20 20 20 20 20 20 20 74    ))..           t
011FF0:  68 65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20    hen begin..     
012000:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
012010:  66 3A 3D 66 5E 2E 67 3B 0D 0A 20 20 20 20 20 20    f:=f^.g;..      
012020:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73                   s
012030:  69 6D 70 6C 69 66 28 66 29 3B 72 65 73 75 6C 74    implif(f);result
012040:  3A 3D 31 0D 0A 20 20 20 20 20 20 20 20 20 20 20    :=1..           
012050:  20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20          end..     
012060:  20 20 65 6C 73 65 0D 0A 20 20 20 69 66 20 28 28      else..   if ((
012070:  66 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20 61    f^.valeur='*') a
012080:  6E 64 20 28 66 5E 2E 67 5E 2E 6E 61 74 75 72 65    nd (f^.g^.nature
012090:  3D 27 6E 6F 6D 62 72 65 27 29 20 61 6E 64 20 28    ='nombre') and (
0120A0:  66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D 27 31 27    f^.g^.valeur='1'
0120B0:  29 29 0D 0A 20 20 20 20 20 20 20 20 20 20 20 74    ))..           t
0120C0:  68 65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20    hen begin..     
0120D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0120E0:  66 3A 3D 66 5E 2E 64 3B 0D 0A 20 20 20 20 20 20    f:=f^.d;..      
0120F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73                   s
012100:  69 6D 70 6C 69 66 28 66 29 3B 72 65 73 75 6C 74    implif(f);result
012110:  3A 3D 31 0D 0A 20 20 20 20 20 20 20 20 20 20 20    :=1..           
012120:  20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20          end..     
012130:  20 20 65 6C 73 65 0D 0A 20 20 20 69 66 20 28 28      else..   if ((
012140:  28 66 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20    (f^.valeur='*') 
012150:  6F 72 28 66 5E 2E 76 61 6C 65 75 72 3D 27 2F 27    or(f^.valeur='/'
012160:  29 29 61 6E 64 20 28 28 28 66 5E 2E 67 5E 2E 6E    ))and (((f^.g^.n
012170:  61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 29 0D    ature='nombre').
012180:  0A 20 20 20 20 61 6E 64 20 28 66 5E 2E 67 5E 2E    .    and (f^.g^.
012190:  76 61 6C 65 75 72 3D 27 30 27 29 29 20 6F 72 20    valeur='0')) or 
0121A0:  28 66 5E 2E 67 3D 6E 69 6C 29 29 29 0D 0A 20 20    (f^.g=nil)))..  
0121B0:  20 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20      then..        
0121C0:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20      begin..       
0121D0:  20 20 20 20 20 20 20 66 3A 3D 6E 69 6C 3B 72 65           f:=nil;re
0121E0:  73 75 6C 74 3A 3D 31 3B 0D 0A 20 20 20 20 20 20    sult:=1;..      
0121F0:  20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20         end..      
012200:  20 65 6C 73 65 0D 0A 20 20 20 69 66 20 28 28 66     else..   if ((f
012210:  5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20 61 6E    ^.valeur='*') an
012220:  64 20 28 28 28 66 5E 2E 64 5E 2E 6E 61 74 75 72    d (((f^.d^.natur
012230:  65 3D 27 6E 6F 6D 62 72 65 27 29 20 61 6E 64 20    e='nombre') and 
012240:  28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 30    (f^.d^.valeur='0
012250:  27 29 29 0D 0A 20 20 20 6F 72 20 28 66 5E 2E 64    '))..   or (f^.d
012260:  3D 6E 69 6C 29 29 29 20 74 68 65 6E 0D 0A 20 20    =nil))) then..  
012270:  20 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20            begin.. 
012280:  20 20 20 20 20 20 20 20 20 20 20 20 20 66 3A 3D                 f:=
012290:  6E 69 6C 3B 72 65 73 75 6C 74 3A 3D 31 3B 0D 0A    nil;result:=1;..
0122A0:  20 20 20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A               end..
0122B0:  20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20           else..   
0122C0:  69 66 20 28 28 66 5E 2E 76 61 6C 65 75 72 3D 27    if ((f^.valeur='
0122D0:  2A 27 29 20 61 6E 64 20 28 66 5E 2E 67 5E 2E 6E    *') and (f^.g^.n
0122E0:  61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 29 20    ature='nombre') 
0122F0:  61 6E 64 20 28 66 5E 2E 64 5E 2E 76 61 6C 65 75    and (f^.d^.valeu
012300:  72 3D 27 2A 27 29 0D 0A 20 20 20 61 6E 64 20 28    r='*')..   and (
012310:  66 5E 2E 64 5E 2E 67 5E 2E 6E 61 74 75 72 65 3D    f^.d^.g^.nature=
012320:  27 6E 6F 6D 62 72 65 27 29 29 0D 0A 20 20 20 74    'nombre'))..   t
012330:  68 65 6E 20 62 65 67 69 6E 20 68 3A 3D 66 5E 2E    hen begin h:=f^.
012340:  64 3B 66 5E 2E 64 3A 3D 66 5E 2E 67 3B 66 5E 2E    d;f^.d:=f^.g;f^.
012350:  67 3A 3D 68 3B 0D 0A 20 20 20 20 20 20 20 20 20    g:=h;..         
012360:  20 20 20 20 20 68 3A 3D 66 5E 2E 67 5E 2E 64 3B         h:=f^.g^.d;
012370:  66 5E 2E 67 5E 2E 64 3A 3D 66 5E 2E 64 3B 66 5E    f^.g^.d:=f^.d;f^
012380:  2E 64 3A 3D 68 3B 73 69 6D 70 6C 69 66 28 66 5E    .d:=h;simplif(f^
012390:  2E 64 29 3B 73 69 6D 70 6C 69 66 28 66 29 3B 0D    .d);simplif(f);.
0123A0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72    .              r
0123B0:  65 73 75 6C 74 3A 3D 31 0D 0A 20 20 20 20 20 20    esult:=1..      
0123C0:  20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 65 6C      end..       el
0123D0:  73 65 0D 0A 20 20 69 66 20 28 28 28 66 5E 2E 6E    se..  if (((f^.n
0123E0:  61 74 75 72 65 3D 27 70 6C 75 73 27 29 20 6F 72    ature='plus') or
0123F0:  20 28 66 5E 2E 6E 61 74 75 72 65 3D 27 6D 6F 69     (f^.nature='moi
012400:  6E 73 27 29 29 20 61 6E 64 20 28 28 66 5E 2E 64    ns')) and ((f^.d
012410:  3D 6E 69 6C 29 0D 0A 20 20 6F 72 20 28 66 5E 2E    =nil)..  or (f^.
012420:  64 5E 2E 76 61 6C 65 75 72 3D 27 30 27 29 29 29    d^.valeur='0')))
012430:  0D 0A 20 20 74 68 65 6E 0D 0A 20 20 20 20 62 65    ..  then..    be
012440:  67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 66    gin..          f
012450:  3A 3D 66 5E 2E 67 3B 0D 0A 20 20 20 20 20 20 20    :=f^.g;..       
012460:  20 20 20 73 69 6D 70 6C 69 66 28 66 29 3B 72 65       simplif(f);re
012470:  73 75 6C 74 3A 3D 31 0D 0A 20 20 20 20 65 6E 64    sult:=1..    end
012480:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
012490:  20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20            else..  
0124A0:  20 20 69 66 20 28 28 28 66 5E 2E 6E 61 74 75 72      if (((f^.natur
0124B0:  65 3D 27 70 6C 75 73 27 29 20 6F 72 20 28 66 5E    e='plus') or (f^
0124C0:  2E 6E 61 74 75 72 65 3D 27 6D 6F 69 6E 73 27 29    .nature='moins')
0124D0:  29 20 61 6E 64 0D 0A 20 20 20 20 20 28 28 66 5E    ) and..     ((f^
0124E0:  2E 67 3D 6E 69 6C 29 20 6F 72 20 28 66 5E 2E 67    .g=nil) or (f^.g
0124F0:  5E 2E 76 61 6C 65 75 72 3D 27 30 27 29 29 29 0D    ^.valeur='0'))).
012500:  00 00 00 00 EF FF 03 00 00 00 40 FE FF FF 07 00    ..........@.....
012510:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 C3    ................
012520:  69 2C 01 0A 00 21 9B F1 CD 08 05 FD E1 E1 22 A3    i,...!........"£
012530:  F1 FD E5 2A A3 F1 5E 23 56 EB E5 21 00 00 D1 CD    ...*£.^#V..!....
012540:  92 06 CB 45 CA 6E 21 2A A3 F1 E5 21 16 00 CD 7A    ...E.n!*£..!...z
012550:  1D 21 00 00 EB 2A A3 F1 73 23 72 21 B2 F1 E5 2A    .!...*£.s#r!...*
012560:  96 F2 29 D1 19 E5 21 00 00 EB E1 73 23 72 01 0A    ..)...!....s#r..
012570:  00 11 9B F1 C3 22 05 01 0A 00 21 91 F1 CD 08 05    ....."....!.....
012580:  FD E1 E1 22 99 F1 FD E5 CD 9B 14 CD CD 17 CD 1B    ..."............
012590:  20 CD 9B 14 CD BA 17 1F 45 72 72 65 75 72 20 64     .......Erreur d
0125A0:  65 20 73 79 6E 74 61 78 65 20 61 20 6C 27 65 6E    e syntaxe a l'en
0125B0:  74 72 65 65 20 6E 2E CD 1B 20 2A 99 F1 CD 9B 14    tree n... *.....
0125C0:  E5 21 00 00 CD 26 17 CD CD 17 CD 1B 20 21 A4 F2    .!...&...... !..
0125D0:  E5 2A 96 F2 29 D1 19 E5 CD 22 21 21 A4 F2 E5 2A    .*..)...."!!...*
0125E0:  96 F2 29 D1 19 E5 CD 1F 21 01 0A 00 11 91 F1 C3    ..).....!.......
0125F0:  22 05 01 08 00 21 89 F1 CD 08 05 21 BA 00 CD A9    "....!.....!....
012600:  14 21 A3 F2 CD 44 16 CD 1B 20 2A A3 F2 26 00 E5    .!£..D... *£.&..
012610:  21 FF 20 01 20 00 CD 5D 05 CD 4F 13 E5 2A A3 F2    !. . ..]..O..*£.
012620:  26 00 E5 21 0D 00 D1 CD 7F 06 D1 7D B3 6F CB 45    &..!.......}.o.E
012630:  CA FB 21 2A A3 F2 26 00 CD 9B 14 CD 22 17 CD 1B    ..!*£.&....."...
012640:  20 01 08 00 11 89 F1 C3 22 05 01 08 00 21 81 F1     ......."....!..
012650:  CD 08 05 CD F2 21 2A A3 F2 26 00 65 2E 01 E5 06    .....!*£.&.e....
012660:  0A 21 98 F2 CD E2 05 2A A3 F2 26 00 E5 CD 81 05    .!.....*£.&.....
012670:  21 30 00 E5 21 39 00 CD 9B 05 CD 4F 13 E5 21 98    !0..!9.....O..!.
012680:  F2 CD 3A 05 CD A3 08 E5 21 06 00 D1 CD E0 06 D1    ..:..£..!.......
012690:  7D A3 6F CB 45 CA B8 22 CD F2 21 21 98 F2 CD 3A    }£o.E.."..!!...:
0126A0:  05 2A A3 F2 26 00 65 2E 01 E5 CD 3D 08 06 0A 21    .*£.&.e....=...!
0126B0:  98 F2 CD E2 05 C3 67 22 21 98 F2 CD 3A 05 21 01    ......g"!...:.!.
0126C0:  00 E5 21 98 F2 CD 3A 05 CD A3 08 E5 21 01 00 D1    ..!...:..£..!...
0126D0:  EB B7 ED 52 CD 6B 08 06 0A 21 98 F2 CD E2 05 01    ...R.k...!......
0126E0:  08 00 11 81 F1 C3 22 05 01 0C 00 21 75 F1 CD 08    ......"....!u...
0126F0:  05 FD E1 E1 22 7F F1 FD E5 CD F2 21 2A A3 F2 26    ...."......!*£.&
012700:  00 E5 21 28 00 D1 CD 92 06 CB 45 CA 18 23 21 01    ..!(......E..#!.
012710:  00 E5 CD 77 21 C3 CA 23 CD 4A 22 2A A3 F2 26 00    ...w!..#.J"*£.&.
012720:  E5 21 29 00 D1 CD 92 06 CB 45 CA 37 23 21 02 00    .!)......E.7#!..
012730:  E5 CD 77 21 C3 CA 23 2A 7F F1 5E 23 56 EB E5 CD    ..w!..#*..^#V...
012740:  4D 05 05 70 61 72 61 6D 06 06 CD 01 06 2A 7F F1    M..param.....*..
012750:  5E 23 56 EB 11 07 00 19 E5 21 98 F2 CD 3A 05 06    ^#V......!...:..
012760:  0A CD 01 06 2A 7F F1 5E 23 56 EB 11 12 00 19 E5    ....*..^#V......
012770:  21 00 00 EB E1 73 23 72 2A 7F F1 5E 23 56 EB 11    !....s#r*..^#V..
012780:  14 00 19 E5 21 00 00 EB E1 73 23 72 21 98 F2 CD    ....!....s#r!...
012790:  3A 05 21 75 F1 E5 21 92 F2 CD F4 1E 21 B2 F1 E5    :.!u..!.....!...
0127A0:  2A 96 F2 29 D1 19 5E 23 56 EB E5 2A 75 F1 D1 CD    *..)..^#V..*u...
0127B0:  E0 06 CB 45 CA CA 23 21 B2 F1 E5 2A 96 F2 29 D1    ...E..#!...*..).
0127C0:  19 E5 2A 75 F1 EB E1 73 23 72 CD F2 21 01 0C 00    ..*u...s#r..!...
0127D0:  11 75 F1 C3 22 05 01 0A 00 21 6B F1 CD 08 05 FD    .u.."....!k.....
0127E0:  E1 E1 22 73 F1 FD E5 2A 73 F1 5E 23 56 EB E5 CD    .."s...*s.^#V...
0127F0:  4D 05 06 76 61 72 69 61 62 06 06 CD 01 06 2A 73    M..variab.....*s
012800:  F1 5E 23 56 EB 11 07 00 19 E5 21 78 00 65 2E 01    .^#V......!x.e..
012810:  E5 06 0A CD 01 06 2A 73 F1 5E 23 56 EB 11 12 00    ......*s.^#V....
012820:  19 E5 21 00 00 EB E1 73 23 72 2A 73 F1 5E 23 56    ..!....s#r*s.^#V
012830:  EB 11 14 00 19 E5 21 00 00 EB E1 73 23 72 CD F2    ......!....s#r..
012840:  21 01 0A 00 11 6B F1 C3 22 05 C3 C6 2A 01 0A 00    !....k.."...*...
012850:  21 61 F1 CD 08 05 FD E1 E1 22 69 F1 FD E5 2A A3    !a......."i...*£
012860:  F2 26 00 65 2E 01 E5 06 0A 21 98 F2 CD E2 05 2A    .&.e.....!.....*
012870:  A3 F2 26 00 E5 CD 81 05 21 61 00 E5 21 7A 00 CD    £.&.....!a..!z..
012880:  9B 05 CD 4F 13 E5 21 98 F2 CD 3A 05 CD A3 08 E5    ...O..!...:..£..
012890:  21 07 00 D1 CD E0 06 D1 7D A3 6F CB 45 CA C0 24    !.......}£o.E..$
0128A0:  CD F2 21 21 98 F2 CD 3A 05 2A A3 F2 26 00 65 2E    ..!!...:.*£.&.e.
0128B0:  01 E5 CD 3D 08 06 0A 21 98 F2 CD E2 05 C3 6F 24    ...=...!......o$
0128C0:  21 98 F2 CD 3A 05 21 01 00 E5 21 98 F2 CD 3A 05    !...:.!...!...:.
0128D0:  CD A3 08 E5 21 01 00 D1 EB B7 ED 52 CD 6B 08 06    .£..!......R.k..
0128E0:  0A 21 98 F2 CD E2 05 21 98 F2 CD 3A 05 CD 4D 05    .!.....!...:..M.
0128F0:  03 73 69 6E CD 8D 06 E5 21 98 F2 CD 3A 05 CD 4D    .sin....!...:..M
012900:  05 03 63 6F 73 CD 8D 06 D1 7D B3 6F E5 21 98 F2    ..cos....}.o.!..
012910:  CD 3A 05 CD 4D 05 04 74 61 6E 67 CD 8D 06 D1 7D    .:..M..tang....}
012920:  B3 6F E5 21 98 F2 CD 3A 05 CD 4D 05 03 65 78 70    .o.!...:..M..exp
012930:  CD 8D 06 D1 7D B3 6F E5 21 98 F2 CD 3A 05 CD 4D    ....}.o.!...:..M
012940:  05 02 6C 6E CD 8D 06 D1 7D B3 6F E5 21 98 F2 CD    ..ln....}.o.!...
012950:  3A 05 CD 4D 05 06 61 72 63 74 61 6E CD 8D 06 D1    :..M..arctan....
012960:  7D B3 6F E5 21 98 F2 CD 3A 05 CD 4D 05 03 69 6E    }.o.!...:..M..in
012970:  74 CD 8D 06 D1 7D B3 6F E5 21 98 F2 CD 3A 05 CD    t....}.o.!...:..
012980:  4D 05 03 61 62 73 CD 8D 06 D1 7D B3 6F E5 21 98    M..abs....}.o.!.
012990:  F2 CD 3A 05 CD 4D 05 04 73 71 72 74 CD 8D 06 D1    ..:..M..sqrt....
0129A0:  7D B3 6F E5 21 98 F2 CD 3A 05 CD 4D 05 02 73 68    }.o.!...:..M..sh
0129B0:  CD 8D 06 D1 7D B3 6F E5 21 98 F2 CD 3A 05 CD 4D    ....}.o.!...:..M
0129C0:  05 02 63 68 CD 8D 06 D1 7D B3 6F E5 21 98 F2 CD    ..ch....}.o.!...
0129D0:  3A 05 CD 4D 05 02 74 68 CD 8D 06 D1 7D B3 6F E5    :..M..th....}.o.
0129E0:  21 98 F2 CD 3A 05 CD 4D 05 06 61 72 63 73 69 6E    !...:..M..arcsin
0129F0:  CD 8D 06 D1 7D B3 6F E5 21 98 F2 CD 3A 05 CD 4D    ....}.o.!...:..M
012A00:  05 06 61 72 63 63 6F 73 CD 8D 06 D1 7D B3 6F CB    ..arccos....}.o.
012A10:  45 CA A5 26 2A 69 F1 5E 23 56 EB E5 CD 4D 05 05    E..&*i.^#V...M..
012A20:  69 64 66 63 74 06 06 CD 01 06 2A 69 F1 5E 23 56    idfct.....*i.^#V
012A30:  EB 11 07 00 19 E5 21 98 F2 CD 3A 05 06 0A CD 01    ......!...:.....
012A40:  06 2A 69 F1 5E 23 56 EB 11 14 00 19 E5 21 00 00    .*i.^#V......!..
012A50:  EB E1 73 23 72 2A A3 F2 26 00 E5 21 28 00 D1 CD    ..s#r*£.&..!(...
012A60:  7F 06 CB 45 CA 9B 26 CD F2 21 2A 69 F1 5E 23 56    ...E..&..!*i.^#V
012A70:  EB 11 12 00 19 E5 CD 4A 24 2A A3 F2 26 00 E5 21    .......J$*£.&..!
012A80:  29 00 D1 CD 92 06 CB 45 CA 95 26 21 03 00 E5 CD    )......E..&!....
012A90:  77 21 C3 98 26 CD F2 21 C3 A2 26 21 04 00 E5 CD    w!..&..!..&!....
012AA0:  77 21 C3 AC 26 21 05 00 E5 CD 77 21 01 0A 00 11    w!..&!....w!....
012AB0:  61 F1 C3 22 05 C3 E0 28 01 0C 00 21 55 F1 CD 08    a.."...(...!U...
012AC0:  05 FD E1 E1 22 5F F1 FD E5 21 55 F1 E5 21 16 00    ...."_...!U..!..
012AD0:  CD E5 1C 2A 55 F1 11 14 00 19 E5 2A 5F F1 5E 23    ...*U......*_.^#
012AE0:  56 EB EB E1 73 23 72 2A 55 F1 EB 2A 5F F1 73 23    V...s#r*U..*_.s#
012AF0:  72 2A 5F F1 5E 23 56 EB E5 CD 4D 05 05 70 75 69    r*_.^#V...M..pui
012B00:  73 73 06 06 CD 01 06 2A 5F F1 5E 23 56 EB 11 07    ss.....*_.^#V...
012B10:  00 19 E5 21 5E 00 65 2E 01 E5 06 0A CD 01 06 2A    ...!^.e........*
012B20:  5F F1 5E 23 56 EB 11 12 00 19 E5 21 16 00 CD E5    _.^#V......!....
012B30:  1C CD F2 21 2A 5F F1 5E 23 56 EB 11 12 00 19 E5    ...!*_.^#V......
012B40:  CD B5 26 01 0C 00 11 55 F1 C3 22 05 01 10 00 21    ..&....U.."....!
012B50:  45 F1 CD 08 05 FD E1 E1 22 53 F1 FD E5 2A A3 F2    E......."S...*£.
012B60:  26 00 65 2E 01 E5 06 0A 21 98 F2 CD E2 05 21 30    &.e.....!.....!0
012B70:  00 7D 32 A3 F2 2A A3 F2 26 00 E5 CD 81 05 21 30    .}2£.*£.&.....!0
012B80:  00 E5 21 39 00 CD 9B 05 CD 4F 13 E5 21 98 F2 CD    ..!9.....O..!...
012B90:  3A 05 CD A3 08 E5 21 0A 00 D1 CD E0 06 D1 7D A3    :..£..!.......}£
012BA0:  6F CB 45 CA C6 27 CD F2 21 21 98 F2 CD 3A 05 2A    o.E..'..!!...:.*
012BB0:  A3 F2 26 00 65 2E 01 E5 CD 3D 08 06 0A 21 98 F2    £.&.e....=...!..
012BC0:  CD E2 05 C3 75 27 2A A3 F2 26 00 E5 21 2E 00 D1    ....u'*£.&..!...
012BD0:  CD 7F 06 CB 45 CA 30 28 21 30 00 7D 32 A3 F2 2A    ....E.0(!0.}2£.*
012BE0:  A3 F2 26 00 E5 CD 81 05 21 30 00 E5 21 39 00 CD    £.&.....!0..!9..
012BF0:  9B 05 CD 4F 13 E5 21 98 F2 CD 3A 05 CD A3 08 E5    ...O..!...:..£..
012C00:  21 0A 00 D1 CD E0 06 D1 7D A3 6F CB 45 CA 30 28    !.......}£o.E.0(
012C10:  CD F2 21 21 98 F2 CD 3A 05 2A A3 F2 26 00 65 2E    ..!!...:.*£.&.e.
012C20:  01 E5 CD 3D 08 06 0A 21 98 F2 CD E2 05 C3 DF 27    ...=...!.......'
012C30:  21 98 F2 CD 3A 05 21 01 00 E5 21 98 F2 CD 3A 05    !...:.!...!...:.
012C40:  CD A3 08 E5 21 01 00 D1 EB B7 ED 52 CD 6B 08 06    .£..!......R.k..
012C50:  0A 21 98 F2 CD E2 05 21 98 F2 CD 3A 05 21 45 F1    .!.....!...:.!E.
012C60:  E5 21 92 F2 CD F3 1E 2A 92 F2 E5 21 00 00 D1 CD    .!.....*...!....
012C70:  92 06 CB 45 CA 81 28 21 06 00 E5 CD 77 21 C3 D7    ...E..(!....w!..
012C80:  28 2A 53 F1 5E 23 56 EB E5 CD 4D 05 06 6E 6F 6D    (*S.^#V...M..nom
012C90:  62 72 65 06 06 CD 01 06 2A 53 F1 5E 23 56 EB 11    bre.....*S.^#V..
012CA0:  07 00 19 E5 21 98 F2 CD 3A 05 06 0A CD 01 06 2A    ....!...:......*
012CB0:  53 F1 5E 23 56 EB 11 12 00 19 E5 21 00 00 EB E1    S.^#V......!....
012CC0:  73 23 72 2A 53 F1 5E 23 56 EB 11 14 00 19 E5 21    s#r*S.^#V......!
012CD0:  00 00 EB E1 73 23 72 01 10 00 11 45 F1 C3 22 05    ....s#r....E..".
012CE0:  01 0A 00 21 3B F1 CD 08 05 FD E1 E1 22 43 F1 FD    ...!;......."C..
012CF0:  E5 2A A3 F2 26 00 11 70 00 B7 ED 52 C2 09 29 2A    .*£.&..p...R..)*
012D00:  43 F1 E5 CD E8 22 C3 B8 29 19 11 78 00 B7 ED 52    C...."..)..x...R
012D10:  C2 1D 29 2A 43 F1 E5 CD D6 23 C3 B8 29 19 11 28    ..)*C....#..)..(
012D20:  00 B7 ED 52 C2 53 29 CD F2 21 2A 43 F1 E5 CD 4A    ...R.S)..!*C...J
012D30:  24 2A A3 F2 26 00 E5 21 29 00 D1 CD 92 06 CB 45    $*£.&..!)......E
012D40:  CA 4D 29 21 07 00 E5 CD 77 21 C3 50 29 CD F2 21    .M)!....w!.P)..!
012D50:  C3 B8 29 19 11 2B 00 B7 ED 52 CA 77 29 19 11 2D    ..)..+...R.w)..-
012D60:  00 B7 ED 52 CA 77 29 19 11 30 00 01 0A 00 B7 ED    ...R.w)..0......
012D70:  52 B7 ED 42 D2 81 29 2A 43 F1 E5 CD 4C 27 C3 B8    R..B..)*C...L'..
012D80:  29 19 09 11 61 00 01 17 00 B7 ED 52 B7 ED 42 DA    )...a......R..B.
012D90:  A7 29 19 09 11 79 00 B7 ED 52 CA A7 29 19 11 7A    .)...y...R..)..z
012DA0:  00 B7 ED 52 C2 B1 29 2A 43 F1 E5 CD 4D 24 C3 B8    ...R..)*C...M$..
012DB0:  29 21 08 00 E5 CD 77 21 2A A3 F2 26 00 E5 21 5E    )!....w!*£.&..!^
012DC0:  00 D1 CD 7F 06 CB 45 CA D4 29 2A 43 F1 E5 CD B8    ......E..)*C....
012DD0:  26 C3 B8 29 01 0A 00 11 3B F1 C3 22 05 01 0C 00    &..)....;.."....
012DE0:  21 2F F1 CD 08 05 FD E1 E1 22 39 F1 FD E5 2A 39    !/......."9...*9
012DF0:  F1 E5 CD B5 26 2A A3 F2 26 00 E5 CD 81 05 21 2A    ....&*£.&.....!*
012E00:  00 CD 91 05 21 2F 00 CD 91 05 CD 4F 13 CB 45 CA    ....!/.....O..E.
012E10:  BD 2A 21 2F F1 E5 21 16 00 CD E5 1C 2A 2F F1 11    .*!/..!.....*/..
012E20:  14 00 19 E5 2A 39 F1 5E 23 56 EB EB E1 73 23 72    ....*9.^#V...s#r
012E30:  2A 2F F1 EB 2A 39 F1 73 23 72 2A A3 F2 26 00 E5    */..*9.s#r*£.&..
012E40:  21 2A 00 D1 CD 7F 06 CB 45 CA 65 2A 2A 39 F1 5E    !*......E.e**9.^
012E50:  23 56 EB E5 CD 4D 05 05 6D 75 6C 74 69 06 06 CD    #V...M..multi...
012E60:  01 06 C3 7C 2A 2A 39 F1 5E 23 56 EB E5 CD 4D 05    ...|**9.^#V...M.
012E70:  06 64 69 76 69 73 65 06 06 CD 01 06 2A 39 F1 5E    .divise.....*9.^
012E80:  23 56 EB 11 07 00 19 E5 2A A3 F2 26 00 65 2E 01    #V......*£.&.e..
012E90:  E5 06 0A CD 01 06 2A 39 F1 5E 23 56 EB 11 12 00    ......*9.^#V....
012EA0:  19 E5 21 16 00 CD E5 1C CD F2 21 2A 39 F1 5E 23    ..!.......!*9.^#
012EB0:  56 EB 11 12 00 19 E5 CD B5 26 C3 F5 29 01 0C 00    V........&..)...
012EC0:  11 2F F1 C3 22 05 01 0C 00 21 23 F1 CD 08 05 FD    ./.."....!#.....
012ED0:  E1 E1 22 2D F1 FD E5 2A 2D F1 E5 21 16 00 CD E5    .."-...*-..!....
012EE0:  1C 2A A3 F2 26 00 E5 CD 81 05 21 2B 00 CD 91 05    .*£.&.....!+....
012EF0:  21 2D 00 CD 91 05 CD 4F 13 CB 45 CA 93 2B 2A A3    !-.....O..E..+*£
012F00:  F2 26 00 E5 21 2B 00 D1 CD 7F 06 CB 45 CA 28 2B    .&..!+......E.(+
012F10:  2A 2D F1 5E 23 56 EB E5 CD 4D 05 04 70 6C 75 73    *-.^#V...M..plus
012F20:  06 06 CD 01 06 C3 3E 2B 2A 2D F1 5E 23 56 EB E5    ......>+*-.^#V..
012F30:  CD 4D 05 05 6D 6F 69 6E 73 06 06 CD 01 06 2A 2D    .M..moins.....*-
012F40:  F1 5E 23 56 EB 11 07 00 19 E5 2A A3 F2 26 00 65    .^#V......*£.&.e
012F50:  2E 01 E5 06 0A CD 01 06 2A 2D F1 5E 23 56 EB 11    ........*-.^#V..
012F60:  14 00 19 E5 21 00 00 EB E1 73 23 72 2A 2D F1 5E    ....!....s#r*-.^
012F70:  23 56 EB 11 12 00 19 E5 21 16 00 CD E5 1C CD F2    #V......!.......
012F80:  21 2A 2D F1 5E 23 56 EB 11 12 00 19 E5 CD DD 29    !*-.^#V........)
012F90:  C3 9A 2B 2A 2D F1 E5 CD DD 29 2A A3 F2 26 00 E5    ..+*-....)*£.&..
012FA0:  CD 81 05 21 2B 00 CD 91 05 21 2D 00 CD 91 05 CD    ...!+....!-.....
012FB0:  4F 13 CB 45 CA 60 2C 21 23 F1 E5 21 16 00 CD E5    O..E.`,!#..!....
012FC0:  1C 2A 23 F1 11 14 00 19 E5 2A 2D F1 5E 23 56 EB    .*#......*-.^#V.
012FD0:  EB E1 73 23 72 2A 23 F1 EB 2A 2D F1 73 23 72 2A    ..s#r*#..*-.s#r*
012FE0:  A3 F2 26 00 E5 21 2B 00 D1 CD 7F 06 CB 45 CA 09    £.&..!+......E..
012FF0:  2C 2A 2D F1 5E 23 56 EB E5 CD 4D 05 04 70 6C 75    ,*-.^#V...M..plu
013000:  73 06 06 CD 01 06 C3 1F 2C 2A 2D F1 5E 23 56 EB    s.......,*-.^#V.
013010:  E5 CD 4D 05 05 6D 6F 69 6E 73 06 06 CD 01 06 2A    ..M..moins.....*
013020:  2D F1 5E 23 56 EB 11 07 00 19 E5 2A A3 F2 26 00    -.^#V......*£.&.
013030:  65 2E 01 E5 06 0A CD 01 06 2A 2D F1 5E 23 56 EB    e........*-.^#V.
013040:  11 12 00 19 E5 21 16 00 CD E5 1C CD F2 21 2A 2D    .....!.......!*-
013050:  F1 5E 23 56 EB 11 12 00 19 E5 CD DD 29 C3 9A 2B    .^#V........)..+
013060:  01 0C 00 11 23 F1 C3 22 05 01 0A 00 21 19 F1 CD    ....#.."....!...
013070:  08 05 FD E1 E1 22 21 F1 FD E5 2A 21 F1 5E 23 56    ....."!...*!.^#V
013080:  EB E5 21 00 00 D1 CD 92 06 CB 45 CA 95 2C 2A 21    ..!.......E..,*!
013090:  F1 E5 CD 22 21 CD 9B 14 CD BA 17 15 45 6E 74 72    ..."!.......Entr
0130A0:  65 7A 20 76 6F 74 72 65 20 66 6F 6E 63 74 69 6F    ez votre fonctio
0130B0:  6E CD CD 17 CD 1B 20 CD F2 21 2A 21 F1 E5 CD 4A    n..... ..!*!...J
0130C0:  24 2A A3 F2 26 00 E5 21 0D 00 D1 CD 92 06 CB 45    $*£.&..!.......E
0130D0:  CA DA 2C 21 09 00 E5 CD 77 21 01 0A 00 11 19 F1    ..,!....w!......
0130E0:  C3 22 05 01 08 00 21 11 F1 CD 08 05 CD 9B 14 CD    ."....!.........
0130F0:  CD 17 CD 1B 20 21 01 00 E5 21 19 00 CD DB 1F CD    .... !...!......
013100:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
013110:  10 00 00 00 02 09 4E E5 10 00 41 02 00 00 00 02    ......N...A.....
013120:  10 00 42 02 00 00 00 02 10 00 43 02 00 00 00 02    ..B.......C.....
013130:  10 00 44 02 00 00 00 02 10 00 45 02 00 00 00 02    ..D.......E.....
013140:  10 00 46 02 00 00 00 02 10 00 47 02 00 00 00 02    ..F.......G.....
013150:  10 00 48 02 00 00 00 02 10 00 49 02 00 00 00 02    ..H.......I.....
013160:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013170:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013180:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013190:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0131A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0131B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0131C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0131D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0131E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0131F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013200:  9B 14 CD BA 17 27 61 70 70 75 79 65 7A 20 75 6E    .....'appuyez un
013210:  65 20 74 6F 75 63 68 65 20 70 6F 75 72 20 72 65    e touche pour re
013220:  76 65 6E 69 72 20 61 75 20 6D 65 6E 75 CD 1B 20    venir au menu.. 
013230:  CD A0 00 7D EE 01 6F CB 45 CA 3F 2D C3 30 2D 01    ...}..o.E.?-.0-.
013240:  08 00 11 11 F1 C3 22 05 C3 33 36 C3 17 44 C3 CC    ......"..36..D..
013250:  3F 01 12 00 21 FF F0 CD 08 05 FD E1 E1 22 0F F1    ?...!........"..
013260:  FD E5 2A 0F F1 5E 23 56 EB E5 21 00 00 D1 CD 92    ..*..^#V..!.....
013270:  06 CB 45 CA 27 36 2A 0F F1 5E 23 56 EB 11 12 00    ..E.'6*..^#V....
013280:  19 5E 23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62    .^#V..:..M..nomb
013290:  72 65 CD 8D 06 E5 2A 0F F1 5E 23 56 EB 11 14 00    re....*..^#V....
0132A0:  19 5E 23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62    .^#V..:..M..nomb
0132B0:  72 65 CD 8D 06 D1 7D A3 6F E5 2A 0F F1 5E 23 56    re....}£o.*..^#V
0132C0:  EB 11 07 00 19 CD 3A 05 21 2F 00 65 2E 01 E5 CD    ......:.!/.e....
0132D0:  A0 06 D1 7D A3 6F CB 45 CA DC 2E 2A 0F F1 5E 23    ...}£o.E...*..^#
0132E0:  56 EB E5 21 00 00 CD 08 10 C5 D5 E5 CD 48 2D D9    V..!.........H-.
0132F0:  21 FF F0 CD D1 05 21 FF F0 CD 2C 05 CD 34 0C C5    !.....!...,..4..
013300:  D5 E5 21 00 00 CD 08 10 D9 E1 D1 C1 CD 88 06 CB    ..!.............
013310:  45 CA 35 2E 21 FF F0 CD 2C 05 CD D0 0F E5 21 00    E.5.!...,.....!.
013320:  00 E5 2A 0F F1 5E 23 56 EB 11 07 00 19 06 0A CD    ..*..^#V........
013330:  BE 1E C3 94 2E 21 FF F0 CD 2C 05 C5 D5 E5 21 08    .....!...,....!.
013340:  00 E5 21 03 00 E5 2A 0F F1 5E 23 56 EB 11 07 00    ..!...*..^#V....
013350:  19 06 0A CD BD 1E 21 20 00 65 2E 01 E5 2A 0F F1    ......! .e...*..
013360:  5E 23 56 EB 11 07 00 19 CD 3A 05 CD B2 08 E5 21    ^#V......:.....!
013370:  00 00 D1 CD 92 06 CB 45 CA 94 2E 2A 0F F1 5E 23    .......E...*..^#
013380:  56 EB 11 07 00 19 E5 21 01 00 E5 21 01 00 CD F3    V......!...!....
013390:  08 C3 56 2E 2A 0F F1 5E 23 56 EB E5 CD 4D 05 06    ..V.*..^#V...M..
0133A0:  6E 6F 6D 62 72 65 06 06 CD 01 06 2A 0F F1 5E 23    nombre.....*..^#
0133B0:  56 EB 11 14 00 19 E5 21 00 00 EB E1 73 23 72 2A    V......!....s#r*
0133C0:  0F F1 5E 23 56 EB 11 12 00 19 E5 21 00 00 EB E1    ..^#V......!....
0133D0:  73 23 72 21 01 00 22 92 F2 C3 27 36 2A 0F F1 5E    s#r!.."...'6*..^
0133E0:  23 56 EB 11 07 00 19 CD 3A 05 21 2A 00 65 2E 01    #V......:.!*.e..
0133F0:  E5 CD 8D 06 E5 2A 0F F1 5E 23 56 EB 11 12 00 19    .....*..^#V.....
013400:  5E 23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62 72    ^#V..:..M..nombr
013410:  65 CD 8D 06 D1 7D A3 6F E5 2A 0F F1 5E 23 56 EB    e....}£o.*..^#V.
013420:  11 12 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05 21    ....^#V......:.!
013430:  31 00 65 2E 01 E5 CD 8D 06 D1 7D A3 6F CB 45 CA    1.e.......}£o.E.
013440:  68 2F 2A 0F F1 5E 23 56 EB 11 14 00 19 5E 23 56    h/*..^#V.....^#V
013450:  EB EB 2A 0F F1 73 23 72 2A 0F F1 E5 CD 51 2D 21    ..*..s#r*....Q-!
013460:  01 00 22 92 F2 C3 27 36 2A 0F F1 5E 23 56 EB 11    .."...'6*..^#V..
013470:  07 00 19 CD 3A 05 21 2A 00 65 2E 01 E5 CD 8D 06    ....:.!*.e......
013480:  E5 2A 0F F1 5E 23 56 EB 11 14 00 19 5E 23 56 EB    .*..^#V.....^#V.
013490:  CD 3A 05 CD 4D 05 06 6E 6F 6D 62 72 65 CD 8D 06    .:..M..nombre...
0134A0:  D1 7D A3 6F E5 2A 0F F1 5E 23 56 EB 11 14 00 19    .}£o.*..^#V.....
0134B0:  5E 23 56 EB 11 07 00 19 CD 3A 05 21 31 00 65 2E    ^#V......:.!1.e.
0134C0:  01 E5 CD 8D 06 D1 7D A3 6F CB 45 CA F4 2F 2A 0F    ......}£o.E../*.
0134D0:  F1 5E 23 56 EB 11 12 00 19 5E 23 56 EB EB 2A 0F    .^#V.....^#V..*.
0134E0:  F1 73 23 72 2A 0F F1 E5 CD 51 2D 21 01 00 22 92    .s#r*....Q-!..".
0134F0:  F2 C3 27 36 2A 0F F1 5E 23 56 EB 11 07 00 19 CD    ..'6*..^#V......
013500:  3A 05 21 2A 00 65 2E 01 E5 CD 8D 06 E5 2A 0F F1    :.!*.e.......*..
013510:  5E 23 56 EB 11 07 00 19 CD 3A 05 21 2F 00 65 2E    ^#V......:.!/.e.
013520:  01 E5 CD 8D 06 D1 7D B3 6F E5 2A 0F F1 5E 23 56    ......}.o.*..^#V
013530:  EB 11 14 00 19 5E 23 56 EB CD 3A 05 CD 4D 05 06    .....^#V..:..M..
013540:  6E 6F 6D 62 72 65 CD 8D 06 E5 2A 0F F1 5E 23 56    nombre....*..^#V
013550:  EB 11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05    .....^#V......:.
013560:  21 30 00 65 2E 01 E5 CD 8D 06 D1 7D A3 6F E5 2A    !0.e.......}£o.*
013570:  0F F1 5E 23 56 EB 11 14 00 19 5E 23 56 EB E5 21    ..^#V.....^#V..!
013580:  00 00 D1 CD 7F 06 D1 7D B3 6F D1 7D A3 6F CB 45    .......}.o.}£o.E
013590:  CA A6 30 21 00 00 EB 2A 0F F1 73 23 72 21 01 00    ..0!...*..s#r!..
0135A0:  22 92 F2 C3 27 36 2A 0F F1 5E 23 56 EB 11 07 00    "...'6*..^#V....
0135B0:  19 CD 3A 05 21 2A 00 65 2E 01 E5 CD 8D 06 E5 2A    ..:.!*.e.......*
0135C0:  0F F1 5E 23 56 EB 11 12 00 19 5E 23 56 EB CD 3A    ..^#V.....^#V..:
0135D0:  05 CD 4D 05 06 6E 6F 6D 62 72 65 CD 8D 06 E5 2A    ..M..nombre....*
0135E0:  0F F1 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 07    ..^#V.....^#V...
0135F0:  00 19 CD 3A 05 21 30 00 65 2E 01 E5 CD 8D 06 D1    ...:.!0.e.......
013600:  7D A3 6F E5 2A 0F F1 5E 23 56 EB 11 12 00 19 5E    }£o.*..^#V.....^
013610:  23 56 EB E5 21 00 00 D1 CD 7F 06 D1 7D B3 6F D1    #V..!.......}.o.
013620:  7D A3 6F CB 45 CA 3B 31 21 00 00 EB 2A 0F F1 73    }£o.E.;1!...*..s
013630:  23 72 21 01 00 22 92 F2 C3 27 36 2A 0F F1 5E 23    #r!.."...'6*..^#
013640:  56 EB 11 07 00 19 CD 3A 05 21 2A 00 65 2E 01 E5    V......:.!*.e...
013650:  CD 8D 06 E5 2A 0F F1 5E 23 56 EB 11 14 00 19 5E    ....*..^#V.....^
013660:  23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62 72 65    #V..:..M..nombre
013670:  CD 8D 06 D1 7D A3 6F E5 2A 0F F1 5E 23 56 EB 11    ....}£o.*..^#V..
013680:  12 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05 21 2A    ...^#V......:.!*
013690:  00 65 2E 01 E5 CD 8D 06 D1 7D A3 6F E5 2A 0F F1    .e.......}£o.*..
0136A0:  5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 14 00 19    ^#V.....^#V.....
0136B0:  5E 23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62 72    ^#V..:..M..nombr
0136C0:  65 CD 8D 06 D1 7D A3 6F CB 45 CA 88 32 2A 0F F1    e....}£o.E..2*..
0136D0:  5E 23 56 EB 11 12 00 19 5E 23 56 EB 22 05 F1 2A    ^#V.....^#V."..*
0136E0:  0F F1 5E 23 56 EB 11 12 00 19 E5 2A 0F F1 5E 23    ..^#V......*..^#
0136F0:  56 EB 11 14 00 19 5E 23 56 EB EB E1 73 23 72 2A    V.....^#V...s#r*
013700:  0F F1 5E 23 56 EB 11 14 00 19 E5 2A 05 F1 EB E1    ..^#V......*....
013710:  73 23 72 2A 0F F1 5E 23 56 EB 11 14 00 19 5E 23    s#r*..^#V.....^#
013720:  56 EB 11 12 00 19 5E 23 56 EB 22 05 F1 2A 0F F1    V.....^#V."..*..
013730:  5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 12 00 19    ^#V.....^#V.....
013740:  E5 2A 0F F1 5E 23 56 EB 11 12 00 19 5E 23 56 EB    .*..^#V.....^#V.
013750:  EB E1 73 23 72 2A 0F F1 5E 23 56 EB 11 12 00 19    ..s#r*..^#V.....
013760:  E5 2A 05 F1 EB E1 73 23 72 2A 0F F1 5E 23 56 EB    .*....s#r*..^#V.
013770:  11 12 00 19 E5 CD 51 2D 2A 0F F1 E5 CD 51 2D 21    ......Q-*....Q-!
013780:  01 00 22 92 F2 C3 27 36 2A 0F F1 5E 23 56 EB CD    .."...'6*..^#V..
013790:  3A 05 CD 4D 05 04 70 6C 75 73 CD 8D 06 E5 2A 0F    :..M..plus....*.
0137A0:  F1 5E 23 56 EB CD 3A 05 CD 4D 05 05 6D 6F 69 6E    .^#V..:..M..moin
0137B0:  73 CD 8D 06 D1 7D B3 6F E5 2A 0F F1 5E 23 56 EB    s....}.o.*..^#V.
0137C0:  11 12 00 19 5E 23 56 EB E5 21 00 00 D1 CD 7F 06    ....^#V..!......
0137D0:  E5 2A 0F F1 5E 23 56 EB 11 12 00 19 5E 23 56 EB    .*..^#V.....^#V.
0137E0:  11 07 00 19 CD 3A 05 21 30 00 65 2E 01 E5 CD 8D    .....:.!0.e.....
0137F0:  06 D1 7D B3 6F D1 7D A3 6F CB 45 CA 24 33 2A 0F    ..}.o.}£o.E.$3*.
013800:  F1 5E 23 56 EB 11 14 00 19 5E 23 56 EB EB 2A 0F    .^#V.....^#V..*.
013810:  F1 73 23 72 2A 0F F1 E5 CD 51 2D 21 01 00 22 92    .s#r*....Q-!..".
013820:  F2 C3 27 36 2A 0F F1 5E 23 56 EB CD 3A 05 CD 4D    ..'6*..^#V..:..M
013830:  05 04 70 6C 75 73 CD 8D 06 E5 2A 0F F1 5E 23 56    ..plus....*..^#V
013840:  EB CD 3A 05 CD 4D 05 05 6D 6F 69 6E 73 CD 8D 06    ..:..M..moins...
013850:  D1 7D B3 6F E5 2A 0F F1 5E 23 56 EB 11 14 00 19    .}.o.*..^#V.....
013860:  5E 23 56 EB E5 21 00 00 D1 CD 7F 06 E5 2A 0F F1    ^#V..!.......*..
013870:  5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 07 00 19    ^#V.....^#V.....
013880:  CD 3A 05 21 30 00 65 2E 01 E5 CD 8D 06 D1 7D B3    .:.!0.e.......}.
013890:  6F D1 7D A3 6F CB 45 CA F6 33 2A 0F F1 5E 23 56    o.}£o.E..3*..^#V
0138A0:  EB 11 07 00 19 CD 3A 05 21 2D 00 65 2E 01 E5 CD    ......:.!-.e....
0138B0:  8D 06 CB 45 CA D0 33 2A 0F F1 5E 23 56 EB 11 12    ...E..3*..^#V...
0138C0:  00 19 E5 CD 4B 2D EB 2A 0F F1 73 23 72 C3 E6 33    ....K-.*..s#r..3
0138D0:  2A 0F F1 5E 23 56 EB 11 12 00 19 5E 23 56 EB EB    *..^#V.....^#V..
0138E0:  2A 0F F1 73 23 72 2A 0F F1 E5 CD 51 2D 21 01 00    *..s#r*....Q-!..
0138F0:  22 92 F2 C3 27 36 2A 0F F1 5E 23 56 EB CD 3A 05    "...'6*..^#V..:.
013900:  CD 4D 05 05 70 75 69 73 73 CD 8D 06 E5 2A 0F F1    .M..puiss....*..
013910:  5E 23 56 EB 11 12 00 19 5E 23 56 EB CD 3A 05 CD    ^#V.....^#V..:..
013920:  4D 05 06 6E 6F 6D 62 72 65 CD 8D 06 D1 7D A3 6F    M..nombre....}£o
013930:  E5 2A 0F F1 5E 23 56 EB 11 12 00 19 5E 23 56 EB    .*..^#V.....^#V.
013940:  11 07 00 19 CD 3A 05 21 31 00 65 2E 01 E5 CD 8D    .....:.!1.e.....
013950:  06 D1 7D A3 6F CB 45 CA 80 34 2A 0F F1 5E 23 56    ..}£o.E..4*..^#V
013960:  EB 11 14 00 19 5E 23 56 EB EB 2A 0F F1 73 23 72    .....^#V..*..s#r
013970:  2A 0F F1 E5 CD 51 2D 21 01 00 22 92 F2 C3 27 36    *....Q-!.."...'6
013980:  2A 0F F1 5E 23 56 EB CD 3A 05 CD 4D 05 05 70 75    *..^#V..:..M..pu
013990:  69 73 73 CD 8D 06 E5 2A 0F F1 5E 23 56 EB 11 12    iss....*..^#V...
0139A0:  00 19 5E 23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D    ..^#V..:..M..nom
0139B0:  62 72 65 CD 8D 06 D1 7D A3 6F E5 2A 0F F1 5E 23    bre....}£o.*..^#
0139C0:  56 EB 11 14 00 19 5E 23 56 EB CD 3A 05 CD 4D 05    V.....^#V..:..M.
0139D0:  05 70 75 69 73 73 CD 8D 06 D1 7D A3 6F E5 2A 0F    .puiss....}£o.*.
0139E0:  F1 5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 12 00    .^#V.....^#V....
0139F0:  19 5E 23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62    .^#V..:..M..nomb
013A00:  72 65 CD 8D 06 D1 7D A3 6F CB 45 CA D1 35 21 05    re....}£o.E..5!.
013A10:  F1 E5 21 16 00 CD E5 1C CD 4D 05 05 6D 75 6C 74    ..!......M..mult
013A20:  69 06 06 2A 05 F1 CD E2 05 2A 05 F1 11 07 00 19    i..*.....*......
013A30:  E5 21 2A 00 65 2E 01 E5 06 0A CD 01 06 2A 05 F1    .!*.e........*..
013A40:  11 12 00 19 E5 2A 0F F1 5E 23 56 EB 11 12 00 19    .....*..^#V.....
013A50:  5E 23 56 EB EB E1 73 23 72 2A 05 F1 11 14 00 19    ^#V...s#r*......
013A60:  E5 2A 0F F1 5E 23 56 EB 11 14 00 19 5E 23 56 EB    .*..^#V.....^#V.
013A70:  11 12 00 19 5E 23 56 EB EB E1 73 23 72 2A 0F F1    ....^#V...s#r*..
013A80:  5E 23 56 EB 11 12 00 19 E5 2A 05 F1 EB E1 73 23    ^#V......*....s#
013A90:  72 2A 0F F1 5E 23 56 EB 11 14 00 19 E5 2A 0F F1    r*..^#V......*..
013AA0:  5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 14 00 19    ^#V.....^#V.....
013AB0:  5E 23 56 EB EB E1 73 23 72 2A 0F F1 5E 23 56 EB    ^#V...s#r*..^#V.
013AC0:  11 12 00 19 E5 CD 51 2D 21 01 00 22 92 F2 C3 27    ......Q-!.."...'
013AD0:  36 2A 0F F1 5E 23 56 EB 11 12 00 19 5E 23 56 EB    6*..^#V.....^#V.
013AE0:  E5 21 00 00 D1 CD 92 06 CB 45 CA FC 35 2A 0F F1    .!.......E..5*..
013AF0:  5E 23 56 EB 11 12 00 19 E5 CD 51 2D 2A 0F F1 5E    ^#V.......Q-*..^
013B00:  23 56 EB 11 14 00 19 5E 23 56 EB E5 21 00 00 D1    #V.....^#V..!...
013B10:  CD 92 06 CB 45 CA 27 36 2A 0F F1 5E 23 56 EB 11    ....E.'6*..^#V..
013B20:  14 00 19 E5 CD 51 2D 01 12 00 11 FF F0 C3 22 05    .....Q-.......".
013B30:  C3 21 48 01 1E 00 21 E1 F0 CD 08 05 FD E1 E1 D1    .!H...!.........
013B40:  C1 D9 21 F1 F0 CD D1 05 E1 22 F7 F0 FD E5 2A F7    ..!......"....*.
013B50:  F0 CD 3A 05 CD 4D 05 06 6E 6F 6D 62 72 65 CD 8D    ..:..M..nombre..
013B60:  06 CB 45 CA 8A 36 2A F7 F0 11 07 00 19 CD 3A 05    ..E..6*.......:.
013B70:  21 E3 F0 E5 21 E1 F0 CD F3 1E 21 E3 F0 CD 2C 05    !...!.....!...,.
013B80:  D9 21 F9 F0 CD D1 05 C3 BC 3F 2A F7 F0 CD 3A 05    .!.......?*...:.
013B90:  CD 4D 05 05 70 61 72 61 6D CD 8D 06 CB 45 CA E0    .M..param....E..
013BA0:  36 2A F7 F0 11 07 00 19 CD 3A 05 21 90 F2 E5 21    6*.......:.!...!
013BB0:  E1 F0 CD F4 1E 21 C8 F1 E5 2A 90 F2 2B 29 E5 29    .....!...*..+).)
013BC0:  29 29 29 29 D1 19 D1 19 E5 2A 96 F2 29 5D 54 29    )))).....*..)]T)
013BD0:  19 D1 19 CD 2C 05 D9 21 F9 F0 CD D1 05 C3 BC 3F    ....,..!.......?
013BE0:  2A F7 F0 CD 3A 05 CD 4D 05 06 76 61 72 69 61 62    *...:..M..variab
013BF0:  CD 8D 06 CB 45 CA 08 37 21 F1 F0 CD 2C 05 D9 21    ....E..7!...,..!
013C00:  F9 F0 CD D1 05 C3 BC 3F 2A F7 F0 CD 3A 05 CD 4D    .......?*...:..M
013C10:  05 04 70 6C 75 73 CD 8D 06 CB 45 CA 62 37 2A F7    ..plus....E.b7*.
013C20:  F0 11 14 00 19 5E 23 56 EB E5 21 F1 F0 CD 2C 05    .....^#V..!...,.
013C30:  C5 D5 E5 CD 48 2D C5 D5 E5 2A F7 F0 11 12 00 19    ....H-...*......
013C40:  5E 23 56 EB E5 21 F1 F0 CD 2C 05 C5 D5 E5 CD 48    ^#V..!...,.....H
013C50:  2D D9 E1 D1 C1 CD E9 09 D9 21 F9 F0 CD D1 05 C3    -........!......
013C60:  BC 3F 2A F7 F0 CD 3A 05 CD 4D 05 05 6D 6F 69 6E    .?*...:..M..moin
013C70:  73 CD 8D 06 CB 45 CA BD 37 2A F7 F0 11 14 00 19    s....E..7*......
013C80:  5E 23 56 EB E5 21 F1 F0 CD 2C 05 C5 D5 E5 CD 48    ^#V..!...,.....H
013C90:  2D C5 D5 E5 2A F7 F0 11 12 00 19 5E 23 56 EB E5    -...*......^#V..
013CA0:  21 F1 F0 CD 2C 05 C5 D5 E5 CD 48 2D D9 E1 D1 C1    !...,.....H-....
013CB0:  CD F2 09 D9 21 F9 F0 CD D1 05 C3 BC 3F 2A F7 F0    ....!.......?*..
013CC0:  CD 3A 05 CD 4D 05 05 6D 75 6C 74 69 CD 8D 06 CB    .:..M..multi....
013CD0:  45 CA 18 38 2A F7 F0 11 14 00 19 5E 23 56 EB E5    E..8*......^#V..
013CE0:  21 F1 F0 CD 2C 05 C5 D5 E5 CD 48 2D C5 D5 E5 2A    !...,.....H-...*
013CF0:  F7 F0 11 12 00 19 5E 23 56 EB E5 21 F1 F0 CD 2C    ......^#V..!...,
013D00:  05 C5 D5 E5 CD 48 2D D9 E1 D1 C1 CD FA 09 D9 21    .....H-........!
013D10:  F9 F0 CD D1 05 C3 BC 3F 2A F7 F0 CD 3A 05 CD 4D    .......?*...:..M
013D20:  05 05 70 75 69 73 73 CD 8D 06 CB 45 CA 26 39 2A    ..puiss....E.&9*
013D30:  F7 F0 11 12 00 19 5E 23 56 EB E5 21 F1 F0 CD 2C    ......^#V..!...,
013D40:  05 C5 D5 E5 CD 48 2D CD 34 0C C5 D5 E5 21 00 00    .....H-.4....!..
013D50:  CD 08 10 D9 E1 D1 C1 CD 88 06 CB 45 CA A2 38 2A    ...........E..8*
013D60:  F7 F0 11 14 00 19 5E 23 56 EB E5 21 F1 F0 CD 2C    ......^#V..!...,
013D70:  05 C5 D5 E5 CD 48 2D C5 D5 E5 2A F7 F0 11 12 00    .....H-...*.....
013D80:  19 5E 23 56 EB E5 21 F1 F0 CD 2C 05 C5 D5 E5 CD    .^#V..!...,.....
013D90:  48 2D C5 D5 E5 CD 30 36 D9 21 F9 F0 CD D1 05 C3    H-....06.!......
013DA0:  23 39 2A F7 F0 11 14 00 19 5E 23 56 EB E5 21 F1    #9*......^#V..!.
013DB0:  F0 CD 2C 05 C5 D5 E5 CD 48 2D C5 D5 E5 21 00 00    ..,.....H-...!..
013DC0:  CD 08 10 D9 E1 D1 C1 CD C2 06 CB 45 CA DC 38 21    ...........E..8!
013DD0:  00 00 7D 32 B1 F1 C3 BC 3F C3 23 39 2A F7 F0 11    ..}2....?.#9*...
013DE0:  14 00 19 5E 23 56 EB E5 21 F1 F0 CD 2C 05 C5 D5    ...^#V..!...,...
013DF0:  E5 CD 48 2D CD 2B 0D C5 D5 E5 2A F7 F0 11 12 00    ..H-.+....*.....
013E00:  19 5E 23 56 EB E5 21 F1 F0 CD 2C 05 C5 D5 E5 CD    .^#V..!...,.....
013E10:  48 2D D9 E1 D1 C1 CD FA 09 CD B6 0D D9 21 F9 F0    H-...........!..
013E20:  CD D1 05 C3 BC 3F 2A F7 F0 CD 3A 05 CD 4D 05 06    .....?*...:..M..
013E30:  64 69 76 69 73 65 CD 8D 06 CB 45 CA BC 39 2A F7    divise....E..9*.
013E40:  F0 11 12 00 19 5E 23 56 EB E5 21 F1 F0 CD 2C 05    .....^#V..!...,.
013E50:  C5 D5 E5 CD 48 2D C5 D5 E5 21 00 00 CD 08 10 D9    ....H-...!......
013E60:  E1 D1 C1 CD 88 06 CB 45 CA 78 39 21 00 00 7D 32    .......E.x9!..}2
013E70:  B1 F1 C3 BC 3F C3 B9 39 2A F7 F0 11 14 00 19 5E    ....?..9*......^
013E80:  23 56 EB E5 21 F1 F0 CD 2C 05 C5 D5 E5 CD 48 2D    #V..!...,.....H-
013E90:  C5 D5 E5 2A F7 F0 11 12 00 19 5E 23 56 EB E5 21    ...*......^#V..!
013EA0:  F1 F0 CD 2C 05 C5 D5 E5 CD 48 2D D9 E1 D1 C1 CD    ...,.....H-.....
013EB0:  FF 09 D9 21 F9 F0 CD D1 05 C3 BC 3F 2A F7 F0 CD    ...!.......?*...
013EC0:  3A 05 CD 4D 05 05 69 64 66 63 74 CD 8D 06 CB 45    :..M..idfct....E
013ED0:  CA 9F 3F 2A F7 F0 11 12 00 19 5E 23 56 EB E5 21    ..?*......^#V..!
013EE0:  F1 F0 CD 2C 05 C5 D5 E5 CD 48 2D D9 21 E3 F0 CD    ...,.....H-.!...
013EF0:  D1 05 2A F7 F0 11 07 00 19 CD 3A 05 CD 4D 05 03    ..*.......:..M..
013F00:  63 6F 73 CD 8D 06 CB 45 CA 1E 3A 21 E3 F0 CD 2C    cos....E..:!...,
013F10:  05 CD 7F 0C D9 21 F9 F0 CD D1 05 C3 9C 3F 2A F7    .....!.......?*.
013F20:  F0 11 07 00 19 CD 3A 05 CD 4D 05 03 73 69 6E CD    ......:..M..sin.
013F30:  8D 06 CB 45 CA 4A 3A 21 E3 F0 CD 2C 05 CD 87 0C    ...E.J:!...,....
013F40:  D9 21 F9 F0 CD D1 05 C3 9C 3F 2A F7 F0 11 07 00    .!.......?*.....
013F50:  19 CD 3A 05 CD 4D 05 04 74 61 6E 67 CD 8D 06 CB    ..:..M..tang....
013F60:  45 CA B5 3A 21 E3 F0 CD 2C 05 CD 7F 0C C5 D5 E5    E..:!...,.......
013F70:  21 00 00 CD 08 10 D9 E1 D1 C1 CD 88 06 CB 45 CA    !.............E.
013F80:  8F 3A 21 00 00 7D 32 B1 F1 C3 BC 3F C3 B2 3A 21    .:!..}2....?..:!
013F90:  E3 F0 CD 2C 05 CD 87 0C C5 D5 E5 21 E3 F0 CD 2C    ...,.......!...,
013FA0:  05 CD 7F 0C D9 E1 D1 C1 CD FF 09 D9 21 F9 F0 CD    ............!...
013FB0:  D1 05 C3 9C 3F 2A F7 F0 11 07 00 19 CD 3A 05 CD    ....?*.......:..
013FC0:  4D 05 03 69 6E 74 CD 8D 06 CB 45 CA E1 3A 21 E3    M..int....E..:!.
013FD0:  F0 CD 2C 05 CD FD 0B D9 21 F9 F0 CD D1 05 C3 9C    ..,.....!.......
013FE0:  3F 2A F7 F0 11 07 00 19 CD 3A 05 CD 4D 05 03 61    ?*.......:..M..a
013FF0:  62 73 CD 8D 06 CB 45 CA 0C 3B 21 E3 F0 CD 2C 05    bs....E..;!...,.
014000:  CB B8 D9 21 F9 F0 CD D1 05 C3 9C 3F 2A F7 F0 11    ...!.......?*...
014010:  07 00 19 CD 3A 05 CD 4D 05 06 61 72 63 74 61 6E    ....:..M..arctan
014020:  CD 8D 06 CB 45 CA 3B 3B 21 E3 F0 CD 2C 05 CD 46    ....E.;;!...,..F
014030:  0E D9 21 F9 F0 CD D1 05 C3 9C 3F 2A F7 F0 11 07    ..!.......?*....
014040:  00 19 CD 3A 05 CD 4D 05 03 65 78 70 CD 8D 06 CB    ...:..M..exp....
014050:  45 CA 67 3B 21 E3 F0 CD 2C 05 CD B6 0D D9 21 F9    E.g;!...,.....!.
014060:  F0 CD D1 05 C3 9C 3F 2A F7 F0 11 07 00 19 CD 3A    ......?*.......:
014070:  05 CD 4D 05 02 6C 6E CD 8D 06 CB 45 CA BA 3B 21    ..M..ln....E..;!
014080:  E3 F0 CD 2C 05 C5 D5 E5 21 00 00 CD 08 10 D9 E1    ...,....!.......
014090:  D1 C1 CD C2 06 CB 45 CA A7 3B 21 00 00 7D 32 B1    ......E..;!..}2.
0140A0:  F1 C3 BC 3F C3 B7 3B 21 E3 F0 CD 2C 05 CD 2B 0D    ...?..;!...,..+.
0140B0:  D9 21 F9 F0 CD D1 05 C3 9C 3F 2A F7 F0 11 07 00    .!.......?*.....
0140C0:  19 CD 3A 05 CD 4D 05 04 73 71 72 74 CD 8D 06 CB    ..:..M..sqrt....
0140D0:  45 CA 0F 3C 21 E3 F0 CD 2C 05 C5 D5 E5 21 00 00    E..<!...,....!..
0140E0:  CD 08 10 D9 E1 D1 C1 CD E9 06 CB 45 CA FC 3B 21    ...........E..;!
0140F0:  00 00 7D 32 B1 F1 C3 BC 3F C3 0C 3C 21 E3 F0 CD    ..}2....?..<!...
014100:  2C 05 CD 46 0C D9 21 F9 F0 CD D1 05 C3 9C 3F 2A    ,..F..!.......?*
014110:  F7 F0 11 07 00 19 CD 3A 05 CD 4D 05 02 73 68 CD    .......:..M..sh.
014120:  8D 06 CB 45 CA 70 3C 21 80 00 11 00 00 01 00 00    ...E.p<!........
014130:  C5 D5 E5 21 E3 F0 CD 2C 05 CD B6 0D C5 D5 E5 21    ...!...,.......!
014140:  E3 F0 CD 2C 05 C5 D5 E5 21 FF FF CD 08 10 D9 E1    ...,....!.......
014150:  D1 C1 CD FA 09 CD B6 0D D9 E1 D1 C1 CD F2 09 D9    ................
014160:  E1 D1 C1 CD FA 09 D9 21 F9 F0 CD D1 05 C3 9C 3F    .......!.......?
014170:  2A F7 F0 11 07 00 19 CD 3A 05 CD 4D 05 02 63 68    *.......:..M..ch
014180:  CD 8D 06 CB 45 CA D1 3C 21 80 00 11 00 00 01 00    ....E..<!.......
014190:  00 C5 D5 E5 21 E3 F0 CD 2C 05 CD B6 0D C5 D5 E5    ....!...,.......
0141A0:  21 E3 F0 CD 2C 05 C5 D5 E5 21 FF FF CD 08 10 D9    !...,....!......
0141B0:  E1 D1 C1 CD FA 09 CD B6 0D D9 E1 D1 C1 CD E9 09    ................
0141C0:  D9 E1 D1 C1 CD FA 09 D9 21 F9 F0 CD D1 05 C3 9C    ........!.......
0141D0:  3F 2A F7 F0 11 07 00 19 CD 3A 05 CD 4D 05 02 74    ?*.......:..M..t
0141E0:  68 CD 8D 06 CB 45 CA 55 3D 21 E3 F0 CD 2C 05 CD    h....E.U=!...,..
0141F0:  B6 0D C5 D5 E5 21 E3 F0 CD 2C 05 C5 D5 E5 21 FF    .....!...,....!.
014200:  0D 0A 70 72 6F 63 65 64 75 72 65 20 20 67 72 61    ..procedure  gra
014210:  70 68 65 3B 0D 0A 0D 0A 76 61 72 0D 0A 78 6F 2C    phe;....var..xo,
014220:  79 6F 2C 78 78 64 2C 78 78 61 2C 75 78 2C 75 79    yo,xxd,xxa,ux,uy
014230:  2C 70 61 73 3A 72 65 61 6C 3B 0D 0A 78 70 2C 79    ,pas:real;..xp,y
014240:  70 2C 6E 62 66 6F 6E 63 2C 7A 2C 62 6B 2C 69 6E    p,nbfonc,z,bk,in
014250:  64 65 78 2C 63 68 6F 69 78 62 69 73 3A 69 6E 74    dex,choixbis:int
014260:  65 67 65 72 3B 0D 0A 70 72 65 63 65 64 65 3A 62    eger;..precede:b
014270:  6F 6F 6C 65 61 6E 3B 0D 0A 66 78 2C 66 79 3A 61    oolean;..fx,fy:a
014280:  72 72 61 79 5B 31 2E 2E 31 30 5D 20 6F 66 20 69    rray[1..10] of i
014290:  6E 74 65 67 65 72 3B 0D 0A 6C 64 61 3A 61 72 72    nteger;..lda:arr
0142A0:  61 79 5B 31 2E 2E 32 30 5D 20 6F 66 20 72 65 61    ay[1..20] of rea
0142B0:  6C 3B 0D 0A 62 65 67 69 6E 0D 0A 20 63 6C 72 73    l;..begin.. clrs
0142C0:  63 72 3B 0D 0A 20 20 69 66 20 72 65 76 6F 69 72    cr;..  if revoir
0142D0:  3D 30 20 74 68 65 6E 0D 0A 20 20 62 65 67 69 6E    =0 then..  begin
0142E0:  0D 0A 20 20 20 77 72 69 74 65 6C 6E 28 27 31 2D    ..   writeln('1-
0142F0:  43 6F 75 72 62 65 20 79 3D 66 28 78 29 27 29 3B    Courbe y=f(x)');
014300:  77 72 69 74 65 6C 6E 3B 0D 0A 20 20 20 77 72 69    writeln;..   wri
014310:  74 65 6C 6E 28 27 32 2D 43 6F 75 72 62 65 20 78    teln('2-Courbe x
014320:  3D 66 28 74 29 3B 79 3D 66 28 74 29 27 29 3B 77    =f(t);y=f(t)');w
014330:  72 69 74 65 6C 6E 3B 0D 0A 20 20 20 77 72 69 74    riteln;..   writ
014340:  65 6C 6E 28 27 33 2D 43 6F 75 72 62 65 20 70 6F    eln('3-Courbe po
014350:  6C 61 69 72 65 20 72 3D 66 28 74 29 27 29 3B 77    laire r=f(t)');w
014360:  72 69 74 65 6C 6E 3B 0D 0A 20 20 20 77 72 69 74    riteln;..   writ
014370:  65 28 27 56 6F 74 72 65 20 63 68 6F 69 78 3F 20    e('Votre choix? 
014380:  27 29 3B 0D 0A 20 20 20 72 65 70 65 61 74 0D 0A    ');..   repeat..
014390:  20 20 20 72 65 61 64 28 6B 62 64 2C 63 61 72 29       read(kbd,car)
0143A0:  3B 0D 0A 20 20 20 75 6E 74 69 6C 20 28 28 63 61    ;..   until ((ca
0143B0:  72 3E 27 30 27 29 20 61 6E 64 20 28 63 61 72 3C    r>'0') and (car<
0143C0:  27 34 27 29 29 3B 0D 0A 20 20 20 77 72 69 74 65    '4'));..   write
0143D0:  6C 6E 3B 0D 0A 20 20 20 76 61 6C 28 63 61 72 2C    ln;..   val(car,
0143E0:  63 68 6F 69 78 2C 72 65 73 75 6C 74 29 3B 0D 0A    choix,result);..
0143F0:  20 20 20 77 72 69 74 65 6C 6E 3B 0D 0A 20 20 65       writeln;..  e
014400:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
014410:  11 00 00 00 02 09 4E E5 11 00 41 02 00 00 00 02    ......N...A.....
014420:  11 00 42 02 00 00 00 02 11 00 43 02 00 00 00 02    ..B.......C.....
014430:  11 00 44 02 00 00 00 02 11 00 45 02 00 00 00 02    ..D.......E.....
014440:  11 00 46 02 00 00 00 02 11 00 47 02 00 00 00 02    ..F.......G.....
014450:  11 00 48 02 00 00 00 02 11 00 49 02 00 00 00 02    ..H.......I.....
014460:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
014470:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
014480:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
014490:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0144A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0144B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0144C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0144D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0144E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0144F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
014500:  6E 64 3B 0D 0A 20 20 77 72 69 74 65 6C 6E 3B 0D    nd;..  writeln;.
014510:  0A 20 20 77 72 69 74 65 28 27 41 62 73 63 69 73    .  write('Abscis
014520:  73 65 20 6F 72 69 67 69 6E 65 20 27 29 3B 72 65    se origine ');re
014530:  61 64 6C 6E 28 78 6F 29 3B 0D 0A 20 20 77 72 69    adln(xo);..  wri
014540:  74 65 28 27 4F 72 64 6F 6E 6E 65 65 20 6F 72 69    te('Ordonnee ori
014550:  67 69 6E 65 20 27 29 3B 72 65 61 64 6C 6E 28 79    gine ');readln(y
014560:  6F 29 3B 0D 0A 20 20 77 72 69 74 65 28 27 42 6F    o);..  write('Bo
014570:  72 6E 65 20 69 6E 66 65 72 69 65 75 72 65 20 69    rne inferieure i
014580:  6E 74 20 64 27 27 65 74 75 64 65 20 27 29 3B 72    nt d''etude ');r
014590:  65 61 64 6C 6E 28 78 78 64 29 3B 0D 0A 20 20 77    eadln(xxd);..  w
0145A0:  72 69 74 65 28 27 42 6F 72 6E 65 20 73 75 70 65    rite('Borne supe
0145B0:  72 69 65 75 72 65 20 69 6E 74 20 64 27 27 65 74    rieure int d''et
0145C0:  75 64 65 20 27 29 3B 72 65 61 64 6C 6E 28 78 78    ude ');readln(xx
0145D0:  61 29 3B 0D 0A 20 20 77 72 69 74 65 28 27 55 6E    a);..  write('Un
0145E0:  69 74 65 20 61 62 73 63 69 73 73 65 20 27 29 3B    ite abscisse ');
0145F0:  72 65 61 64 6C 6E 28 75 78 29 3B 0D 0A 20 20 77    readln(ux);..  w
014600:  72 69 74 65 28 27 55 6E 69 74 65 20 6F 72 64 6F    rite('Unite ordo
014610:  6E 6E 65 65 20 27 29 3B 72 65 61 64 6C 6E 28 75    nnee ');readln(u
014620:  79 29 3B 0D 0A 20 20 77 72 69 74 65 28 27 50 61    y);..  write('Pa
014630:  73 20 64 27 27 65 74 75 64 65 20 27 29 3B 72 65    s d''etude ');re
014640:  61 64 6C 6E 28 70 61 73 29 3B 0D 0A 0D 0A 69 66    adln(pas);....if
014650:  20 72 65 76 6F 69 72 3D 30 20 74 68 65 6E 0D 0A     revoir=0 then..
014660:  20 62 65 67 69 6E 0D 0A 20 20 77 72 69 74 65 28     begin..  write(
014670:  27 4E 6F 6D 62 72 65 20 64 65 20 67 72 61 70 68    'Nombre de graph
014680:  65 73 20 73 75 72 20 6C 65 20 6D 65 6D 65 20 65    es sur le meme e
014690:  63 72 61 6E 20 28 31 20 61 20 39 29 3F 27 29 3B    cran (1 a 9)?');
0146A0:  0D 0A 20 20 6E 62 66 6F 6E 63 3A 3D 6E 75 6D 66    ..  nbfonc:=numf
0146B0:  6F 6E 63 3B 0D 0A 20 20 69 6E 64 65 78 3A 3D 30    onc;..  index:=0
0146C0:  3B 0D 0A 20 20 66 6F 72 20 7A 3A 3D 31 20 74 6F    ;..  for z:=1 to
0146D0:  20 6E 62 66 6F 6E 63 20 64 6F 0D 0A 20 20 62 65     nbfonc do..  be
0146E0:  67 69 6E 0D 0A 20 20 20 63 61 73 65 20 63 68 6F    gin..   case cho
0146F0:  69 78 20 6F 66 0D 0A 20 20 20 20 31 3A 20 62 65    ix of..    1: be
014700:  7B 24 41 2D 7D 0D 0A 70 72 6F 67 72 61 6D 20 20    {$A-}..program  
014710:  20 20 20 63 6F 75 72 62 65 3B 0D 0A 74 79 70 65       courbe;..type
014720:  0D 0A 20 66 6F 6E 63 74 69 6F 6E 3D 5E 73 6F 6D    .. fonction=^som
014730:  6D 65 74 3B 0D 0A 20 73 6F 6D 6D 65 74 3D 72 65    met;.. sommet=re
014740:  63 6F 72 64 0D 0A 20 20 20 20 20 20 20 20 20 20    cord..          
014750:  20 20 20 20 6E 61 74 75 72 65 3A 73 74 72 69 6E        nature:strin
014760:  67 5B 36 5D 3B 0D 0A 20 20 20 20 20 20 20 20 20    g[6];..         
014770:  20 20 20 20 20 76 61 6C 65 75 72 3A 73 74 72 69         valeur:stri
014780:  6E 67 5B 31 30 5D 3B 0D 0A 20 20 20 20 20 20 20    ng[10];..       
014790:  20 20 20 20 20 20 20 64 3A 20 66 6F 6E 63 74 69           d: foncti
0147A0:  6F 6E 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    on;..           
0147B0:  20 20 20 67 3A 20 66 6F 6E 63 74 69 6F 6E 3B 0D       g: fonction;.
0147C0:  0A 20 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20    .        end;.. 
0147D0:  73 74 72 32 30 30 3D 73 74 72 69 6E 67 5B 32 35    str200=string[25
0147E0:  30 5D 3B 0D 0A 20 73 74 72 31 30 3D 73 74 72 69    0];.. str10=stri
0147F0:  6E 67 5B 31 30 5D 3B 0D 0A 63 6F 6E 73 74 0D 0A    ng[10];..const..
014800:  20 66 69 6C 74 72 65 3A 73 65 74 20 6F 66 20 63     filtre:set of c
014810:  68 61 72 3D 5B 27 2B 27 2C 27 2A 27 2C 27 2D 27    har=['+','*','-'
014820:  2C 27 2F 27 2C 27 5E 27 2C 27 2E 27 2C 27 28 27    ,'/','^','.','('
014830:  2C 27 29 27 2C 27 61 27 2E 2E 27 7A 27 2C 27 30    ,')','a'..'z','0
014840:  27 2E 2E 27 39 27 5D 3B 0D 0A 0D 0A 76 61 72 0D    '..'9'];....var.
014850:  0A 20 66 3A 61 72 72 61 79 5B 31 2E 2E 31 30 5D    . f:array[1..10]
014860:  20 6F 66 20 66 6F 6E 63 74 69 6F 6E 3B 0D 0A 20     of fonction;.. 
014870:  63 61 72 3A 63 68 61 72 3B 0D 0A 20 69 64 66 3A    car:char;.. idf:
014880:  73 74 72 69 6E 67 5B 31 30 5D 3B 0D 0A 20 69 2C    string[10];.. i,
014890:  6A 2C 72 65 73 75 6C 74 3A 69 6E 74 65 67 65 72    j,result:integer
0148A0:  3B 0D 0A 20 69 6E 64 69 63 65 2C 63 68 6F 69 78    ;.. indice,choix
0148B0:  3A 69 6E 74 65 67 65 72 3B 0D 0A 20 70 3A 61 72    :integer;.. p:ar
0148C0:  72 61 79 5B 31 2E 2E 33 2C 31 2E 2E 31 30 5D 20    ray[1..3,1..10] 
0148D0:  6F 66 20 72 65 61 6C 3B 0D 0A 20 6D 3A 61 72 72    of real;.. m:arr
0148E0:  61 79 5B 31 2E 2E 31 30 5D 20 6F 66 20 69 6E 74    ay[1..10] of int
0148F0:  65 67 65 72 3B 0D 0A 20 64 65 66 69 6E 69 3A 62    eger;.. defini:b
014900:  6F 6F 6C 65 61 6E 3B 0D 0A 20 78 2C 72 65 73 75    oolean;.. x,resu
014910:  6C 74 61 74 3A 72 65 61 6C 3B 0D 0A 0D 0A 7B 24    ltat:real;....{$
014920:  49 20 6C 69 72 65 66 6F 6E 63 2E 70 61 73 7D 0D    I lirefonc.pas}.
014930:  0A 7B 24 49 20 63 61 6C 63 75 6C 66 2E 70 61 73    .{$I calculf.pas
014940:  7D 0D 0A 7B 24 49 20 61 6C 67 65 62 72 65 2E 70    }..{$I algebre.p
014950:  61 73 7D 0D 0A 7B 24 49 20 64 65 72 69 76 65 65    as}..{$I derivee
014960:  2E 70 61 73 7D 0D 0A 7B 24 49 20 6D 65 6E 75 2E    .pas}..{$I menu.
014970:  70 61 73 7D 0D 0A 0D 0A 62 65 67 69 6E 0D 0A 66    pas}....begin..f
014980:  6F 72 20 69 3A 3D 31 20 74 6F 20 31 30 20 64 6F    or i:=1 to 10 do
014990:  20 62 65 67 69 6E 20 66 5B 69 5D 3A 3D 6E 69 6C     begin f[i]:=nil
0149A0:  3B 6D 5B 69 5D 3A 3D 30 3B 20 65 6E 64 3B 0D 0A    ;m[i]:=0; end;..
0149B0:  62 6F 75 63 6C 65 3B 0D 0A 65 6E 64 2E 1A 1A 1A    boucle;..end....
0149C0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0149D0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0149E0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0149F0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
014A00:  0A 20 62 65 67 69 6E 0D 0A 20 20 6E 65 77 28 75    . begin..  new(u
014A10:  29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75    );u^.nature:='mu
014A20:  6C 74 69 27 3B 75 5E 2E 76 61 6C 65 75 72 3A 3D    lti';u^.valeur:=
014A30:  27 2A 27 3B 75 5E 2E 64 3A 3D 66 5E 2E 64 3B 0D    '*';u^.d:=f^.d;.
014A40:  0A 20 20 75 5E 2E 67 3A 3D 6F 70 70 6F 73 65 28    .  u^.g:=oppose(
014A50:  66 5E 2E 67 29 3B 6F 70 70 6F 73 65 3A 3D 75 3B    f^.g);oppose:=u;
014A60:  0D 0A 20 65 6E 64 0D 0A 20 65 6C 73 65 0D 0A 69    .. end.. else..i
014A70:  66 20 28 28 66 5E 2E 76 61 6C 65 75 72 3D 27 78    f ((f^.valeur='x
014A80:  27 29 20 6F 72 20 28 66 5E 2E 76 61 6C 65 75 72    ') or (f^.valeur
014A90:  3D 27 5E 27 29 29 20 74 68 65 6E 0D 0A 20 62 65    ='^')) then.. be
014AA0:  67 69 6E 0D 0A 20 20 6E 65 77 28 75 29 3B 75 5E    gin..  new(u);u^
014AB0:  2E 6E 61 74 75 72 65 3A 3D 27 6D 75 6C 74 69 27    .nature:='multi'
014AC0:  3B 75 5E 2E 76 61 6C 65 75 72 3A 3D 27 2A 27 3B    ;u^.valeur:='*';
014AD0:  75 5E 2E 64 3A 3D 66 3B 0D 0A 20 20 6E 65 77 28    u^.d:=f;..  new(
014AE0:  76 29 3B 76 5E 2E 6E 61 74 75 72 65 3A 3D 27 6E    v);v^.nature:='n
014AF0:  6F 6D 62 72 65 27 3B 76 5E 2E 76 61 6C 65 75 72    ombre';v^.valeur
014B00:  FF CD 08 10 D9 E1 D1 C1 CD FA 09 CD B6 0D D9 E1    ................
014B10:  D1 C1 CD F2 09 C5 D5 E5 21 E3 F0 CD 2C 05 CD B6    ........!...,...
014B20:  0D C5 D5 E5 21 E3 F0 CD 2C 05 C5 D5 E5 21 FF FF    ....!...,....!..
014B30:  CD 08 10 D9 E1 D1 C1 CD FA 09 CD B6 0D D9 E1 D1    ................
014B40:  C1 CD E9 09 D9 E1 D1 C1 CD FF 09 D9 21 F9 F0 CD    ............!...
014B50:  D1 05 C3 9C 3F 2A F7 F0 11 07 00 19 CD 3A 05 CD    ....?*.......:..
014B60:  4D 05 06 61 72 63 73 69 6E CD 8D 06 CB 45 CA 78    M..arcsin....E.x
014B70:  3E 21 E3 F0 CD 2C 05 C5 D5 E5 21 FF FF CD 08 10    >!...,....!.....
014B80:  D9 E1 D1 C1 CD 88 06 CB 45 CA B2 3D 21 80 00 11    ........E..=!...
014B90:  00 00 01 00 80 C5 D5 E5 21 82 21 11 A2 DA 01 0F    ........!.!.....
014BA0:  49 D9 E1 D1 C1 CD FA 09 D9 21 F9 F0 CD D1 05 C3    I........!......
014BB0:  75 3E 21 E3 F0 CD 2C 05 C5 D5 E5 21 01 00 CD 08    u>!...,....!....
014BC0:  10 D9 E1 D1 C1 CD 88 06 CB 45 CA F3 3D 21 80 00    .........E..=!..
014BD0:  11 00 00 01 00 00 C5 D5 E5 21 82 21 11 A2 DA 01    .........!.!....
014BE0:  0F 49 D9 E1 D1 C1 CD FA 09 D9 21 F9 F0 CD D1 05    .I........!.....
014BF0:  C3 75 3E 21 E3 F0 CD 2C 05 C5 D5 E5 21 FF FF CD    .u>!...,....!...
014C00:  08 10 D9 E1 D1 C1 CD E9 06 E5 21 E3 F0 CD 2C 05    ..........!...,.
014C10:  C5 D5 E5 21 01 00 CD 08 10 D9 E1 D1 C1 CD D6 06    ...!............
014C20:  D1 7D B3 6F CB 45 CA 36 3E 21 00 00 7D 32 B1 F1    .}.o.E.6>!..}2..
014C30:  C3 BC 3F C3 75 3E 21 E3 F0 CD 2C 05 C5 D5 E5 21    ..?.u>!...,....!
014C40:  01 00 E5 21 E3 F0 CD 2C 05 C5 D5 E5 21 E3 F0 CD    ...!...,....!...
014C50:  2C 05 D9 E1 D1 C1 CD FA 09 D9 E1 CD 08 10 CD F2    ,...............
014C60:  09 CD 46 0C D9 E1 D1 C1 CD FF 09 CD 46 0E D9 21    ..F.........F..!
014C70:  F9 F0 CD D1 05 C3 9C 3F 2A F7 F0 11 07 00 19 CD    .......?*.......
014C80:  3A 05 CD 4D 05 06 61 72 63 63 6F 73 CD 8D 06 CB    :..M..arccos....
014C90:  45 CA 95 3F 21 E3 F0 CD 2C 05 C5 D5 E5 21 FF FF    E..?!...,....!..
014CA0:  CD 08 10 D9 E1 D1 C1 CD 88 06 CB 45 CA C2 3E 21    ...........E..>!
014CB0:  82 21 11 A2 DA 01 0F 49 D9 21 F9 F0 CD D1 05 C3    .!.....I.!......
014CC0:  92 3F 21 E3 F0 CD 2C 05 C5 D5 E5 21 01 00 CD 08    .?!...,....!....
014CD0:  10 D9 E1 D1 C1 CD 88 06 CB 45 CA ED 3E 21 00 00    .........E..>!..
014CE0:  CD 08 10 D9 21 F9 F0 CD D1 05 C3 92 3F 21 E3 F0    ....!.......?!..
014CF0:  CD 2C 05 C5 D5 E5 21 FF FF CD 08 10 D9 E1 D1 C1    .,....!.........
014D00:  CD E9 06 E5 21 E3 F0 CD 2C 05 C5 D5 E5 21 01 00    ....!...,....!..
014D10:  CD 08 10 D9 E1 D1 C1 CD D6 06 D1 7D B3 6F CB 45    ...........}.o.E
014D20:  CA 30 3F 21 00 00 7D 32 B1 F1 C3 BC 3F C3 92 3F    .0?!..}2....?..?
014D30:  21 82 21 11 A2 DA 01 0F 49 C5 D5 E5 21 02 00 CD    !.!.....I...!...
014D40:  08 10 D9 E1 D1 C1 CD FF 09 C5 D5 E5 21 E3 F0 CD    ............!...
014D50:  2C 05 C5 D5 E5 21 01 00 E5 21 E3 F0 CD 2C 05 C5    ,....!...!...,..
014D60:  D5 E5 21 E3 F0 CD 2C 05 D9 E1 D1 C1 CD FA 09 D9    ..!...,.........
014D70:  E1 CD 08 10 CD F2 09 CD 46 0C D9 E1 D1 C1 CD FF    ........F.......
014D80:  09 CD 46 0E D9 E1 D1 C1 CD F2 09 D9 21 F9 F0 CD    ..F.........!...
014D90:  D1 05 C3 9C 3F 21 0A 00 E5 CD 77 21 C3 BC 3F 2A    ....?!....w!..?*
014DA0:  F7 F0 E5 21 00 00 D1 CD 7F 06 CB 45 CA BC 3F 21    ...!.......E..?!
014DB0:  00 00 CD 08 10 D9 21 F9 F0 CD D1 05 21 F9 F0 CD    ......!.....!...
014DC0:  2C 05 D9 01 1E 00 11 E1 F0 C3 22 05 01 0F 03 21    ,........."....!
014DD0:  D2 ED CD 08 05 FD E1 E1 7D 32 E3 EF E1 22 E4 EF    ........}2..."..
014DE0:  FD E5 2A E4 EF CD 3A 05 CD 4D 05 05 69 64 66 63    ..*...:..M..idfc
014DF0:  74 CD 8D 06 CB 45 CA 3A 40 2A E4 EF 11 07 00 19    t....E.:@*......
014E00:  CD 3A 05 21 28 00 65 2E 01 E5 CD 3D 08 2A E4 EF    .:.!(.e....=.*..
014E10:  11 12 00 19 5E 23 56 EB E5 2A E3 EF 26 00 E5 CD    ....^#V..*..&...
014E20:  4E 2D CD 3D 08 21 29 00 65 2E 01 E5 CD 3D 08 06    N-.=.!).e....=..
014E30:  FA 21 E6 EF CD E2 05 C3 04 44 2A E4 EF CD 3A 05    .!.......D*...:.
014E40:  CD 4D 05 06 6E 6F 6D 62 72 65 CD 8D 06 CB 45 CA    .M..nombre....E.
014E50:  67 40 2A E4 EF 11 07 00 19 CD 3A 05 06 FA 21 E6    g@*.......:...!.
014E60:  EF CD E2 05 C3 04 44 2A E4 EF CD 3A 05 CD 4D 05    ......D*...:..M.
014E70:  05 70 61 72 61 6D CD 8D 06 CB 45 CA A6 40 CD 4D    .param....E..@.M
014E80:  05 02 70 28 2A E4 EF 11 07 00 19 CD 3A 05 CD 3D    ..p(*.......:..=
014E90:  08 21 29 00 65 2E 01 E5 CD 3D 08 06 FA 21 E6 EF    .!).e....=...!..
014EA0:  CD E2 05 C3 04 44 2A E4 EF CD 3A 05 CD 4D 05 06    .....D*...:..M..
014EB0:  76 61 72 69 61 62 CD 8D 06 CB 45 CA D2 40 2A E3    variab....E..@*.
014EC0:  EF 26 00 65 2E 01 E5 06 FA 21 E6 EF CD E2 05 C3    .&.e.....!......
014ED0:  04 44 2A E4 EF CD 3A 05 CD 4D 05 04 70 6C 75 73    .D*...:..M..plus
014EE0:  CD 8D 06 E5 2A E4 EF CD 3A 05 CD 4D 05 05 6D 6F    ....*...:..M..mo
014EF0:  69 6E 73 CD 8D 06 D1 7D B3 6F CB 45 CA 6D 43 2A    ins....}.o.E.mC*
014F00:  E4 EF 11 12 00 19 5E 23 56 EB E5 2A E3 EF 26 00    ......^#V..*..&.
014F10:  E5 CD 4E 2D 06 FA 21 E0 EE CD E2 05 2A E4 EF 11    ..N-..!.....*...
014F20:  14 00 19 5E 23 56 EB E5 2A E3 EF 26 00 E5 CD 4E    ...^#V..*..&...N
014F30:  2D 06 FA 21 E5 ED CD E2 05 2A E4 EF 11 12 00 19    -..!.....*......
014F40:  5E 23 56 EB 11 07 00 19 CD 3A 05 21 2B 00 65 2E    ^#V......:.!+.e.
014F50:  01 E5 CD 8D 06 E5 2A E4 EF 11 12 00 19 5E 23 56    ......*......^#V
014F60:  EB 11 07 00 19 CD 3A 05 21 2D 00 65 2E 01 E5 CD    ......:.!-.e....
014F70:  8D 06 D1 7D B3 6F E5 2A E4 EF 11 07 00 19 CD 3A    ...}.o.*.......:
014F80:  05 21 2B 00 65 2E 01 E5 CD 8D 06 D1 7D A3 6F CB    .!+.e.......}£o.
014F90:  45 CA B6 41 21 E0 EE E5 21 01 00 E5 21 01 00 CD    E..A!...!...!...
014FA0:  F3 08 21 E0 EE E5 21 E0 EE CD 3A 05 CD A3 08 E5    ..!...!...:..£..
014FB0:  21 01 00 CD F3 08 2A E4 EF 11 14 00 19 5E 23 56    !.....*......^#V
014FC0:  EB 11 07 00 19 CD 3A 05 21 2B 00 65 2E 01 E5 CD    ......:.!+.e....
014FD0:  8D 06 E5 2A E4 EF 11 14 00 19 5E 23 56 EB 11 07    ...*......^#V...
014FE0:  00 19 CD 3A 05 21 2D 00 65 2E 01 E5 CD 8D 06 D1    ...:.!-.e.......
014FF0:  7D B3 6F CB 45 CA 1A 42 21 E5 ED E5 21 01 00 E5    }.o.E..B!...!...
015000:  21 01 00 CD F3 08 21 E5 ED E5 21 E5 ED CD 3A 05    !.....!...!...:.
015010:  CD A3 08 E5 21 01 00 CD F3 08 21 01 00 CD 08 10    .£..!.....!.....
015020:  D9 21 DF ED CD D1 05 2A E4 EF 11 12 00 19 5E 23    .!.....*......^#
015030:  56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62 72 65 CD    V..:..M..nombre.
015040:  8D 06 CB 45 CA 63 42 2A E4 EF 11 12 00 19 5E 23    ...E.cB*......^#
015050:  56 EB 11 07 00 19 CD 3A 05 21 DF ED E5 21 DD ED    V......:.!...!..
015060:  CD F3 1E 2A E4 EF 11 12 00 19 5E 23 56 EB 11 07    ...*......^#V...
015070:  00 19 CD 3A 05 21 2A 00 65 2E 01 E5 CD 8D 06 E5    ...:.!*.e.......
015080:  2A E4 EF 11 12 00 19 5E 23 56 EB 11 14 00 19 5E    *......^#V.....^
015090:  23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62 72 65    #V..:..M..nombre
0150A0:  CD 8D 06 D1 7D A3 6F CB 45 CA D0 42 2A E4 EF 11    ....}£o.E..B*...
0150B0:  12 00 19 5E 23 56 EB 11 14 00 19 5E 23 56 EB 11    ...^#V.....^#V..
0150C0:  07 00 19 CD 3A 05 21 DF ED E5 21 DD ED CD F3 1E    ....:.!...!.....
0150D0:  2A E4 EF 11 07 00 19 CD 3A 05 21 2B 00 65 2E 01    *.......:.!+.e..
0150E0:  E5 CD 8D 06 E5 21 DF ED CD 2C 05 C5 D5 E5 21 00    .....!...,....!.
0150F0:  00 CD 08 10 D9 E1 D1 C1 CD E9 06 D1 7D A3 6F CB    ............}£o.
015100:  45 CA 32 43 21 28 00 E5 21 E5 ED CD 3A 05 CD A2    E.2C!(..!...:...
015110:  09 CD 3D 08 21 E0 EE CD 3A 05 CD 3D 08 21 29 00    ..=.!...:..=.!).
015120:  65 2E 01 E5 CD 3D 08 06 FA 21 E6 EF CD E2 05 C3    e....=...!......
015130:  6A 43 21 28 00 E5 21 E5 ED CD 3A 05 CD A2 09 CD    jC!(..!...:.....
015140:  3D 08 2A E4 EF 11 07 00 19 CD 3A 05 CD 3D 08 21    =.*.......:..=.!
015150:  E0 EE CD 3A 05 CD 3D 08 21 29 00 65 2E 01 E5 CD    ...:..=.!).e....
015160:  3D 08 06 FA 21 E6 EF CD E2 05 C3 04 44 2A E4 EF    =...!.......D*..
015170:  CD 3A 05 CD 4D 05 06 64 69 76 69 73 65 CD 8D 06    .:..M..divise...
015180:  E5 2A E4 EF CD 3A 05 CD 4D 05 05 6D 75 6C 74 69    .*...:..M..multi
015190:  CD 8D 06 D1 7D B3 6F E5 2A E4 EF CD 3A 05 CD 4D    ....}.o.*...:..M
0151A0:  05 05 70 75 69 73 73 CD 8D 06 D1 7D B3 6F CB 45    ..puiss....}.o.E
0151B0:  CA F8 43 2A E4 EF 11 14 00 19 5E 23 56 EB E5 2A    ..C*......^#V..*
0151C0:  E3 EF 26 00 E5 CD 4E 2D 2A E4 EF 11 07 00 19 CD    ..&...N-*.......
0151D0:  3A 05 CD 3D 08 2A E4 EF 11 12 00 19 5E 23 56 EB    :..=.*......^#V.
0151E0:  E5 2A E3 EF 26 00 E5 CD 4E 2D CD 3D 08 06 FA 21    .*..&...N-.=...!
0151F0:  E6 EF CD E2 05 C3 04 44 CD 4D 05 00 06 FA 21 E6    .......D.M....!.
015200:  EF CD E2 05 FD E1 21 E6 EF CD 3A 05 FD E5 01 0F    ......!...:.....
015210:  03 11 D2 ED C3 22 05 01 1A 00 21 B8 ED CD 08 05    ....."....!.....
015220:  FD E1 E1 22 CE ED FD E5 2A CE ED 5E 23 56 EB 11    ..."....*..^#V..
015230:  07 00 19 CD 3A 05 21 2A 00 65 2E 01 E5 CD 8D 06    ....:.!*.e......
015240:  E5 2A CE ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB    .*..^#V.....^#V.
015250:  CD 3A 05 CD 4D 05 06 6E 6F 6D 62 72 65 CD 8D 06    .:..M..nombre...
015260:  D1 7D A3 6F CB 45 CA D9 44 21 C4 ED E5 21 16 00    .}£o.E..D!...!..
015270:  CD E5 1C CD 4D 05 05 6D 75 6C 74 69 06 06 2A C4    ....M..multi..*.
015280:  ED CD E2 05 2A C4 ED 11 07 00 19 E5 21 2A 00 65    ....*.......!*.e
015290:  2E 01 E5 06 0A CD 01 06 2A C4 ED 11 12 00 19 E5    ........*.......
0152A0:  2A CE ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB EB    *..^#V.....^#V..
0152B0:  E1 73 23 72 2A C4 ED 11 14 00 19 E5 2A CE ED 5E    .s#r*.......*..^
0152C0:  23 56 EB 11 14 00 19 E5 CD 4B 2D EB E1 73 23 72    #V.......K-..s#r
0152D0:  2A C4 ED 22 D0 ED C3 14 48 2A CE ED 5E 23 56 EB    *.."....H*..^#V.
0152E0:  11 07 00 19 CD 3A 05 21 78 00 65 2E 01 E5 CD 8D    .....:.!x.e.....
0152F0:  06 E5 2A CE ED 5E 23 56 EB 11 07 00 19 CD 3A 05    ..*..^#V......:.
015300:  21 5E 00 65 2E 01 E5 CD 8D 06 D1 7D B3 6F CB 45    !^.e.......}.o.E
015310:  CA BE 45 21 C4 ED E5 21 16 00 CD E5 1C CD 4D 05    ..E!...!......M.
015320:  05 6D 75 6C 74 69 06 06 2A C4 ED CD E2 05 2A C4    .multi..*.....*.
015330:  ED 11 07 00 19 E5 21 2A 00 65 2E 01 E5 06 0A CD    ......!*.e......
015340:  01 06 2A C4 ED 11 12 00 19 E5 2A CE ED 5E 23 56    ..*.......*..^#V
015350:  EB EB E1 73 23 72 21 C2 ED E5 21 16 00 CD E5 1C    ...s#r!...!.....
015360:  CD 4D 05 06 6E 6F 6D 62 72 65 06 06 2A C2 ED CD    .M..nombre..*...
015370:  E2 05 2A C2 ED 11 07 00 19 E5 CD 4D 05 02 2D 31    ..*........M..-1
015380:  06 0A CD 01 06 2A C2 ED 11 12 00 19 E5 21 00 00    .....*.......!..
015390:  EB E1 73 23 72 2A C2 ED 11 14 00 19 E5 21 00 00    ..s#r*.......!..
0153A0:  EB E1 73 23 72 2A C4 ED 11 14 00 19 E5 2A C2 ED    ..s#r*.......*..
0153B0:  EB E1 73 23 72 2A C4 ED 22 D0 ED C3 14 48 2A CE    ..s#r*.."....H*.
0153C0:  ED 5E 23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62    .^#V..:..M..nomb
0153D0:  72 65 CD 8D 06 CB 45 CA E2 46 21 C4 ED E5 21 16    re....E..F!...!.
0153E0:  00 CD E5 1C CD 4D 05 06 6E 6F 6D 62 72 65 06 06    .....M..nombre..
0153F0:  2A C4 ED CD E2 05 2A C4 ED 11 12 00 19 E5 21 00    *.....*.......!.
015400:  00 EB E1 73 23 72 2A C4 ED 11 14 00 19 E5 21 00    ...s#r*.......!.
015410:  00 EB E1 73 23 72 2A CE ED 5E 23 56 EB 11 07 00    ...s#r*..^#V....
015420:  19 CD 3A 05 21 B8 ED E5 21 BE ED CD F3 1E 21 B8    ..:.!...!.....!.
015430:  ED CD 2C 05 C5 D5 E5 21 FF FF CD 08 10 D9 E1 D1    ..,....!........
015440:  C1 CD FA 09 D9 21 B8 ED CD D1 05 21 B8 ED CD 2C    .....!.....!...,
015450:  05 CD 34 0C C5 D5 E5 21 00 00 CD 08 10 D9 E1 D1    ..4....!........
015460:  C1 CD 88 06 CB 45 CA 86 46 21 B8 ED CD 2C 05 CD    .....E..F!...,..
015470:  D0 0F E5 21 00 00 E5 2A C4 ED 11 07 00 19 06 0A    ...!...*........
015480:  CD BE 1E C3 D9 46 21 B8 ED CD 2C 05 C5 D5 E5 21    .....F!...,....!
015490:  0A 00 E5 21 05 00 E5 2A C4 ED 11 07 00 19 06 0A    ...!...*........
0154A0:  CD BD 1E 21 20 00 65 2E 01 E5 2A C4 ED 11 07 00    ...! .e...*.....
0154B0:  19 CD 3A 05 CD B2 08 E5 21 00 00 D1 CD 92 06 CB    ..:.....!.......
0154C0:  45 CA D9 46 2A C4 ED 11 07 00 19 E5 21 01 00 E5    E..F*.......!...
0154D0:  21 01 00 CD F3 08 C3 A3 46 2A C4 ED 22 D0 ED C3    !......£F*.."...
0154E0:  14 48 2A CE ED 5E 23 56 EB 11 07 00 19 CD 3A 05    .H*..^#V......:.
0154F0:  21 2B 00 65 2E 01 E5 CD 8D 06 CB 45 CA 6E 47 21    !+.e.......E.nG!
015500:  C4 ED E5 21 16 00 CD E5 1C CD 4D 05 04 70 6C 75    ...!......M..plu
015510:  73 06 06 2A C4 ED CD E2 05 2A C4 ED 11 07 00 19    s..*.....*......
015520:  E5 21 2B 00 65 2E 01 E5 06 0A CD 01 06 2A C4 ED    .!+.e........*..
015530:  11 14 00 19 E5 2A CE ED 5E 23 56 EB 11 14 00 19    .....*..^#V.....
015540:  E5 CD 4B 2D EB E1 73 23 72 2A C4 ED 11 12 00 19    ..K-..s#r*......
015550:  E5 2A CE ED 5E 23 56 EB 11 12 00 19 E5 CD 4B 2D    .*..^#V.......K-
015560:  EB E1 73 23 72 2A C4 ED 22 D0 ED C3 14 48 2A CE    ..s#r*.."....H*.
015570:  ED 5E 23 56 EB 11 07 00 19 CD 3A 05 21 2D 00 65    .^#V......:.!-.e
015580:  2E 01 E5 CD 8D 06 CB 45 CA FA 47 21 C4 ED E5 21    .......E..G!...!
015590:  16 00 CD E5 1C CD 4D 05 04 70 6C 75 73 06 06 2A    ......M..plus..*
0155A0:  C4 ED CD E2 05 2A C4 ED 11 07 00 19 E5 21 2B 00    .....*.......!+.
0155B0:  65 2E 01 E5 06 0A CD 01 06 2A C4 ED 11 14 00 19    e........*......
0155C0:  E5 2A CE ED 5E 23 56 EB 11 14 00 19 E5 CD 4B 2D    .*..^#V.......K-
0155D0:  EB E1 73 23 72 2A C4 ED 11 12 00 19 E5 2A CE ED    ..s#r*.......*..
0155E0:  5E 23 56 EB 11 12 00 19 5E 23 56 EB EB E1 73 23    ^#V.....^#V...s#
0155F0:  72 2A C4 ED 22 D0 ED C3 14 48 2A CE ED 5E 23 56    r*.."....H*..^#V
015600:  EB E5 21 00 00 D1 CD 7F 06 CB 45 CA 14 48 21 00    ..!.......E..H!.
015610:  00 22 D0 ED 2A D0 ED D9 01 1A 00 11 B8 ED C3 22    ."..*.........."
015620:  05 01 1C 00 21 9C ED CD 08 05 FD E1 E1 D1 C1 D9    ....!...........
015630:  21 A6 ED CD D1 05 E1 D1 C1 D9 21 AC ED CD D1 05    !.........!.....
015640:  FD E5 21 A6 ED CD 2C 05 CD D0 0F 22 9C ED 21 AC    ..!...,...."..!.
015650:  ED CD 2C 05 C5 D5 E5 21 00 00 CD 08 10 D9 E1 D1    ..,....!........
015660:  C1 CD 88 06 CB 45 CA 79 48 21 00 00 CD 08 10 D9    .....E.yH!......
015670:  21 B2 ED CD D1 05 C3 5A 49 2A 9C ED E5 21 00 00    !......ZI*...!..
015680:  D1 CD 7F 06 CB 45 CA 99 48 21 01 00 CD 08 10 D9    .....E..H!......
015690:  21 B2 ED CD D1 05 C3 5A 49 2A 9C ED E5 21 00 00    !......ZI*...!..
0156A0:  D1 CD CC 06 CB 45 CA F5 48 21 A6 ED CD 2C 05 C5    .....E..H!...,..
0156B0:  D5 E5 21 01 00 CD 08 10 D9 E1 D1 C1 CD F2 09 D9    ..!.............
0156C0:  21 A6 ED CD D1 05 21 AC ED CD 2C 05 C5 D5 E5 21    !.....!...,....!
0156D0:  AC ED CD 2C 05 C5 D5 E5 21 A6 ED CD 2C 05 C5 D5    ...,....!...,...
0156E0:  E5 CD 30 36 D9 E1 D1 C1 CD FA 09 D9 21 B2 ED CD    ..06........!...
0156F0:  D1 05 C3 5A 49 2A 9C ED E5 21 00 00 D1 CD E0 06    ...ZI*...!......
015700:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
015710:  12 00 00 00 02 09 4E E5 12 00 41 02 00 00 00 02    ......N...A.....
015720:  12 00 42 02 00 00 00 02 12 00 43 02 00 00 00 02    ..B.......C.....
015730:  12 00 44 02 00 00 00 02 12 00 45 02 00 00 00 02    ..D.......E.....
015740:  12 00 46 02 00 00 00 02 12 00 47 02 00 00 00 02    ..F.......G.....
015750:  12 00 48 02 00 00 00 02 12 00 49 02 00 00 00 02    ..H.......I.....
015760:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
015770:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
015780:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
015790:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0157A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0157B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0157C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0157D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0157E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0157F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
015800:  CB 45 CA 5A 49 21 A6 ED CD 2C 05 C5 D5 E5 21 01    .E.ZI!...,....!.
015810:  00 CD 08 10 D9 E1 D1 C1 CD E9 09 D9 21 A6 ED CD    ............!...
015820:  D1 05 21 01 00 E5 21 AC ED CD 2C 05 D9 E1 CD 08    ..!...!...,.....
015830:  10 CD FF 09 C5 D5 E5 21 AC ED CD 2C 05 C5 D5 E5    .......!...,....
015840:  21 A6 ED CD 2C 05 C5 D5 E5 CD 30 36 D9 E1 D1 C1    !...,.....06....
015850:  CD FA 09 D9 21 B2 ED CD D1 05 21 B2 ED CD 2C 05    ....!.....!...,.
015860:  D9 01 1C 00 11 9C ED C3 22 05 01 20 00 21 7C ED    ........".. .!|.
015870:  CD 08 05 FD E1 E1 22 9A ED FD E5 CD 3E 02 CD 9B    ......".....>...
015880:  14 CD BA 17 0D 76 61 6C 65 75 72 20 64 65 20 78    .....valeur de x
015890:  20 3F CD 1B 20 21 AB F1 CD CB 14 CD 72 16 CD 1B     ?.. !......r...
0158A0:  20 21 01 00 7D 32 B1 F1 2A 9A ED E5 21 AB F1 CD     !..}2..*...!...
0158B0:  2C 05 C5 D5 E5 CD 48 2D D9 21 A5 F1 CD D1 05 21    ,.....H-.!.....!
0158C0:  AB F1 CD 2C 05 CD 34 0C C5 D5 E5 21 00 00 CD 08    ...,..4....!....
0158D0:  10 D9 E1 D1 C1 CD 88 06 CB 45 CA F6 49 21 AB F1    .........E..I!..
0158E0:  CD 2C 05 CD D0 0F E5 21 00 00 E5 21 87 ED 06 0A    .,.....!...!....
0158F0:  CD BE 1E C3 0F 4A 21 AB F1 CD 2C 05 C5 D5 E5 21    .....J!...,....!
015900:  08 00 E5 21 03 00 E5 21 87 ED 06 0A CD BD 1E 2A    ...!...!.......*
015910:  B1 F1 26 00 E5 21 01 00 D1 CD 7F 06 CB 45 CA B7    ..&..!.......E..
015920:  4A CD 9B 14 21 66 00 CD 22 17 2A 96 F2 E5 21 00    J...!f..".*...!.
015930:  00 CD 26 17 21 28 00 CD 22 17 21 87 ED CD 3A 05    ..&.!(..".!...:.
015940:  21 00 00 CD AA 17 CD BA 17 02 29 3D CD 1B 20 21    !.........)=.. !
015950:  A5 F1 CD 2C 05 CD 34 0C C5 D5 E5 21 00 00 CD 08    ...,..4....!....
015960:  10 D9 E1 D1 C1 CD 88 06 CB 45 CA 86 4A 21 A5 F1    .........E..J!..
015970:  CD 2C 05 CD D0 0F E5 21 00 00 E5 21 7C ED 06 0A    .,.....!...!|...
015980:  CD BE 1E C3 9F 4A 21 A5 F1 CD 2C 05 C5 D5 E5 21    .....J!...,....!
015990:  08 00 E5 21 03 00 E5 21 7C ED 06 0A CD BD 1E 21    ...!...!|......!
0159A0:  7C ED CD 3A 05 CD 9B 14 21 00 00 CD AA 17 CD CD    |..:....!.......
0159B0:  17 CD 1B 20 C3 F9 4A CD 9B 14 21 66 00 CD 22 17    ... ..J...!f..".
0159C0:  2A 96 F2 E5 21 00 00 CD 26 17 21 28 00 CD 22 17    *...!...&.!(..".
0159D0:  21 87 ED CD 3A 05 21 00 00 CD AA 17 CD BA 17 13    !...:.!.........
0159E0:  29 20 6E 27 65 73 74 20 70 61 73 20 64 65 66 69    ) n'est pas defi
0159F0:  6E 69 65 CD CD 17 CD 1B 20 CD 9B 14 CD BA 17 23    nie..... ......#
015A00:  3C 31 3E 20 55 6E 20 61 75 74 72 65 20 78 3F 20    <1> Un autre x? 
015A10:  3C 32 3E 20 52 65 74 6F 75 72 20 61 75 20 6D 65    <2> Retour au me
015A20:  6E 75 20 CD CD 17 CD 1B 20 21 BA 00 CD A9 14 21    nu ..... !.....!
015A30:  A3 F2 CD 44 16 CD 1B 20 2A A3 F2 26 00 E5 21 31    £..D... *£.&..!1
015A40:  00 D1 CD 7F 06 E5 2A A3 F2 26 00 E5 21 32 00 D1    ......*£.&..!2..
015A50:  CD 7F 06 D1 7D B3 6F CB 45 CA 29 4B 2A A3 F2 26    ....}.o.E.)K*£.&
015A60:  00 65 2E 01 E5 21 8E F2 E5 21 92 F2 CD F4 1E CD    .e...!...!......
015A70:  9B 14 CD CD 17 CD 1B 20 2A 8E F2 E5 21 02 00 D1    ....... *...!...
015A80:  CD 7F 06 CB 45 CA 7E 49 01 20 00 11 7C ED C3 22    ....E.~I. ..|.."
015A90:  05 01 0A 00 21 72 ED CD 08 05 CD 3E 02 CD 9B 14    ....!r.....>....
015AA0:  CD CD 17 CD 1B 20 CD 9B 14 CD BA 17 09 20 4D 20    ..... ....... M 
015AB0:  45 20 4E 20 55 20 CD CD 17 CD 1B 20 CD 9B 14 CD    E N U ..... ....
015AC0:  CD 17 CD 1B 20 CD 9B 14 CD BA 17 19 3C 31 3E 20    .... .......<1> 
015AD0:  45 6E 74 72 65 65 20 64 65 20 6C 61 20 66 6F 6E    Entree de la fon
015AE0:  63 74 69 6F 6E CD CD 17 CD 1B 20 CD 9B 14 CD CD    ction..... .....
015AF0:  17 CD 1B 20 CD 9B 14 CD BA 17 1D 3C 32 3E 20 43    ... .......<2> C
015B00:  61 6C 63 75 6C 20 64 65 20 76 61 6C 65 75 72 73    alcul de valeurs
015B10:  20 64 65 20 66 28 78 29 CD CD 17 CD 1B 20 CD 9B     de f(x)..... ..
015B20:  14 CD CD 17 CD 1B 20 CD 9B 14 CD BA 17 18 3C 33    ...... .......<3
015B30:  3E 20 47 72 61 70 68 65 73 20 64 65 20 66 6F 6E    > Graphes de fon
015B40:  63 74 69 6F 6E 73 CD CD 17 CD 1B 20 CD 9B 14 CD    ctions..... ....
015B50:  CD 17 CD 1B 20 CD 9B 14 CD BA 17 14 3C 34 3E 20    .... .......<4> 
015B60:  46 69 6E 20 64 75 20 70 72 6F 67 72 61 6D 6D 65    Fin du programme
015B70:  CD CD 17 CD 1B 20 CD 9B 14 CD CD 17 CD 1B 20 CD    ..... ........ .
015B80:  9B 14 CD BA 17 0E 20 56 4F 54 52 45 20 43 48 4F    ...... VOTRE CHO
015B90:  49 58 3F 20 CD CD 17 CD 1B 20 21 BA 00 CD A9 14    IX? ..... !.....
015BA0:  21 A3 F2 CD 44 16 CD 1B 20 2A A3 F2 26 00 E5 21    !£..D... *£.&..!
015BB0:  30 00 D1 CD CC 06 E5 2A A3 F2 26 00 E5 21 35 00    0......*£.&..!5.
015BC0:  D1 CD E0 06 D1 7D A3 6F CB 45 CA 9A 4C 2A A3 F2    .....}£o.E..L*£.
015BD0:  26 00 65 2E 01 E5 21 8E F2 E5 21 92 F2 CD F4 1E    &.e...!...!.....
015BE0:  2A 8E F2 22 7A ED 2A 7A ED D9 01 0A 00 11 72 ED    *.."z.*z......r.
015BF0:  C3 22 05 01 0C 00 21 66 ED CD 08 05 21 20 00 7D    ."....!f....! .}
015C00:  32 A3 F2 21 BA 00 CD A9 14 21 A3 F2 CD 44 16 CD    2£.!.....!£..D..
015C10:  1B 20 2A A3 F2 26 00 E5 21 30 00 D1 CD CC 06 E5    . *£.&..!0......
015C20:  2A A3 F2 26 00 E5 21 3A 00 D1 CD E0 06 D1 7D A3    *£.&..!:......}£
015C30:  6F CB 45 CA 03 4D CD 9B 14 CD CD 17 CD 1B 20 2A    o.E..M........ *
015C40:  A3 F2 26 00 65 2E 01 E5 21 66 ED E5 21 92 F2 CD    £.&.e...!f..!...
015C50:  F4 1E 2A 66 ED 22 70 ED 2A 70 ED D9 01 0C 00 11    ..*f."p.*p......
015C60:  66 ED C3 22 05 C3 C1 51 01 0A 00 21 5C ED CD 08    f.."...Q...!\...
015C70:  05 CD 91 4B 22 8E F2 2A 8E F2 11 01 00 B7 ED 52    ...K"..*.......R
015C80:  C2 D9 4D CD 9B 14 CD BA 17 1A 4E 6F 20 64 65 20    ..M.......No de 
015C90:  6C 61 20 66 6F 6E 63 74 69 6F 6E 20 28 31 20 61    la fonction (1 a
015CA0:  20 39 29 3F CD 1B 20 CD F3 4C 22 96 F2 CD 3E 02     9)?.. ..L"...>.
015CB0:  21 20 00 7D 32 A3 F2 21 A4 F2 E5 2A 96 F2 29 D1    ! .}2£.!...*..).
015CC0:  19 E5 CD 1F 21 21 A4 F2 E5 2A 96 F2 29 D1 19 E5    ....!!...*..)...
015CD0:  CD 51 2D CD E3 2C C3 DC 4E 19 11 02 00 B7 ED 52    .Q-..,..N......R
015CE0:  C2 CB 4E CD 3E 02 CD 9B 14 CD BA 17 1A 4E 6F 20    ..N.>........No 
015CF0:  64 65 20 6C 61 20 66 6F 6E 63 74 69 6F 6E 20 28    de la fonction (
015D00:  31 20 61 20 39 29 3F CD 1B 20 CD F3 4C 22 96 F2    1 a 9)?.. ..L"..
015D10:  21 B2 F1 E5 2A 96 F2 29 D1 19 5E 23 56 EB E5 21    !...*..)..^#V..!
015D20:  00 00 D1 CD CC 06 CB 45 CA B6 4E 21 01 00 E5 21    .......E..N!...!
015D30:  B2 F1 E5 2A 96 F2 29 D1 19 5E 23 56 EB D1 CD 66    ...*..)..^#V...f
015D40:  06 7A B3 CA B6 4E D5 22 5C ED CD 9B 14 CD BA 17    .z...N."\.......
015D50:  16 56 61 6C 65 75 72 20 64 75 20 70 61 72 61 6D    .Valeur du param
015D60:  65 74 72 65 20 6E 2E CD 1B 20 2A 5C ED CD 9B 14    etre n... *\....
015D70:  E5 21 00 00 CD 26 17 CD 1B 20 CD 9B 14 CD BA 17    .!...&... ......
015D80:  02 20 3D CD 1B 20 21 C8 F1 E5 2A 5C ED 2B 29 E5    . =.. !...*\.+).
015D90:  29 29 29 29 29 D1 19 D1 19 E5 2A 96 F2 29 5D 54    ))))).....*..)]T
015DA0:  29 19 D1 19 CD CB 14 CD 72 16 CD 1B 20 2A 5C ED    ).......r... *\.
015DB0:  23 D1 1B C3 41 4E 21 A4 F2 E5 2A 96 F2 29 D1 19    #...AN!...*..)..
015DC0:  5E 23 56 EB E5 CD 6A 49 C3 DC 4E 19 11 03 00 B7    ^#V...jI..N.....
015DD0:  ED 52 C2 DC 4E 21 00 00 E5 CD 65 4D 2A 8E F2 E5    .R..N!....eM*...
015DE0:  21 04 00 D1 CD 7F 06 CB 45 CA 71 4D 01 0A 00 11    !.......E.qM....
015DF0:  5C ED C3 22 05 01 0C 00 21 50 ED CD 08 05 FD E1    \.."....!P......
015E00:  E1 22 58 ED E1 22 5A ED FD E5 2A 5A ED EB 2A 58    ."X.."Z...*Z..*X
015E10:  ED CD 5A FC F9 BB 01 0C 00 11 50 ED C3 22 05 01    ..Z.......P.."..
015E20:  0C 00 21 44 ED CD 08 05 FD E1 E1 22 4C ED E1 22    ..!D......."L.."
015E30:  4E ED FD E5 2A 4E ED EB 2A 4C ED CD 5A FC F6 BB    N...*N..*L..Z...
015E40:  01 0C 00 11 44 ED C3 22 05 01 0C 00 21 38 ED CD    ....D.."....!8..
015E50:  08 05 FD E1 E1 22 40 ED E1 22 42 ED FD E5 2A 42    ....."@.."B...*B
015E60:  ED EB 2A 40 ED CD 5A FC C0 BB 01 0C 00 11 38 ED    ..*@..Z.......8.
015E70:  C3 22 05 01 0C 00 21 2C ED CD 08 05 FD E1 E1 22    ."....!,......."
015E80:  34 ED E1 22 36 ED FD E5 2A 36 ED EB 2A 34 ED CD    4.."6...*6..*4..
015E90:  5A FC C3 BB 01 0C 00 11 2C ED C3 22 05 01 0C 00    Z.......,.."....
015EA0:  21 20 ED CD 08 05 FD E1 E1 22 28 ED E1 22 2A ED    ! ......."(.."*.
015EB0:  FD E5 2A 2A ED EB 2A 28 ED CD 5A FC EA BB 01 0C    ..**..*(..Z.....
015EC0:  00 11 20 ED C3 22 05 01 0C 00 21 14 ED CD 08 05    .. .."....!.....
015ED0:  FD E1 E1 22 1C ED E1 22 1E ED FD E5 2A 1E ED EB    ..."..."....*...
015EE0:  2A 1C ED CD 5A FC ED BB 01 0C 00 11 14 ED C3 22    *...Z.........."
015EF0:  05 01 0C 00 21 08 ED CD 08 05 FD E1 E1 22 10 ED    ....!........"..
015F00:  E1 22 12 ED FD E5 2A 12 ED EB 2A 10 ED CD 5A FC    ."....*...*...Z.
015F10:  C9 BB 01 0C 00 11 08 ED C3 22 05 01 0A 00 21 FE    ........."....!.
015F20:  EC CD 08 05 FD E1 E1 7D 32 06 ED E1 7D 32 07 ED    .......}2...}2..
015F30:  FD E5 3A 07 ED 47 3A 06 ED 4F CD 5A FC 38 BC 01    ..:..G:..O.Z.8..
015F40:  0A 00 11 FE EC C3 22 05 01 0E 00 21 F0 EC CD 08    ......"....!....
015F50:  05 FD E1 E1 22 F9 EC E1 22 FB EC FD E5 2A FB EC    ...."..."....*..
015F60:  EB 2A F9 EC CD 5A FC F0 BB 32 F0 EC 2A F0 EC 26    .*...Z...2..*..&
015F70:  00 7D 32 FD EC 2A FD EC 26 00 D9 01 0E 00 11 F0    .}2..*..&.......
015F80:  EC C3 22 05 01 10 00 21 E0 EC CD 08 05 21 BC 00    .."....!.....!..
015F90:  CD BA 14 21 1B 00 CD 22 17 21 40 00 CD 22 17 21    ...!...".!@..".!
015FA0:  1B 00 CD 22 17 21 33 00 CD 22 17 21 15 00 CD 22    ...".!3..".!..."
015FB0:  17 CD 1B 20 21 00 00 E5 21 1C 00 D1 CD 66 06 7A    ... !...!....f.z
015FC0:  B3 CA 9D 51 D5 22 E4 EC 21 BC 00 CD BA 14 21 1B    ...Q."..!.....!.
015FD0:  00 CD 22 17 21 2A 00 CD 22 17 21 03 00 CD 22 17    ..".!*..".!...".
015FE0:  21 00 00 CD 22 17 21 05 00 CD 22 17 CD 1B 20 21    !...".!..."... !
015FF0:  00 00 E5 21 7F 02 D1 CD 66 06 7A B3 CA 7F 51 D5    ...!....f.z...Q.
016000:  22 E6 EC 21 00 00 22 E0 EC 21 00 00 E5 21 06 00    "..!.."..!...!..
016010:  D1 CD 66 06 7A B3 CA 61 51 D5 22 E2 EC 2A E0 EC    ..f.z..aQ."..*..
016020:  E5 21 02 00 D1 CD F5 06 E5 2A E6 EC E5 21 8E 01    .!.......*...!..
016030:  E5 2A E4 EC E5 21 07 00 D1 CD F5 06 E5 2A E2 EC    .*...!.......*..
016040:  D1 19 E5 21 02 00 D1 CD F5 06 D1 EB B7 ED 52 E5    ...!..........R.
016050:  CD 48 50 D1 19 22 E0 EC 2A E2 EC 23 D1 1B C3 14    .HP.."..*..#....
016060:  51 21 BC 00 CD BA 14 2A E0 EC CD 22 17 2A E0 EC    Q!.....*...".*..
016070:  CD 22 17 CD 1B 20 2A E6 EC 23 D1 1B C3 FA 50 21    ."... *..#....P!
016080:  BC 00 CD BA 14 21 0D 00 CD 22 17 21 0A 00 CD 22    .....!...".!..."
016090:  17 CD 1B 20 2A E4 EC 23 D1 1B C3 BF 50 21 BC 00    ... *..#....P!..
0160A0:  CD BA 14 21 0D 00 CD 22 17 21 1B 00 CD 22 17 21    ...!...".!...".!
0160B0:  40 00 CD 22 17 CD 1B 20 01 10 00 11 E0 EC C3 22    @.."... ......."
0160C0:  05 01 E3 00 21 FD EB CD 08 05 FD E1 E1 22 DE EC    ....!........"..
0160D0:  FD E5 CD 3E 02 2A DE EC E5 21 00 00 D1 CD 7F 06    ...>.*...!......
0160E0:  CB 45 CA D2 52 CD 9B 14 CD BA 17 0F 31 2D 43 6F    .E..R.......1-Co
0160F0:  75 72 62 65 20 79 3D 66 28 78 29 CD CD 17 CD 1B    urbe y=f(x).....
016100:  20 CD 9B 14 CD CD 17 CD 1B 20 CD 9B 14 CD BA 17     ........ ......
016110:  16 32 2D 43 6F 75 72 62 65 20 78 3D 66 28 74 29    .2-Courbe x=f(t)
016120:  3B 79 3D 66 28 74 29 CD CD 17 CD 1B 20 CD 9B 14    ;y=f(t)..... ...
016130:  CD CD 17 CD 1B 20 CD 9B 14 CD BA 17 17 33 2D 43    ..... .......3-C
016140:  6F 75 72 62 65 20 70 6F 6C 61 69 72 65 20 72 3D    ourbe polaire r=
016150:  66 28 74 29 CD CD 17 CD 1B 20 CD 9B 14 CD CD 17    f(t)..... ......
016160:  CD 1B 20 CD 9B 14 CD BA 17 0D 56 6F 74 72 65 20    .. .......Votre 
016170:  63 68 6F 69 78 3F 20 CD 1B 20 21 BA 00 CD A9 14    choix? .. !.....
016180:  21 A3 F2 CD 44 16 CD 1B 20 2A A3 F2 26 00 E5 21    !£..D... *£.&..!
016190:  30 00 D1 CD CC 06 E5 2A A3 F2 26 00 E5 21 34 00    0......*£.&..!4.
0161A0:  D1 CD E0 06 D1 7D A3 6F CB 45 CA 7A 52 CD 9B 14    .....}£o.E.zR...
0161B0:  CD CD 17 CD 1B 20 2A A3 F2 26 00 65 2E 01 E5 21    ..... *£.&.e...!
0161C0:  8E F2 E5 21 92 F2 CD F4 1E CD 9B 14 CD CD 17 CD    ...!............
0161D0:  1B 20 CD 9B 14 CD CD 17 CD 1B 20 CD 9B 14 CD BA    . ........ .....
0161E0:  17 11 41 62 73 63 69 73 73 65 20 6F 72 69 67 69    ..Abscisse origi
0161F0:  6E 65 20 CD 1B 20 21 D0 EC CD CB 14 CD 72 16 CD    ne .. !......r..
016200:  1B 20 CD 9B 14 CD BA 17 11 4F 72 64 6F 6E 6E 65    . .......Ordonne
016210:  65 20 6F 72 69 67 69 6E 65 20 CD 1B 20 21 CA EC    e origine .. !..
016220:  CD CB 14 CD 72 16 CD 1B 20 CD 9B 14 CD BA 17 1D    ....r... .......
016230:  42 6F 72 6E 65 20 69 6E 66 65 72 69 65 75 72 65    Borne inferieure
016240:  20 69 6E 74 20 64 27 65 74 75 64 65 20 CD 1B 20     int d'etude .. 
016250:  21 C4 EC CD CB 14 CD 72 16 CD 1B 20 CD 9B 14 CD    !......r... ....
016260:  BA 17 1D 42 6F 72 6E 65 20 73 75 70 65 72 69 65    ...Borne superie
016270:  75 72 65 20 69 6E 74 20 64 27 65 74 75 64 65 20    ure int d'etude 
016280:  CD 1B 20 21 BE EC CD CB 14 CD 72 16 CD 1B 20 CD    .. !......r... .
016290:  9B 14 CD BA 17 0F 55 6E 69 74 65 20 61 62 73 63    ......Unite absc
0162A0:  69 73 73 65 20 CD 1B 20 21 B8 EC CD CB 14 CD 72    isse .. !......r
0162B0:  16 CD 1B 20 CD 9B 14 CD BA 17 0F 55 6E 69 74 65    ... .......Unite
0162C0:  20 6F 72 64 6F 6E 6E 65 65 20 CD 1B 20 21 B2 EC     ordonnee .. !..
0162D0:  CD CB 14 CD 72 16 CD 1B 20 CD 9B 14 CD BA 17 0C    ....r... .......
0162E0:  50 61 73 20 64 27 65 74 75 64 65 20 CD 1B 20 21    Pas d'etude .. !
0162F0:  AC EC CD CB 14 CD 72 16 CD 1B 20 2A DE EC E5 21    ......r... *...!
016300:  00 00 D1 CD 7F 06 CB 45 CA AC 5A CD 9B 14 CD BA    .......E..Z.....
016310:  17 2C 4E 6F 6D 62 72 65 20 64 65 20 67 72 61 70    .,Nombre de grap
016320:  68 65 73 20 73 75 72 20 6C 65 20 6D 65 6D 65 20    hes sur le meme 
016330:  65 63 72 61 6E 20 28 31 20 61 20 39 29 3F CD 1B    ecran (1 a 9)?..
016340:  20 CD F3 4C 22 A6 EC 21 00 00 22 A0 EC 21 01 00     ..L"..!.."..!..
016350:  E5 2A A6 EC D1 CD 66 06 7A B3 CA AC 5A D5 22 A4    .*....f.z...Z.".
016360:  EC 2A 8E F2 11 01 00 B7 ED 52 C2 D3 55 CD 9B 14    .*.......R..U...
016370:  CD BA 17 1B 4E 6F 20 64 65 20 6C 61 20 66 6F 6E    ....No de la fon
016380:  63 74 69 6F 6E 20 79 3D 66 28 78 29 20 6E 2E 2A    ction y=f(x) n.*
016390:  A4 EC E5 21 00 00 CD 26 17 CD BA 17 02 20 3D CD    ...!...&..... =.
0163A0:  1B 20 21 89 EC E5 2A A4 EC 2B 29 D1 19 E5 CD F3    . !...*..+).....
0163B0:  4C EB E1 73 23 72 21 A4 F2 E5 21 89 EC E5 2A A4    L..s#r!...!...*.
0163C0:  EC 2B 29 D1 19 5E 23 56 EB 29 D1 19 5E 23 56 EB    .+)..^#V.)..^#V.
0163D0:  E5 21 00 00 D1 CD 7F 06 CB 45 CA 21 55 21 A4 F2    .!.......E.!U!..
0163E0:  E5 21 89 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB    .!...*..+)..^#V.
0163F0:  29 D1 19 E5 CD 1F 21 21 B2 F1 E5 21 89 EC E5 2A    ).....!!...!...*
016400:  A4 EC 2B 29 D1 19 5E 23 56 EB 29 D1 19 E5 21 B2    ..+)..^#V.)...!.
016410:  F1 E5 2A 96 F2 29 D1 19 5E 23 56 EB EB E1 73 23    ..*..)..^#V...s#
016420:  72 21 B2 F1 E5 21 89 EC E5 2A A4 EC 2B 29 D1 19    r!...!...*..+)..
016430:  5E 23 56 EB 29 D1 19 5E 23 56 EB E5 21 00 00 D1    ^#V.)..^#V..!...
016440:  CD CC 06 CB 45 CA D0 55 21 01 00 E5 21 B2 F1 E5    ....E..U!...!...
016450:  21 89 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB 29    !...*..+)..^#V.)
016460:  D1 19 5E 23 56 EB D1 CD 66 06 7A B3 CA D0 55 D5    ..^#V...f.z...U.
016470:  22 A2 EC 2A A0 EC E5 21 01 00 D1 19 22 A0 EC CD    "..*...!...."...
016480:  9B 14 CD BA 17 16 56 61 6C 65 75 72 20 64 75 20    ......Valeur du 
016490:  70 61 72 61 6D 65 74 72 65 20 6E 2E 2A A2 EC E5    parametre n.*...
0164A0:  21 00 00 CD 26 17 CD BA 17 02 20 3D CD 1B 20 21    !...&..... =.. !
0164B0:  FD EB E5 2A A0 EC 2B 29 5D 54 29 19 D1 19 CD CB    ...*..+)]T).....
0164C0:  14 CD 72 16 CD 1B 20 2A A2 EC 23 D1 1B C3 6A 55    ..r... *..#...jU
0164D0:  C3 A3 5A 19 11 02 00 B7 ED 52 C2 36 59 CD 9B 14    .£Z......R.6Y...
0164E0:  CD BA 17 1B 4E 6F 20 64 65 20 6C 61 20 66 6F 6E    ....No de la fon
0164F0:  63 74 69 6F 6E 20 78 3D 66 28 74 29 20 6E 2E 2A    ction x=f(t) n.*
016500:  A4 EC E5 21 00 00 CD 26 17 CD BA 17 02 20 3D CD    ...!...&..... =.
016510:  1B 20 21 89 EC E5 2A A4 EC 2B 29 D1 19 E5 CD F3    . !...*..+).....
016520:  4C EB E1 73 23 72 21 A4 F2 E5 21 89 EC E5 2A A4    L..s#r!...!...*.
016530:  EC 2B 29 D1 19 5E 23 56 EB 29 D1 19 5E 23 56 EB    .+)..^#V.)..^#V.
016540:  E5 21 00 00 D1 CD 7F 06 CB 45 CA 91 56 21 A4 F2    .!.......E..V!..
016550:  E5 21 89 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB    .!...*..+)..^#V.
016560:  29 D1 19 E5 CD 1F 21 21 B2 F1 E5 21 89 EC E5 2A    ).....!!...!...*
016570:  A4 EC 2B 29 D1 19 5E 23 56 EB 29 D1 19 E5 21 B2    ..+)..^#V.)...!.
016580:  F1 E5 2A 96 F2 29 D1 19 5E 23 56 EB EB E1 73 23    ..*..)..^#V...s#
016590:  72 21 B2 F1 E5 21 89 EC E5 2A A4 EC 2B 29 D1 19    r!...!...*..+)..
0165A0:  5E 23 56 EB 29 D1 19 5E 23 56 EB E5 21 00 00 D1    ^#V.)..^#V..!...
0165B0:  CD CC 06 CB 45 CA 40 57 21 01 00 E5 21 B2 F1 E5    ....E.@W!...!...
0165C0:  21 89 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB 29    !...*..+)..^#V.)
0165D0:  D1 19 5E 23 56 EB D1 CD 66 06 7A B3 CA 40 57 D5    ..^#V...f.z..@W.
0165E0:  22 A2 EC 2A A0 EC E5 21 01 00 D1 19 22 A0 EC CD    "..*...!...."...
0165F0:  9B 14 CD BA 17 16 56 61 6C 65 75 72 20 64 75 20    ......Valeur du 
016600:  70 61 72 61 6D 65 74 72 65 20 6E 2E 2A A2 EC E5    parametre n.*...
016610:  21 00 00 CD 26 17 CD BA 17 02 20 3D CD 1B 20 21    !...&..... =.. !
016620:  FD EB E5 2A A0 EC 2B 29 5D 54 29 19 D1 19 CD CB    ...*..+)]T).....
016630:  14 CD 72 16 CD 1B 20 2A A2 EC 23 D1 1B C3 DA 56    ..r... *..#....V
016640:  CD 9B 14 CD BA 17 1B 4E 6F 20 64 65 20 6C 61 20    .......No de la 
016650:  66 6F 6E 63 74 69 6F 6E 20 79 3D 66 28 74 29 20    fonction y=f(t) 
016660:  6E 2E 2A A4 EC E5 21 00 00 CD 26 17 CD BA 17 02    n.*...!...&.....
016670:  20 3D CD 1B 20 21 75 EC E5 2A A4 EC 2B 29 D1 19     =.. !u..*..+)..
016680:  E5 CD F3 4C EB E1 73 23 72 21 A4 F2 E5 21 75 EC    ...L..s#r!...!u.
016690:  E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB 29 D1 19 5E    .*..+)..^#V.)..^
0166A0:  23 56 EB E5 21 00 00 D1 CD 7F 06 CB 45 CA F4 57    #V..!.......E..W
0166B0:  21 A4 F2 E5 21 75 EC E5 2A A4 EC 2B 29 D1 19 5E    !...!u..*..+)..^
0166C0:  23 56 EB 29 D1 19 E5 CD 1F 21 21 B2 F1 E5 21 75    #V.).....!!...!u
0166D0:  EC E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB 29 D1 19    ..*..+)..^#V.)..
0166E0:  E5 21 B2 F1 E5 2A 96 F2 29 D1 19 5E 23 56 EB EB    .!...*..)..^#V..
0166F0:  E1 73 23 72 21 75 EC E5 2A A4 EC 2B 29 D1 19 5E    .s#r!u..*..+)..^
016700:  23 56 EB E5 21 89 EC E5 2A A4 EC 2B 29 D1 19 5E    #V..!...*..+)..^
016710:  23 56 EB D1 CD 7F 06 CB 45 CA 84 58 21 75 EC E5    #V......E..X!u..
016720:  2A A4 EC 2B 29 D1 19 E5 21 00 00 EB E1 73 23 72    *..+)...!....s#r
016730:  21 A4 F2 E5 21 00 00 29 D1 19 E5 21 A4 F2 E5 21    !...!..)...!...!
016740:  89 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB 29 D1    ...*..+)..^#V.).
016750:  19 5E 23 56 EB EB E1 73 23 72 21 B2 F1 E5 21 00    .^#V...s#r!...!.
016760:  00 29 D1 19 E5 21 B2 F1 E5 21 89 EC E5 2A A4 EC    .)...!...!...*..
016770:  2B 29 D1 19 5E 23 56 EB 29 D1 19 5E 23 56 EB EB    +)..^#V.)..^#V..
016780:  E1 73 23 72 21 B2 F1 E5 21 75 EC E5 2A A4 EC 2B    .s#r!...!u..*..+
016790:  29 D1 19 5E 23 56 EB 29 D1 19 5E 23 56 EB E5 21    )..^#V.)..^#V..!
0167A0:  00 00 D1 CD CC 06 CB 45 CA 33 59 21 01 00 E5 21    .......E.3Y!...!
0167B0:  B2 F1 E5 21 75 EC E5 2A A4 EC 2B 29 D1 19 5E 23    ...!u..*..+)..^#
0167C0:  56 EB 29 D1 19 5E 23 56 EB D1 CD 66 06 7A B3 CA    V.)..^#V...f.z..
0167D0:  33 59 D5 22 A2 EC 2A A0 EC E5 21 01 00 D1 19 22    3Y."..*...!...."
0167E0:  A0 EC CD 9B 14 CD BA 17 16 56 61 6C 65 75 72 20    .........Valeur 
0167F0:  64 75 20 70 61 72 61 6D 65 74 72 65 20 6E 2E 2A    du parametre n.*
016800:  20 28 28 66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D     ((f^.g^.valeur=
016810:  27 2B 27 29 6F 72 28 66 5E 2E 67 5E 2E 76 61 6C    '+')or(f^.g^.val
016820:  65 75 72 3D 27 2D 27 29 29 20 74 68 65 6E 0D 0A    eur='-')) then..
016830:  20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20         begin..    
016840:  20 64 65 6C 65 74 65 28 77 77 78 2C 31 2C 31 29     delete(wwx,1,1)
016850:  3B 64 65 6C 65 74 65 28 77 77 78 2C 6C 65 6E 67    ;delete(wwx,leng
016860:  74 68 28 77 77 78 29 2C 31 29 3B 0D 0A 20 20 20    th(wwx),1);..   
016870:  20 20 65 6E 64 3B 63 6F 65 66 66 3A 3D 31 3B 0D      end;coeff:=1;.
016880:  0A 20 20 20 20 20 69 66 20 66 5E 2E 64 5E 2E 6E    .     if f^.d^.n
016890:  61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 20 74    ature='nombre' t
0168A0:  68 65 6E 20 76 61 6C 28 66 5E 2E 64 5E 2E 76 61    hen val(f^.d^.va
0168B0:  6C 65 75 72 2C 63 6F 65 66 66 2C 72 65 73 75 6C    leur,coeff,resul
0168C0:  74 61 74 29 3B 0D 0A 20 20 20 20 20 69 66 20 28    tat);..     if (
0168D0:  28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 2A    (f^.d^.valeur='*
0168E0:  27 29 61 6E 64 20 28 66 5E 2E 64 5E 2E 67 5E 2E    ')and (f^.d^.g^.
0168F0:  6E 61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 29    nature='nombre')
016900:  29 20 74 68 65 6E 0D 0A 20 20 20 20 20 76 61 6C    ) then..     val
016910:  28 66 5E 2E 64 5E 2E 67 5E 2E 76 61 6C 65 75 72    (f^.d^.g^.valeur
016920:  2C 63 6F 65 66 66 2C 72 65 73 75 6C 74 61 74 29    ,coeff,resultat)
016930:  3B 0D 0A 20 20 20 20 20 69 66 20 28 28 66 5E 2E    ;..     if ((f^.
016940:  76 61 6C 65 75 72 3D 27 2B 27 29 20 61 6E 64 20    valeur='+') and 
016950:  28 63 6F 65 66 66 3C 30 29 29 20 74 68 65 6E 0D    (coeff<0)) then.
016960:  0A 20 20 20 20 74 61 70 65 66 6F 6E 63 74 69 6F    .    tapefonctio
016970:  6E 3A 3D 27 28 27 2B 77 77 78 2B 77 77 77 2B 27    n:='('+wwx+www+'
016980:  29 27 20 65 6C 73 65 0D 0A 20 20 20 74 61 70 65    )' else..   tape
016990:  66 6F 6E 63 74 69 6F 6E 3A 3D 27 28 27 2B 77 77    fonction:='('+ww
0169A0:  78 2B 66 5E 2E 76 61 6C 65 75 72 2B 77 77 77 2B    x+f^.valeur+www+
0169B0:  27 29 27 0D 0A 20 20 20 65 6E 64 0D 0A 20 20 20    ')'..   end..   
0169C0:  65 6C 73 65 0D 0A 69 66 20 28 28 66 5E 2E 6E 61    else..if ((f^.na
0169D0:  74 75 72 65 3D 27 64 69 76 69 73 65 27 29 20 6F    ture='divise') o
0169E0:  72 20 28 66 5E 2E 6E 61 74 75 72 65 3D 27 6D 75    r (f^.nature='mu
0169F0:  6C 74 69 27 29 20 6F 72 20 28 66 5E 2E 6E 61 74    lti') or (f^.nat
016A00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
016A10:  13 00 00 00 02 09 4E E5 13 00 41 02 00 00 00 02    ......N...A.....
016A20:  13 00 42 02 00 00 00 02 13 00 43 02 00 00 00 02    ..B.......C.....
016A30:  13 00 44 02 00 00 00 02 13 00 45 02 00 00 00 02    ..D.......E.....
016A40:  13 00 46 02 00 00 00 02 13 00 47 02 00 00 00 02    ..F.......G.....
016A50:  13 00 48 02 00 00 00 02 13 00 49 02 00 00 00 02    ..H.......I.....
016A60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016A70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016A80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016A90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016AA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016AB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016AC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016AD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016AE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016AF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016B00:  75 72 65 3D 27 70 75 69 73 73 27 29 29 0D 0A 74    ure='puiss'))..t
016B10:  68 65 6E 20 74 61 70 65 66 6F 6E 63 74 69 6F 6E    hen tapefonction
016B20:  3A 3D 74 61 70 65 66 6F 6E 63 74 69 6F 6E 28 66    :=tapefonction(f
016B30:  5E 2E 67 2C 76 29 2B 66 5E 2E 76 61 6C 65 75 72    ^.g,v)+f^.valeur
016B40:  2B 74 61 70 65 66 6F 6E 63 74 69 6F 6E 28 66 5E    +tapefonction(f^
016B50:  2E 64 2C 76 29 20 65 6C 73 65 0D 0A 74 61 70 65    .d,v) else..tape
016B60:  66 6F 6E 63 74 69 6F 6E 3A 3D 27 27 3B 0D 0A 65    fonction:='';..e
016B70:  6E 64 3B 0D 0A 0D 0A 66 75 6E 63 74 69 6F 6E 20    nd;....function 
016B80:  6F 70 70 6F 73 65 3B 0D 0A 76 61 72 0D 0A 75 2C    oppose;..var..u,
016B90:  76 3A 66 6F 6E 63 74 69 6F 6E 3B 0D 0A 63 6F 65    v:fonction;..coe
016BA0:  66 66 2C 72 65 73 75 6C 74 61 74 3A 69 6E 74 65    ff,resultat:inte
016BB0:  67 65 72 3B 0D 0A 63 6F 65 66 32 3A 72 65 61 6C    ger;..coef2:real
016BC0:  3B 0D 0A 62 65 67 69 6E 0D 0A 69 66 20 28 28 66    ;..begin..if ((f
016BD0:  5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20 61 6E    ^.valeur='*') an
016BE0:  64 20 28 66 5E 2E 67 5E 2E 6E 61 74 75 72 65 3D    d (f^.g^.nature=
016BF0:  27 6E 6F 6D 62 72 65 27 29 29 20 74 68 65 6E 0D    'nombre')) then.
016C00:  0A 20 62 65 67 69 6E 0D 0A 20 20 6E 65 77 28 75    . begin..  new(u
016C10:  29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75    );u^.nature:='mu
016C20:  6C 74 69 27 3B 75 5E 2E 76 61 6C 65 75 72 3A 3D    lti';u^.valeur:=
016C30:  27 2A 27 3B 75 5E 2E 64 3A 3D 66 5E 2E 64 3B 0D    '*';u^.d:=f^.d;.
016C40:  0A 20 20 75 5E 2E 67 3A 3D 6F 70 70 6F 73 65 28    .  u^.g:=oppose(
016C50:  66 5E 2E 67 29 3B 6F 70 70 6F 73 65 3A 3D 75 3B    f^.g);oppose:=u;
016C60:  0D 0A 20 65 6E 64 0D 0A 20 65 6C 73 65 0D 0A 69    .. end.. else..i
016C70:  66 20 28 28 66 5E 2E 76 61 6C 65 75 72 3D 27 2A    f ((f^.valeur='*
016C80:  27 29 20 6F 72 20 28 66 5E 2E 76 61 6C 65 75 72    ') or (f^.valeur
016C90:  3D 27 2F 27 29 20 74 68 65 6E 0D 0A 20 62 65 67    ='/') then.. beg
016CA0:  69 6E 0D 0A 20 20 6E 65 77 28 75 29 3B 75 5E 2E    in..  new(u);u^.
016CB0:  6E 61 74 75 72 65 3A 3D 27 6D 75 6C 74 69 27 3B    nature:='multi';
016CC0:  75 5E 2E 76 61 6C 65 75 72 3A 3D 27 2A 27 3B 75    u^.valeur:='*';u
016CD0:  5E 2E 64 3A 3D 66 3B 6E 65 77 28 75 5E 2E 67 29    ^.d:=f;new(u^.g)
016CE0:  3B 0D 0A 20 20 75 5E 2E 67 5E 2E 6E 61 74 75 72    ;..  u^.g^.natur
016CF0:  65 3A 3D 27 6E 6F 6D 62 72 65 27 3B 75 5E 2E 67    e:='nombre';u^.g
016D00:  5E 2E 76 61 6C 65 75 72 3A 3D 27 2D 31 27 3B 75    ^.valeur:='-1';u
016D10:  5E 2E 67 5E 2E 67 3A 3D 6E 69 6C 3B 75 5E 2E 67    ^.g^.g:=nil;u^.g
016D20:  5E 2E 64 3A 3D 6E 69 6C 3B 0D 0A 20 20 6F 70 70    ^.d:=nil;..  opp
016D30:  6F 73 65 3A 3D 75 3B 0D 0A 20 65 6E 64 0D 0A 20    ose:=u;.. end.. 
016D40:  65 6C 73 65 0D 0A 69 66 20 28 28 66 5E 2E 76 61    else..if ((f^.va
016D50:  6C 65 75 72 3D 27 78 27 29 20 6F 72 20 28 66 5E    leur='x') or (f^
016D60:  2E 76 61 6C 65 75 72 3D 27 5E 27 29 29 20 74 68    .valeur='^')) th
016D70:  65 6E 0D 0A 20 62 65 67 69 6E 0D 0A 20 20 6E 65    en.. begin..  ne
016D80:  77 28 75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D    w(u);u^.nature:=
016D90:  27 6D 75 6C 74 69 27 3B 75 5E 2E 76 61 6C 65 75    'multi';u^.valeu
016DA0:  72 3A 3D 27 2A 27 3B 75 5E 2E 64 3A 3D 66 3B 0D    r:='*';u^.d:=f;.
016DB0:  0A 20 20 6E 65 77 28 76 29 3B 76 5E 2E 6E 61 74    .  new(v);v^.nat
016DC0:  75 72 65 3A 3D 27 6E 6F 6D 62 72 65 27 3B 76 5E    ure:='nombre';v^
016DD0:  2E 76 61 6C 65 75 72 3A 3D 27 2D 31 27 3B 76 5E    .valeur:='-1';v^
016DE0:  2E 64 3A 3D 6E 69 6C 3B 76 5E 2E 67 3A 3D 6E 69    .d:=nil;v^.g:=ni
016DF0:  6C 3B 0D 0A 20 20 75 5E 2E 67 3A 3D 76 3B 6F 70    l;..  u^.g:=v;op
016E00:  70 6F 73 65 3A 3D 75 3B 0D 0A 20 65 6E 64 0D 0A    pose:=u;.. end..
016E10:  20 65 6C 73 65 0D 0A 69 66 20 66 5E 2E 6E 61 74     else..if f^.nat
016E20:  75 72 65 3D 27 6E 6F 6D 62 72 65 27 20 74 68 65    ure='nombre' the
016E30:  6E 0D 0A 20 62 65 67 69 6E 0D 0A 20 20 6E 65 77    n.. begin..  new
016E40:  28 75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D 27    (u);u^.nature:='
016E50:  6E 6F 6D 62 72 65 27 3B 75 5E 2E 64 3A 3D 6E 69    nombre';u^.d:=ni
016E60:  6C 3B 75 5E 2E 67 3A 3D 6E 69 6C 3B 0D 0A 20 20    l;u^.g:=nil;..  
016E70:  76 61 6C 28 66 5E 2E 76 61 6C 65 75 72 2C 63 6F    val(f^.valeur,co
016E80:  65 66 32 2C 72 65 73 75 6C 74 61 74 29 3B 63 6F    ef2,resultat);co
016E90:  65 66 32 3A 3D 63 6F 65 66 32 2A 28 2D 31 29 3B    ef2:=coef2*(-1);
016EA0:  0D 0A 20 20 69 66 20 66 72 61 63 28 63 6F 65 66    ..  if frac(coef
016EB0:  32 29 3D 30 20 74 68 65 6E 20 73 74 72 28 72 6F    2)=0 then str(ro
016EC0:  75 6E 64 28 63 6F 65 66 32 29 2C 75 5E 2E 76 61    und(coef2),u^.va
016ED0:  6C 65 75 72 29 0D 0A 20 20 20 20 65 6C 73 65 0D    leur)..    else.
016EE0:  0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20    .    begin..    
016EF0:  73 74 72 28 63 6F 65 66 32 3A 31 30 3A 35 2C 75    str(coef2:10:5,u
016F00:  5E 2E 76 61 6C 65 75 72 29 3B 0D 0A 20 20 20 20    ^.valeur);..    
016F10:  77 68 69 6C 65 20 70 6F 73 28 27 20 27 2C 75 5E    while pos(' ',u^
016F20:  2E 76 61 6C 65 75 72 29 3C 3E 30 20 64 6F 20 64    .valeur)<>0 do d
016F30:  65 6C 65 74 65 28 75 5E 2E 76 61 6C 65 75 72 2C    elete(u^.valeur,
016F40:  31 2C 31 29 3B 0D 0A 20 20 20 20 65 6E 64 3B 0D    1,1);..    end;.
016F50:  0A 20 20 6F 70 70 6F 73 65 3A 3D 75 3B 0D 0A 20    .  oppose:=u;.. 
016F60:  65 6E 64 0D 0A 20 65 6C 73 65 0D 0A 69 66 20 66    end.. else..if f
016F70:  5E 2E 76 61 6C 65 75 72 3D 27 2B 27 20 74 68 65    ^.valeur='+' the
016F80:  6E 0D 0A 20 20 62 65 67 69 6E 20 6E 65 77 28 75    n..  begin new(u
016F90:  29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D 27 70 6C    );u^.nature:='pl
016FA0:  75 73 27 3B 75 5E 2E 76 61 6C 65 75 72 3A 3D 27    us';u^.valeur:='
016FB0:  2B 27 3B 0D 0A 20 20 75 5E 2E 67 3A 3D 6F 70 70    +';..  u^.g:=opp
016FC0:  6F 73 65 28 66 5E 2E 67 29 3B 75 5E 2E 64 3A 3D    ose(f^.g);u^.d:=
016FD0:  6F 70 70 6F 73 65 28 66 5E 2E 64 29 3B 6F 70 70    oppose(f^.d);opp
016FE0:  6F 73 65 3A 3D 75 20 65 6E 64 0D 0A 20 65 6C 73    ose:=u end.. els
016FF0:  65 0D 0A 69 66 20 66 5E 2E 76 61 6C 65 75 72 3D    e..if f^.valeur=
017000:  27 2D 27 20 74 68 65 6E 0D 0A 20 20 62 65 67 69    '-' then..  begi
017010:  6E 20 6E 65 77 28 75 29 3B 75 5E 2E 6E 61 74 75    n new(u);u^.natu
017020:  72 65 3A 3D 27 70 6C 75 73 27 3B 75 5E 2E 76 61    re:='plus';u^.va
017030:  6C 65 75 72 3A 3D 27 2B 27 3B 75 5E 2E 67 3A 3D    leur:='+';u^.g:=
017040:  6F 70 70 6F 73 65 28 66 5E 2E 67 29 3B 75 5E 2E    oppose(f^.g);u^.
017050:  64 3A 3D 66 5E 2E 64 3B 0D 0A 20 20 6F 70 70 6F    d:=f^.d;..  oppo
017060:  73 65 3A 3D 75 20 65 6E 64 0D 0A 20 20 65 6C 73    se:=u end..  els
017070:  65 0D 0A 69 66 20 66 3D 6E 69 6C 20 74 68 65 6E    e..if f=nil then
017080:  20 6F 70 70 6F 73 65 3A 3D 6E 69 6C 3B 0D 0A 65     oppose:=nil;..e
017090:  6E 64 3B 0D 0A 0D 0A 0D 0A 0D 0A 66 75 6E 63 74    nd;........funct
0170A0:  69 6F 6E 20 20 65 78 70 6F 73 61 6E 74 3B 0D 0A    ion  exposant;..
0170B0:  76 61 72 0D 0A 6C 6C 3A 69 6E 74 65 67 65 72 3B    var..ll:integer;
0170C0:  0D 0A 62 65 67 69 6E 0D 0A 6C 6C 3A 3D 72 6F 75    ..begin..ll:=rou
0170D0:  6E 64 28 6C 29 3B 0D 0A 69 66 20 6B 3D 30 20 74    nd(l);..if k=0 t
0170E0:  68 65 6E 20 65 78 70 6F 73 61 6E 74 3A 3D 30 20    hen exposant:=0 
0170F0:  65 6C 73 65 0D 0A 69 66 20 6C 6C 3D 30 20 74 68    else..if ll=0 th
017100:  0D 0A 20 20 20 20 51 55 45 4C 51 55 45 53 20 50    ..    QUELQUES P
017110:  52 45 43 49 53 49 4F 4E 53 20 53 55 52 20 43 45    RECISIONS SUR CE
017120:  53 20 50 52 4F 47 52 41 4D 4D 45 53 20 44 27 41    S PROGRAMMES D'A
017130:  4E 41 4C 59 53 45 0D 0A 20 20 20 20 2A 2A 2A 2A    NALYSE..    ****
017140:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
017150:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
017160:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 0D    *************...
017170:  0A 20 20 43 65 73 20 70 72 6F 67 72 61 6D 6D 65    .  Ces programme
017180:  73 20 73 6F 6E 74 20 65 63 72 69 74 73 20 65 6E    s sont ecrits en
017190:  20 3C 54 55 52 42 4F 20 50 41 53 43 41 4C 3E 2E     <TURBO PASCAL>.
0171A0:  0D 0A 20 20 56 6F 75 73 20 74 72 6F 75 76 65 72    ..  Vous trouver
0171B0:  65 7A 20 73 75 72 20 63 65 74 74 65 20 64 69 73    ez sur cette dis
0171C0:  71 75 65 74 74 65 20 6C 65 73 20 70 72 6F 67 72    quette les progr
0171D0:  61 6D 6D 65 73 20 63 6F 6D 70 69 6C 65 73 20 28    ammes compiles (
0171E0:  2A 2E 43 4F 4D 29 2E 0D 0A 0D 0A 20 20 49 6C 20    *.COM).....  Il 
0171F0:  6E 27 65 73 74 20 64 6F 6E 63 20 70 61 73 20 6E    n'est donc pas n
017200:  65 63 65 73 73 61 69 72 65 20 64 65 20 70 6F 73    ecessaire de pos
017210:  73 65 64 65 72 20 54 55 52 42 4F 20 50 41 53 43    seder TURBO PASC
017220:  41 4C 20 70 6F 75 72 0D 0A 20 20 6C 65 73 20 65    AL pour..  les e
017230:  78 65 63 75 74 65 72 2E 0D 0A 0D 0A 20 20 43 65    xecuter.....  Ce
017240:  70 65 6E 64 61 6E 74 2C 20 6C 65 73 20 70 72 6F    pendant, les pro
017250:  67 72 61 6D 6D 65 73 20 73 6F 75 72 63 65 73 20    grammes sources 
017260:  73 6F 6E 74 20 61 20 76 6F 74 72 65 20 64 69 73    sont a votre dis
017270:  70 6F 73 69 74 69 6F 6E 20 28 2A 2E 50 41 53 29    position (*.PAS)
017280:  0D 0A 20 20 73 75 72 20 6C 61 20 64 69 73 71 75    ..  sur la disqu
017290:  65 74 74 65 2C 20 61 69 6E 73 69 20 71 75 27 75    ette, ainsi qu'u
0172A0:  6E 20 66 69 63 68 69 65 72 20 64 27 65 78 70 6C    n fichier d'expl
0172B0:  69 63 61 74 69 6F 6E 73 20 71 75 65 20 76 6F 75    ications que vou
0172C0:  73 0D 0A 20 20 70 6F 75 76 65 7A 20 6C 69 72 65    s..  pouvez lire
0172D0:  20 6F 75 20 69 6D 70 72 69 6D 65 72 20 28 20 73     ou imprimer ( s
0172E0:  6F 75 73 20 43 50 4D 3A 20 54 59 50 45 20 2B 20    ous CPM: TYPE + 
0172F0:  43 54 52 4C 20 50 29 2C 20 63 65 20 66 69 63 68    CTRL P), ce fich
017300:  69 65 72 20 74 72 65 73 0D 0A 20 20 64 65 74 61    ier tres..  deta
017310:  69 6C 6C 65 20 65 73 74 20 6E 6F 6D 6D 65 20 3C    ille est nomme <
017320:  3C 20 53 4F 55 52 43 45 53 2E 44 4F 43 20 3E 3E    < SOURCES.DOC >>
017330:  2E 0D 0A 0D 0A 20 20 43 65 73 20 70 72 6F 67 72    .....  Ces progr
017340:  61 6D 6D 65 73 20 73 6F 6E 74 20 65 78 65 63 75    ammes sont execu
017350:  74 61 62 6C 65 73 20 73 6F 75 73 20 43 50 4D 20    tables sous CPM 
017360:  70 6C 75 73 2C 0D 0A 20 20 63 27 65 73 74 20 61    plus,..  c'est a
017370:  20 64 69 72 65 20 73 75 72 20 43 50 43 20 36 31     dire sur CPC 61
017380:  32 38 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    28..            
017390:  20 20 20 6F 75 20 20 43 50 43 20 34 36 34 2F 36       ou  CPC 464/6
0173A0:  36 34 20 61 76 65 63 20 52 41 4D 20 73 75 70 70    64 avec RAM supp
0173B0:  6C 65 6D 65 6E 74 61 69 72 65 2B 43 50 4D 20 70    lementaire+CPM p
0173C0:  6C 75 73 2E 0D 0A 0D 0A 20 20 4C 61 20 70 61 72    lus.....  La par
0173D0:  74 69 65 20 61 6C 67 65 62 72 69 71 75 65 20 74    tie algebrique t
0173E0:  6F 75 72 6E 65 20 66 6F 72 74 20 62 69 65 6E 0D    ourne fort bien.
0173F0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
017400:  73 75 72 20 50 43 57 20 32 35 36 2F 35 31 32 20    sur PCW 256/512 
017410:  6D 61 69 73 20 69 6C 20 66 61 75 64 72 61 20 72    mais il faudra r
017420:  65 64 69 67 65 72 20 75 6E 65 0D 0A 20 20 20 20    ediger une..    
017430:  20 20 20 20 20 20 20 20 20 20 20 62 69 62 6C 69               bibli
017440:  6F 74 68 65 71 75 65 20 67 72 61 70 68 69 71 75    otheque graphiqu
017450:  65 20 70 6F 75 72 20 74 72 61 63 65 72 20 6C 65    e pour tracer le
017460:  73 20 63 6F 75 72 62 65 73 2E 0D 0A 0D 0A 20 20    s courbes.....  
017470:  55 6E 65 20 76 65 72 73 69 6F 6E 20 63 6F 6D 70    Une version comp
017480:  61 74 69 62 6C 65 20 49 42 4D 20 73 6F 75 73 20    atible IBM sous 
017490:  4D 53 2F 44 4F 53 20 65 78 69 73 74 65 20 65 67    MS/DOS existe eg
0174A0:  61 6C 65 6D 65 6E 74 2E 0D 0A 0D 0A 0D 0A 20 20    alement.......  
0174B0:  50 4F 55 52 20 44 45 53 20 52 41 49 53 4F 4E 53    POUR DES RAISONS
0174C0:  20 44 45 20 50 4C 41 43 45 20 44 49 53 50 4F 4E     DE PLACE DISPON
0174D0:  49 42 4C 45 20 53 4F 55 53 20 43 50 4D 2B 0D 0A    IBLE SOUS CPM+..
0174E0:  20 20 20 20 4C 65 20 70 72 6F 67 72 61 6D 6D 65        Le programme
0174F0:  20 65 73 74 20 73 63 69 6E 64 65 20 65 6E 20 64     est scinde en d
017500:  0A 20 20 20 20 74 68 65 6E 0D 0A 20 20 20 20 20    .    then..     
017510:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20      begin..       
017520:  20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C 65          if f^.vale
017530:  75 72 3D 27 2D 27 20 74 68 65 6E 20 66 3A 3D 6F    ur='-' then f:=o
017540:  70 70 6F 73 65 28 66 5E 2E 64 29 20 65 6C 73 65    ppose(f^.d) else
017550:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 66    ..             f
017560:  3A 3D 66 5E 2E 64 3B 0D 0A 20 20 20 20 20 20 20    :=f^.d;..       
017570:  20 20 20 20 20 20 73 69 6D 70 6C 69 66 28 66 29          simplif(f)
017580:  3B 72 65 73 75 6C 74 3A 3D 31 0D 0A 20 20 20 20    ;result:=1..    
017590:  20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20       end..        
0175A0:  20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 20             else.. 
0175B0:  20 20 20 69 66 20 28 28 66 5E 2E 6E 61 74 75 72       if ((f^.natur
0175C0:  65 3D 27 70 75 69 73 73 27 29 20 61 6E 64 20 28    e='puiss') and (
0175D0:  66 5E 2E 64 5E 2E 6E 61 74 75 72 65 3D 27 6E 6F    f^.d^.nature='no
0175E0:  6D 62 72 65 27 29 0D 0A 20 20 20 20 20 61 6E 64    mbre')..     and
0175F0:  20 28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27     (f^.d^.valeur='
017600:  31 27 29 29 0D 0A 20 20 20 20 74 68 65 6E 0D 0A    1'))..    then..
017610:  20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20        begin..     
017620:  20 20 20 20 20 66 3A 3D 66 5E 2E 67 3B 0D 0A 20         f:=f^.g;.. 
017630:  20 20 20 20 20 20 20 20 20 73 69 6D 70 6C 69 66             simplif
017640:  28 66 29 3B 72 65 73 75 6C 74 3A 3D 31 0D 0A 20    (f);result:=1.. 
017650:  20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 65 6C        end..     el
017660:  73 65 0D 0A 20 20 20 20 69 66 20 28 28 66 5E 2E    se..    if ((f^.
017670:  6E 61 74 75 72 65 3D 27 70 75 69 73 73 27 29 61    nature='puiss')a
017680:  6E 64 28 66 5E 2E 64 5E 2E 6E 61 74 75 72 65 3D    nd(f^.d^.nature=
017690:  27 6E 6F 6D 62 72 65 27 29 61 6E 64 0D 0A 20 20    'nombre')and..  
0176A0:  20 20 28 66 5E 2E 67 5E 2E 6E 61 74 75 72 65 3D      (f^.g^.nature=
0176B0:  27 70 75 69 73 73 27 29 61 6E 64 28 66 5E 2E 67    'puiss')and(f^.g
0176C0:  5E 2E 64 5E 2E 6E 61 74 75 72 65 3D 27 6E 6F 6D    ^.d^.nature='nom
0176D0:  62 72 65 27 29 29 20 74 68 65 6E 0D 0A 20 20 20    bre')) then..   
0176E0:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20      begin..       
0176F0:  20 20 6E 65 77 28 68 29 3B 68 5E 2E 6E 61 74 75      new(h);h^.natu
017700:  72 65 3A 3D 27 6D 75 6C 74 69 27 3B 68 5E 2E 76    re:='multi';h^.v
017710:  61 6C 65 75 72 3A 3D 27 2A 27 3B 68 5E 2E 64 3A    aleur:='*';h^.d:
017720:  3D 66 5E 2E 64 3B 68 5E 2E 67 3A 3D 66 5E 2E 67    =f^.d;h^.g:=f^.g
017730:  5E 2E 64 3B 0D 0A 20 20 20 20 20 20 20 20 20 66    ^.d;..         f
017740:  5E 2E 64 3A 3D 68 3B 66 5E 2E 67 3A 3D 66 5E 2E    ^.d:=h;f^.g:=f^.
017750:  67 5E 2E 67 3B 73 69 6D 70 6C 69 66 28 66 5E 2E    g^.g;simplif(f^.
017760:  64 29 3B 72 65 73 75 6C 74 3A 3D 31 0D 0A 20 20    d);result:=1..  
017770:  20 20 20 65 6E 64 0D 0A 20 20 20 20 20 65 6C 73       end..     els
017780:  65 0D 0A 20 20 20 20 20 62 65 67 69 6E 0D 0A 20    e..     begin.. 
017790:  20 20 20 20 69 66 20 66 5E 2E 64 3C 3E 6E 69 6C        if f^.d<>nil
0177A0:  20 74 68 65 6E 20 73 69 6D 70 6C 69 66 28 66 5E     then simplif(f^
0177B0:  2E 64 29 3B 0D 0A 20 20 20 20 20 69 66 20 66 5E    .d);..     if f^
0177C0:  2E 67 3C 3E 6E 69 6C 20 74 68 65 6E 20 73 69 6D    .g<>nil then sim
0177D0:  70 6C 69 66 28 66 5E 2E 67 29 3B 0D 0A 20 20 20    plif(f^.g);..   
0177E0:  65 6E 64 3B 0D 0A 20 20 20 65 6E 64 3B 0D 0A 20    end;..   end;.. 
0177F0:  65 6E 64 3B 0D 0A 0D 0A 66 75 6E 63 74 69 6F 6E    end;....function
017800:  20 20 20 65 78 70 6F 73 61 6E 74 28 6B 2C 6C 3A       exposant(k,l:
017810:  72 65 61 6C 29 3A 72 65 61 6C 3B 0D 0A 66 6F 72    real):real;..for
017820:  77 61 72 64 3B 0D 0A 0D 0A 66 75 6E 63 74 69 6F    ward;....functio
017830:  6E 20 20 20 63 61 6C 63 75 6C 3B 0D 0A 6C 61 62    n   calcul;..lab
017840:  65 6C 20 66 69 6E 63 61 6C 63 75 6C 3B 0D 0A 76    el fincalcul;..v
017850:  61 72 20 6E 62 72 65 3A 72 65 61 6C 3B 72 65 73    ar nbre:real;res
017860:  75 6C 74 61 74 3A 69 6E 74 65 67 65 72 3B 0D 0A    ultat:integer;..
017870:  62 65 67 69 6E 0D 0A 20 20 69 66 20 66 5E 2E 6E    begin..  if f^.n
017880:  61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 20 74    ature='nombre' t
017890:  68 65 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20    hen..           
0178A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0178B0:  20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20       begin..      
0178C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0178D0:  20 20 20 20 20 20 20 20 76 61 6C 28 66 5E 2E 76            val(f^.v
0178E0:  61 6C 65 75 72 2C 6E 62 72 65 2C 72 65 73 75 6C    aleur,nbre,resul
0178F0:  74 61 74 29 3B 0D 0A 20 20 20 20 20 20 20 20 20    tat);..         
017900:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017910:  20 20 20 20 20 63 61 6C 63 75 6C 3A 3D 6E 62 72         calcul:=nbr
017920:  65 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    e;..            
017930:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017940:  20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20 20      end..         
017950:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017960:  20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 69 66          else..  if
017970:  20 66 5E 2E 6E 61 74 75 72 65 3D 27 70 61 72 61     f^.nature='para
017980:  6D 27 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20    m' then..       
017990:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0179A0:  20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20           begin..  
0179B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0179C0:  20 20 20 20 20 20 20 20 20 20 20 20 76 61 6C 28                val(
0179D0:  66 5E 2E 76 61 6C 65 75 72 2C 69 6E 64 69 63 65    f^.valeur,indice
0179E0:  2C 72 65 73 75 6C 74 61 74 29 3B 0D 0A 20 20 20    ,resultat);..   
0179F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017A00:  20 20 20 20 20 20 20 20 20 20 20 63 61 6C 63 75               calcu
017A10:  6C 3A 3D 70 5B 69 6E 64 69 63 65 2C 69 5D 3B 0D    l:=p[indice,i];.
017A20:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
017A30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65                   e
017A40:  6E 64 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    nd..            
017A50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017A60:  20 20 65 6C 73 65 0D 0A 20 20 69 66 20 66 5E 2E      else..  if f^.
017A70:  6E 61 74 75 72 65 3D 27 76 61 72 69 61 62 27 20    nature='variab' 
017A80:  74 68 65 6E 20 63 61 6C 63 75 6C 3A 3D 78 20 65    then calcul:=x e
017A90:  6C 73 65 0D 0A 20 20 69 66 20 66 5E 2E 6E 61 74    lse..  if f^.nat
017AA0:  75 72 65 3D 27 70 6C 75 73 27 20 74 68 65 6E 20    ure='plus' then 
017AB0:  63 61 6C 63 75 6C 3A 3D 63 61 6C 63 75 6C 28 66    calcul:=calcul(f
017AC0:  5E 2E 67 2C 78 29 2B 63 61 6C 63 75 6C 28 66 5E    ^.g,x)+calcul(f^
017AD0:  2E 64 2C 78 29 20 65 6C 73 65 0D 0A 20 20 69 66    .d,x) else..  if
017AE0:  20 66 5E 2E 6E 61 74 75 72 65 3D 27 6D 6F 69 6E     f^.nature='moin
017AF0:  73 27 20 74 68 65 6E 20 63 61 6C 63 75 6C 3A 3D    s' then calcul:=
017B00:  63 61 6C 63 75 6C 28 66 5E 2E 67 2C 78 29 2D 63    calcul(f^.g,x)-c
017B10:  61 6C 63 75 6C 28 66 5E 2E 64 2C 78 29 20 65 6C    alcul(f^.d,x) el
017B20:  73 65 0D 0A 20 20 69 66 20 66 5E 2E 6E 61 74 75    se..  if f^.natu
017B30:  72 65 3D 27 6D 75 6C 74 69 27 20 74 68 65 6E 20    re='multi' then 
017B40:  63 61 6C 63 75 6C 3A 3D 63 61 6C 63 75 6C 28 66    calcul:=calcul(f
017B50:  5E 2E 67 2C 78 29 2A 63 61 6C 63 75 6C 28 66 5E    ^.g,x)*calcul(f^
017B60:  2E 64 2C 78 29 20 65 6C 73 65 0D 0A 20 20 69 66    .d,x) else..  if
017B70:  20 66 5E 2E 6E 61 74 75 72 65 3D 27 70 75 69 73     f^.nature='puis
017B80:  73 27 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20    s' then..       
017B90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 65                  be
017BA0:  67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20    gin..           
017BB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017BC0:  20 69 66 20 66 72 61 63 28 63 61 6C 63 75 6C 28     if frac(calcul(
017BD0:  66 5E 2E 64 2C 78 29 29 3D 30 20 74 68 65 6E 0D    f^.d,x))=0 then.
017BE0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
017BF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6C                 cal
017C00:  63 75 6C 3A 3D 65 78 70 6F 73 61 6E 74 28 63 61    cul:=exposant(ca
017C10:  6C 63 75 6C 28 66 5E 2E 67 2C 78 29 2C 63 61 6C    lcul(f^.g,x),cal
017C20:  63 75 6C 28 66 5E 2E 64 2C 78 29 29 0D 0A 20 20    cul(f^.d,x))..  
017C30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017C40:  20 20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A              else..
017C50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017C60:  20 20 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D              begin.
017C70:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
017C80:  20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20                 if 
017C90:  63 61 6C 63 75 6C 28 66 5E 2E 67 2C 78 29 3C 3D    calcul(f^.g,x)<=
017CA0:  30 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20    0 then..        
017CB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017CC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017CD0:  20 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A             begin..
017CE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017CF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017D00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
017D10:  14 00 00 00 02 09 4E E5 14 00 41 02 00 00 00 02    ......N...A.....
017D20:  14 00 42 02 00 00 00 02 14 00 43 02 00 00 00 02    ..B.......C.....
017D30:  14 00 44 02 00 00 00 02 14 00 45 02 00 00 00 02    ..D.......E.....
017D40:  14 00 46 02 00 00 00 02 14 00 47 02 00 00 00 02    ..F.......G.....
017D50:  14 00 48 02 00 00 00 02 14 00 49 02 00 00 00 02    ..H.......I.....
017D60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017D70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017D80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017D90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017DA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017DB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017DC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017DD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017DE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017DF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017E00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017E10:  20 20 20 64 65 66 69 6E 69 3A 3D 66 61 6C 73 65       defini:=false
017E20:  3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    ;..             
017E30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017E40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017E50:  20 20 20 20 20 20 67 6F 74 6F 20 66 69 6E 63 61          goto finca
017E60:  6C 63 75 6C 3B 0D 0A 20 20 20 20 20 20 20 20 20    lcul;..         
017E70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017E80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017E90:  20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20             end..  
017EA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017EB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017EC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017ED0:  20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20       else..       
017EE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017EF0:  20 20 20 20 20 63 61 6C 63 75 6C 3A 3D 65 78 70         calcul:=exp
017F00:  28 28 6C 6E 28 63 61 6C 63 75 6C 28 66 5E 2E 67    ((ln(calcul(f^.g
017F10:  2C 78 29 29 29 2A 63 61 6C 63 75 6C 28 66 5E 2E    ,x)))*calcul(f^.
017F20:  64 2C 78 29 29 0D 0A 20 20 20 20 20 20 20 20 20    d,x))..         
017F30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017F40:  20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20 20 20     end..          
017F50:  20 20 20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A               end..
017F60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017F70:  20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C 73                 els
017F80:  65 0D 0A 20 20 69 66 20 66 5E 2E 6E 61 74 75 72    e..  if f^.natur
017F90:  65 3D 27 64 69 76 69 73 65 27 20 74 68 65 6E 0D    e='divise' then.
017FA0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
017FB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 62 65 67                 beg
017FC0:  69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    in..            
017FD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017FE0:  69 66 20 63 61 6C 63 75 6C 28 66 5E 2E 64 2C 78    if calcul(f^.d,x
017FF0:  29 3D 30 20 74 68 65 6E 20 62 65 67 69 6E 0D 0A    )=0 then begin..
018000:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018010:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018020:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018030:  20 20 20 64 65 66 69 6E 69 3A 3D 66 61 6C 73 65       defini:=false
018040:  3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    ;..             
018050:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018060:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018070:  20 20 20 20 20 20 67 6F 74 6F 20 66 69 6E 63 61          goto finca
018080:  6C 63 75 6C 3B 0D 0A 20 20 20 20 20 20 20 20 20    lcul;..         
018090:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0180A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0180B0:  20 20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20              end.. 
0180C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0180D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0180E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0180F0:  20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20         else..     
018100:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018110:  20 20 20 20 20 20 20 20 63 61 6C 63 75 6C 3A 3D            calcul:=
018120:  63 61 6C 63 75 6C 28 66 5E 2E 67 2C 78 29 2F 63    calcul(f^.g,x)/c
018130:  61 6C 63 75 6C 28 66 5E 2E 64 2C 78 29 0D 0A 20    alcul(f^.d,x).. 
018140:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018150:  20 20 20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A               end..
018160:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018170:  20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C 73                 els
018180:  65 0D 0A 20 20 69 66 20 66 5E 2E 6E 61 74 75 72    e..  if f^.natur
018190:  65 3D 27 69 64 66 63 74 27 20 74 68 65 6E 0D 0A    e='idfct' then..
0181A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0181B0:  20 20 20 20 20 20 20 20 20 20 20 20 62 65 67 69                begi
0181C0:  6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    n..             
0181D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0181E0:  6E 62 72 65 3A 3D 63 61 6C 63 75 6C 28 66 5E 2E    nbre:=calcul(f^.
0181F0:  64 2C 78 29 3B 0D 0A 20 20 20 20 20 20 20 20 20    d,x);..         
018200:  20 20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C           if f^.val
018210:  65 75 72 3D 27 63 6F 73 27 20 74 68 65 6E 20 63    eur='cos' then c
018220:  61 6C 63 75 6C 3A 3D 63 6F 73 28 6E 62 72 65 29    alcul:=cos(nbre)
018230:  20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20     else..         
018240:  20 20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C           if f^.val
018250:  65 75 72 3D 27 73 69 6E 27 20 74 68 65 6E 20 63    eur='sin' then c
018260:  61 6C 63 75 6C 3A 3D 73 69 6E 28 6E 62 72 65 29    alcul:=sin(nbre)
018270:  20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20     else..         
018280:  20 20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C           if f^.val
018290:  65 75 72 3D 27 74 61 6E 67 27 20 74 68 65 6E 20    eur='tang' then 
0182A0:  62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20    begin..         
0182B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0182C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69                   i
0182D0:  66 20 63 6F 73 28 6E 62 72 65 29 3D 30 20 74 68    f cos(nbre)=0 th
0182E0:  65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20    en begin..      
0182F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018300:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018310:  20 20 20 20 20 64 65 66 69 6E 69 3A 3D 66 61 6C         defini:=fal
018320:  73 65 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    se;..           
018330:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018340:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018350:  67 6F 74 6F 20 66 69 6E 63 61 6C 63 75 6C 3B 0D    goto fincalcul;.
018360:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
018370:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018380:  20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 20                end 
018390:  65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20    else..          
0183A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0183B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63                   c
0183C0:  61 6C 63 75 6C 3A 3D 73 69 6E 28 6E 62 72 65 29    alcul:=sin(nbre)
0183D0:  2F 63 6F 73 28 6E 62 72 65 29 0D 0A 20 20 20 20    /cos(nbre)..    
0183E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0183F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018400:  20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20          end..     
018410:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018420:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018430:  20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20         else..     
018440:  20 20 20 20 20 20 20 20 20 20 20 69 66 20 66 5E               if f^
018450:  2E 76 61 6C 65 75 72 3D 27 69 6E 74 27 20 74 68    .valeur='int' th
018460:  65 6E 20 63 61 6C 63 75 6C 3A 3D 69 6E 74 28 6E    en calcul:=int(n
018470:  62 72 65 29 20 65 6C 73 65 0D 0A 20 20 20 20 20    bre) else..     
018480:  20 20 20 20 20 20 20 20 20 20 20 69 66 20 66 5E               if f^
018490:  2E 76 61 6C 65 75 72 3D 27 61 62 73 27 20 74 68    .valeur='abs' th
0184A0:  65 6E 20 63 61 6C 63 75 6C 3A 3D 61 62 73 28 6E    en calcul:=abs(n
0184B0:  62 72 65 29 20 65 6C 73 65 0D 0A 20 20 20 20 20    bre) else..     
0184C0:  20 20 20 20 20 20 20 20 20 20 20 69 66 20 66 5E               if f^
0184D0:  2E 76 61 6C 65 75 72 3D 27 61 72 63 74 61 6E 27    .valeur='arctan'
0184E0:  20 74 68 65 6E 20 63 61 6C 63 75 6C 3A 3D 61 72     then calcul:=ar
0184F0:  63 74 61 6E 28 6E 62 72 65 29 20 65 6C 73 65 0D    ctan(nbre) else.
018500:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
018510:  20 69 66 20 66 5E 2E 76 61 6C 65 75 72 3D 27 65     if f^.valeur='e
018520:  78 70 27 20 74 68 65 6E 20 63 61 6C 63 75 6C 3A    xp' then calcul:
018530:  3D 65 78 70 28 6E 62 72 65 29 20 65 6C 73 65 0D    =exp(nbre) else.
018540:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
018550:  20 69 66 20 66 5E 2E 76 61 6C 65 75 72 3D 27 6C     if f^.valeur='l
018560:  6E 27 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20    n' then..       
018570:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018580:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018590:  20 20 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D              begin.
0185A0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
0185B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0185C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0185D0:  20 20 69 66 20 6E 62 72 65 3C 3D 30 20 74 68 65      if nbre<=0 the
0185E0:  6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    n..             
0185F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018600:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018610:  20 20 20 20 20 20 20 20 20 20 20 20 20 62 65 67                 beg
018620:  69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    in..            
018630:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018640:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018650:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 65                  de
018660:  66 69 6E 69 3A 3D 66 61 6C 73 65 3B 0D 0A 20 20    fini:=false;..  
018670:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018680:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018690:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0186A0:  20 20 20 20 20 20 20 20 67 6F 74 6F 20 66 69 6E            goto fin
0186B0:  63 61 6C 63 75 6C 3B 0D 0A 20 20 20 20 20 20 20    calcul;..       
0186C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0186D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0186E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0186F0:  20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20       end..        
018700:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018710:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018720:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018730:  20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20       else..       
018740:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018750:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018760:  20 20 20 20 20 20 20 20 20 20 63 61 6C 63 75 6C              calcul
018770:  3A 3D 6C 6E 28 6E 62 72 65 29 0D 0A 20 20 20 20    :=ln(nbre)..    
018780:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018790:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0187A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64                 end
0187B0:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
0187C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0187D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0187E0:  20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20        else..      
0187F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018800:  20 20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C           if f^.val
018810:  65 75 72 3D 27 73 71 72 74 27 20 74 68 65 6E 0D    eur='sqrt' then.
018820:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
018830:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018840:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018850:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20      begin..       
018860:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018870:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018880:  20 20 20 20 20 20 20 20 20 20 69 66 20 6E 62 72              if nbr
018890:  65 3C 30 20 74 68 65 6E 0D 0A 20 20 20 20 20 20    e<0 then..      
0188A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0188B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0188C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0188D0:  20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20        begin..     
0188E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0188F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018900:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018910:  20 20 20 20 20 64 65 66 69 6E 69 3A 3D 66 61 6C         defini:=fal
018920:  73 65 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    se;..           
018930:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018940:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018950:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 67                   g
018960:  6F 74 6F 20 66 69 6E 63 61 6C 63 75 6C 3B 0D 0A    oto fincalcul;..
018970:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018980:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018990:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0189A0:  20 20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20              end.. 
0189B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0189C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0189D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0189E0:  20 20 20 20 20 20 20 20 20 20 20 65 6C 73 65 0D               else.
0189F0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
018A00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018A10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018A20:  20 20 63 61 6C 63 75 6C 3A 3D 73 71 72 74 28 6E      calcul:=sqrt(n
018A30:  62 72 65 29 0D 0A 20 20 20 20 20 20 20 20 20 20    bre)..          
018A40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018A50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018A60:  20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20           end..    
018A70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018A80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018A90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C                  el
018AA0:  73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    se..            
018AB0:  20 20 69 66 20 66 5E 2E 76 61 6C 65 75 72 3D 27      if f^.valeur='
018AC0:  73 68 27 20 74 68 65 6E 20 63 61 6C 63 75 6C 3A    sh' then calcul:
018AD0:  3D 30 2E 35 2A 28 65 78 70 28 6E 62 72 65 29 2D    =0.5*(exp(nbre)-
018AE0:  65 78 70 28 6E 62 72 65 2A 2D 31 29 29 0D 0A 20    exp(nbre*-1)).. 
018AF0:  20 20 20 20 20 20 65 6C 73 65 20 20 20 69 66 20          else   if 
018B00:  66 5E 2E 76 61 6C 65 75 72 3D 27 63 68 27 20 74    f^.valeur='ch' t
018B10:  68 65 6E 20 63 61 6C 63 75 6C 3A 3D 30 2E 35 2A    hen calcul:=0.5*
018B20:  28 65 78 70 28 6E 62 72 65 29 2B 65 78 70 28 6E    (exp(nbre)+exp(n
018B30:  62 72 65 2A 2D 31 29 29 0D 0A 20 20 20 20 20 20    bre*-1))..      
018B40:  20 65 6C 73 65 20 20 20 69 66 20 66 5E 2E 76 61     else   if f^.va
018B50:  6C 65 75 72 3D 27 74 68 27 20 74 68 65 6E 0D 0A    leur='th' then..
018B60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018B70:  63 61 6C 63 75 6C 3A 3D 28 65 78 70 28 6E 62 72    calcul:=(exp(nbr
018B80:  65 29 2D 65 78 70 28 6E 62 72 65 2A 2D 31 29 29    e)-exp(nbre*-1))
018B90:  2F 28 65 78 70 28 6E 62 72 65 29 2B 65 78 70 28    /(exp(nbre)+exp(
018BA0:  6E 62 72 65 2A 2D 31 29 29 0D 0A 20 20 20 20 20    nbre*-1))..     
018BB0:  20 20 65 6C 73 65 20 20 20 69 66 20 66 5E 2E 76      else   if f^.v
018BC0:  61 6C 65 75 72 3D 27 61 72 63 73 69 6E 27 20 74    aleur='arcsin' t
018BD0:  68 65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20    hen begin..     
018BE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018BF0:  20 20 20 20 20 20 20 20 69 66 20 6E 62 72 65 3D            if nbre=
018C00:  2D 31 20 74 68 65 6E 20 63 61 6C 63 75 6C 3A 3D    -1 then calcul:=
018C10:  2D 30 2E 35 2A 70 69 20 65 6C 73 65 0D 0A 20 20    -0.5*pi else..  
018C20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018C30:  20 20 20 20 20 20 20 20 20 20 20 69 66 20 6E 62               if nb
018C40:  72 65 3D 31 20 74 68 65 6E 20 63 61 6C 63 75 6C    re=1 then calcul
018C50:  3A 3D 30 2E 35 2A 70 69 20 65 6C 73 65 0D 0A 20    :=0.5*pi else.. 
018C60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018C70:  20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 28                if (
018C80:  28 6E 62 72 65 3C 2D 31 29 6F 72 28 6E 62 72 65    (nbre<-1)or(nbre
018C90:  3E 31 29 29 20 74 68 65 6E 0D 0A 20 20 20 20 20    >1)) then..     
018CA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018CB0:  20 20 20 20 20 20 20 20 62 65 67 69 6E 20 64 65            begin de
018CC0:  66 69 6E 69 3A 3D 66 61 6C 73 65 3B 67 6F 74 6F    fini:=false;goto
018CD0:  20 66 69 6E 63 61 6C 63 75 6C 3B 0D 0A 20 20 20     fincalcul;..   
018CE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018CF0:  20 20 20 20 20 20 20 20 20 20 65 6E 64 20 20 65              end  e
018D00:  6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20    lse..           
018D10:  20 63 61 6C 63 75 6C 3A 3D 61 72 63 74 61 6E 28     calcul:=arctan(
018D20:  6E 62 72 65 2F 73 71 72 74 28 31 2D 6E 62 72 65    nbre/sqrt(1-nbre
018D30:  2A 6E 62 72 65 29 29 3B 0D 0A 20 20 20 20 20 20    *nbre));..      
018D40:  20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20          end..     
018D50:  20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20      else..        
018D60:  20 20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C           if f^.val
018D70:  65 75 72 3D 27 61 72 63 63 6F 73 27 20 74 68 65    eur='arccos' the
018D80:  6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20    n begin..       
018D90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018DA0:  20 20 20 20 20 20 69 66 20 6E 62 72 65 3D 2D 31          if nbre=-1
018DB0:  20 74 68 65 6E 20 63 61 6C 63 75 6C 3A 3D 70 69     then calcul:=pi
018DC0:  20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20     else..         
018DD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018DE0:  20 20 20 20 69 66 20 6E 62 72 65 3D 31 20 74 68        if nbre=1 th
018DF0:  65 6E 20 63 61 6C 63 75 6C 3A 3D 30 20 65 6C 73    en calcul:=0 els
018E00:  65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    e..             
018E10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018E20:  69 66 20 28 28 6E 62 72 65 3C 2D 31 29 6F 72 28    if ((nbre<-1)or(
018E30:  6E 62 72 65 3E 31 29 29 20 74 68 65 6E 0D 0A 20    nbre>1)) then.. 
018E40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018E50:  20 20 20 20 20 20 20 20 20 20 20 20 62 65 67 69                begi
018E60:  6E 20 64 65 66 69 6E 69 3A 3D 66 61 6C 73 65 3B    n defini:=false;
018E70:  67 6F 74 6F 20 66 69 6E 63 61 6C 63 75 6C 3B 0D    goto fincalcul;.
018E80:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
018E90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6E                  en
018EA0:  64 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20    d  else..       
018EB0:  20 20 20 20 20 63 61 6C 63 75 6C 3A 3D 28 70 69         calcul:=(pi
018EC0:  2F 32 29 2D 61 72 63 74 61 6E 28 6E 62 72 65 2F    /2)-arctan(nbre/
018ED0:  73 71 72 74 28 31 2D 6E 62 72 65 2A 6E 62 72 65    sqrt(1-nbre*nbre
018EE0:  29 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    ));..           
018EF0:  20 65 6E 64 0D 0A 20 20 20 20 20 20 20 65 6C 73     end..       els
018F00:  65 0D 0A 20 20 65 72 72 65 75 72 28 31 30 29 0D    e..  erreur(10).
018F10:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
018F20:  20 20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64                 end
018F30:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
018F40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C                  el
018F50:  73 65 0D 0A 20 20 69 66 20 66 3D 6E 69 6C 20 74    se..  if f=nil t
018F60:  68 65 6E 20 63 61 6C 63 75 6C 3A 3D 30 3B 0D 0A    hen calcul:=0;..
018F70:  20 20 66 69 6E 63 61 6C 63 75 6C 3A 3B 0D 0A 65      fincalcul:;..e
018F80:  6E 64 3B 0D 0A 0D 0A 66 75 6E 63 74 69 6F 6E 20    nd;....function 
018F90:  20 74 61 70 65 66 6F 6E 63 74 69 6F 6E 3B 0D 0A     tapefonction;..
018FA0:  76 61 72 0D 0A 77 77 77 2C 77 77 78 3A 73 74 72    var..www,wwx:str
018FB0:  32 30 30 3B 0D 0A 63 6F 65 66 66 3A 72 65 61 6C    200;..coeff:real
018FC0:  3B 72 65 73 75 6C 74 61 74 3A 69 6E 74 65 67 65    ;resultat:intege
018FD0:  72 3B 0D 0A 66 6F 72 6D 61 74 3A 73 74 72 31 30    r;..format:str10
018FE0:  3B 0D 0A 62 65 67 69 6E 0D 0A 69 66 20 66 5E 2E    ;..begin..if f^.
018FF0:  6E 61 74 75 72 65 3D 27 69 64 66 63 74 27 20 74    nature='idfct' t
019000:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
019010:  15 00 00 00 02 09 4E E5 15 00 41 02 00 00 00 02    ......N...A.....
019020:  15 00 42 02 00 00 00 02 15 00 43 02 00 00 00 02    ..B.......C.....
019030:  15 00 44 02 00 00 00 02 15 00 45 02 00 00 00 02    ..D.......E.....
019040:  15 00 46 02 00 00 00 02 15 00 47 02 00 00 00 02    ..F.......G.....
019050:  15 00 48 02 00 00 00 02 15 00 49 02 00 00 00 02    ..H.......I.....
019060:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
019070:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
019080:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
019090:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0190A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0190B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0190C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0190D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0190E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0190F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
019100:  68 65 6E 0D 0A 74 61 70 65 66 6F 6E 63 74 69 6F    hen..tapefonctio
019110:  6E 3A 3D 66 5E 2E 76 61 6C 65 75 72 2B 27 28 27    n:=f^.valeur+'('
019120:  2B 74 61 70 65 66 6F 6E 63 74 69 6F 6E 28 66 5E    +tapefonction(f^
019130:  2E 64 2C 76 29 2B 27 29 27 20 65 6C 73 65 0D 0A    .d,v)+')' else..
019140:  69 66 20 66 5E 2E 6E 61 74 75 72 65 3D 27 6E 6F    if f^.nature='no
019150:  6D 62 72 65 27 20 74 68 65 6E 20 20 74 61 70 65    mbre' then  tape
019160:  66 6F 6E 63 74 69 6F 6E 3A 3D 66 5E 2E 76 61 6C    fonction:=f^.val
019170:  65 75 72 20 65 6C 73 65 0D 0A 69 66 20 66 5E 2E    eur else..if f^.
019180:  6E 61 74 75 72 65 3D 27 70 61 72 61 6D 27 20 74    nature='param' t
019190:  68 65 6E 0D 0A 74 61 70 65 66 6F 6E 63 74 69 6F    hen..tapefonctio
0191A0:  6E 3A 3D 27 70 28 27 2B 66 5E 2E 76 61 6C 65 75    n:='p('+f^.valeu
0191B0:  72 2B 27 29 27 20 65 6C 73 65 0D 0A 69 66 20 66    r+')' else..if f
0191C0:  5E 2E 6E 61 74 75 72 65 3D 27 76 61 72 69 61 62    ^.nature='variab
0191D0:  27 20 74 68 65 6E 0D 0A 74 61 70 65 66 6F 6E 63    ' then..tapefonc
0191E0:  74 69 6F 6E 3A 3D 76 20 65 6C 73 65 0D 0A 69 66    tion:=v else..if
0191F0:  20 28 28 66 5E 2E 6E 61 74 75 72 65 3D 27 70 6C     ((f^.nature='pl
019200:  75 73 27 29 20 6F 72 20 28 66 5E 2E 6E 61 74 75    us') or (f^.natu
019210:  72 65 3D 27 6D 6F 69 6E 73 27 29 29 20 74 68 65    re='moins')) the
019220:  6E 0D 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20    n..    begin..  
019230:  20 20 77 77 77 3A 3D 74 61 70 65 66 6F 6E 63 74      www:=tapefonct
019240:  69 6F 6E 28 66 5E 2E 64 2C 76 29 3B 77 77 78 3A    ion(f^.d,v);wwx:
019250:  3D 74 61 70 65 66 6F 6E 63 74 69 6F 6E 28 66 5E    =tapefonction(f^
019260:  2E 67 2C 76 29 3B 0D 0A 20 20 20 20 69 66 20 28    .g,v);..    if (
019270:  28 28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27    ((f^.d^.valeur='
019280:  2B 27 29 6F 72 28 66 5E 2E 64 5E 2E 76 61 6C 65    +')or(f^.d^.vale
019290:  75 72 3D 27 2D 27 29 29 61 6E 64 28 66 5E 2E 76    ur='-'))and(f^.v
0192A0:  61 6C 65 75 72 3D 27 2B 27 29 29 20 74 68 65 6E    aleur='+')) then
0192B0:  0D 0A 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20    ..     begin..  
0192C0:  20 20 20 64 65 6C 65 74 65 28 77 77 77 2C 31 2C       delete(www,1,
0192D0:  31 29 3B 64 65 6C 65 74 65 28 77 77 77 2C 6C 65    1);delete(www,le
0192E0:  6E 67 74 68 28 77 77 77 29 2C 31 29 3B 0D 0A 20    ngth(www),1);.. 
0192F0:  20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 69 66        end;..    if
019300:  20 28 28 66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D     ((f^.g^.valeur=
019310:  27 2B 27 29 6F 72 28 66 5E 2E 67 5E 2E 76 61 6C    '+')or(f^.g^.val
019320:  65 75 72 3D 27 2D 27 29 29 20 74 68 65 6E 0D 0A    eur='-')) then..
019330:  20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20         begin..    
019340:  20 64 65 6C 65 74 65 28 77 77 78 2C 31 2C 31 29     delete(wwx,1,1)
019350:  3B 64 65 6C 65 74 65 28 77 77 78 2C 6C 65 6E 67    ;delete(wwx,leng
019360:  74 68 28 77 77 78 29 2C 31 29 3B 0D 0A 20 20 20    th(wwx),1);..   
019370:  20 20 65 6E 64 3B 63 6F 65 66 66 3A 3D 31 3B 0D      end;coeff:=1;.
019380:  0A 20 20 20 20 20 69 66 20 66 5E 2E 64 5E 2E 6E    .     if f^.d^.n
019390:  61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 20 74    ature='nombre' t
0193A0:  68 65 6E 20 76 61 6C 28 66 5E 2E 64 5E 2E 76 61    hen val(f^.d^.va
0193B0:  6C 65 75 72 2C 63 6F 65 66 66 2C 72 65 73 75 6C    leur,coeff,resul
0193C0:  74 61 74 29 3B 0D 0A 20 20 20 20 20 69 66 20 28    tat);..     if (
0193D0:  28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 2A    (f^.d^.valeur='*
0193E0:  27 29 61 6E 64 20 28 66 5E 2E 64 5E 2E 67 5E 2E    ')and (f^.d^.g^.
0193F0:  6E 61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 29    nature='nombre')
019400:  29 20 74 68 65 6E 0D 0A 20 20 20 20 20 76 61 6C    ) then..     val
019410:  28 66 5E 2E 64 5E 2E 67 5E 2E 76 61 6C 65 75 72    (f^.d^.g^.valeur
019420:  2C 63 6F 65 66 66 2C 72 65 73 75 6C 74 61 74 29    ,coeff,resultat)
019430:  3B 0D 0A 20 20 20 20 20 69 66 20 28 28 66 5E 2E    ;..     if ((f^.
019440:  76 61 6C 65 75 72 3D 27 2B 27 29 20 61 6E 64 20    valeur='+') and 
019450:  28 63 6F 65 66 66 3C 30 29 29 20 74 68 65 6E 0D    (coeff<0)) then.
019460:  0A 20 20 20 20 74 61 70 65 66 6F 6E 63 74 69 6F    .    tapefonctio
019470:  6E 3A 3D 27 28 27 2B 77 77 78 2B 77 77 77 2B 27    n:='('+wwx+www+'
019480:  29 27 20 65 6C 73 65 0D 0A 20 20 20 74 61 70 65    )' else..   tape
019490:  66 6F 6E 63 74 69 6F 6E 3A 3D 27 28 27 2B 77 77    fonction:='('+ww
0194A0:  78 2B 66 5E 2E 76 61 6C 65 75 72 2B 77 77 77 2B    x+f^.valeur+www+
0194B0:  27 29 27 0D 0A 20 20 20 65 6E 64 0D 0A 20 20 20    ')'..   end..   
0194C0:  65 6C 73 65 0D 0A 69 66 20 28 28 66 5E 2E 6E 61    else..if ((f^.na
0194D0:  74 75 72 65 3D 27 64 69 76 69 73 65 27 29 20 6F    ture='divise') o
0194E0:  72 20 28 66 5E 2E 6E 61 74 75 72 65 3D 27 6D 75    r (f^.nature='mu
0194F0:  6C 74 69 27 29 20 6F 72 20 28 66 5E 2E 6E 61 74    lti') or (f^.nat
019500:  75 72 65 3D 27 70 75 69 73 73 27 29 29 0D 0A 74    ure='puiss'))..t
019510:  68 65 6E 20 74 61 70 65 66 6F 6E 63 74 69 6F 6E    hen tapefonction
019520:  3A 3D 74 61 70 65 66 6F 6E 63 74 69 6F 6E 28 66    :=tapefonction(f
019530:  5E 2E 67 2C 76 29 2B 66 5E 2E 76 61 6C 65 75 72    ^.g,v)+f^.valeur
019540:  2B 74 61 70 65 66 6F 6E 63 74 69 6F 6E 28 66 5E    +tapefonction(f^
019550:  2E 64 2C 76 29 20 65 6C 73 65 0D 0A 74 61 70 65    .d,v) else..tape
019560:  66 6F 6E 63 74 69 6F 6E 3A 3D 27 27 3B 0D 0A 65    fonction:='';..e
019570:  6E 64 3B 0D 0A 0D 0A 66 75 6E 63 74 69 6F 6E 20    nd;....function 
019580:  6F 70 70 6F 73 65 3B 0D 0A 76 61 72 0D 0A 75 2C    oppose;..var..u,
019590:  76 3A 66 6F 6E 63 74 69 6F 6E 3B 0D 0A 63 6F 65    v:fonction;..coe
0195A0:  66 66 2C 72 65 73 75 6C 74 61 74 3A 69 6E 74 65    ff,resultat:inte
0195B0:  67 65 72 3B 0D 0A 63 6F 65 66 32 3A 72 65 61 6C    ger;..coef2:real
0195C0:  3B 0D 0A 62 65 67 69 6E 0D 0A 69 66 20 28 28 66    ;..begin..if ((f
0195D0:  5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20 61 6E    ^.valeur='*') an
0195E0:  64 20 28 66 5E 2E 67 5E 2E 6E 61 74 75 72 65 3D    d (f^.g^.nature=
0195F0:  27 6E 6F 6D 62 72 65 27 29 29 20 74 68 65 6E 0D    'nombre')) then.
019600:  0A 20 62 65 67 69 6E 0D 0A 20 20 6E 65 77 28 75    . begin..  new(u
019610:  29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75    );u^.nature:='mu
019620:  6C 74 69 27 3B 75 5E 2E 76 61 6C 65 75 72 3A 3D    lti';u^.valeur:=
019630:  27 2A 27 3B 75 5E 2E 64 3A 3D 66 5E 2E 64 3B 0D    '*';u^.d:=f^.d;.
019640:  0A 20 20 75 5E 2E 67 3A 3D 6F 70 70 6F 73 65 28    .  u^.g:=oppose(
019650:  66 5E 2E 67 29 3B 6F 70 70 6F 73 65 3A 3D 75 3B    f^.g);oppose:=u;
019660:  0D 0A 20 65 6E 64 0D 0A 20 65 6C 73 65 0D 0A 69    .. end.. else..i
019670:  66 20 28 28 66 5E 2E 76 61 6C 65 75 72 3D 27 2A    f ((f^.valeur='*
019680:  27 29 20 6F 72 20 28 66 5E 2E 76 61 6C 65 75 72    ') or (f^.valeur
019690:  3D 27 2F 27 29 29 20 74 68 65 6E 0D 0A 20 62 65    ='/')) then.. be
0196A0:  67 69 6E 0D 0A 20 20 6E 65 77 28 75 29 3B 75 5E    gin..  new(u);u^
0196B0:  2E 6E 61 74 75 72 65 3A 3D 27 6D 75 6C 74 69 27    .nature:='multi'
0196C0:  3B 75 5E 2E 76 61 6C 65 75 72 3A 3D 27 2A 27 3B    ;u^.valeur:='*';
0196D0:  75 5E 2E 64 3A 3D 66 3B 6E 65 77 28 75 5E 2E 67    u^.d:=f;new(u^.g
0196E0:  29 3B 0D 0A 20 20 75 5E 2E 67 5E 2E 6E 61 74 75    );..  u^.g^.natu
0196F0:  72 65 3A 3D 27 6E 6F 6D 62 72 65 27 3B 75 5E 2E    re:='nombre';u^.
019700:  67 5E 2E 76 61 6C 65 75 72 3A 3D 27 2D 31 27 3B    g^.valeur:='-1';
019710:  75 5E 2E 67 5E 2E 67 3A 3D 6E 69 6C 3B 75 5E 2E    u^.g^.g:=nil;u^.
019720:  67 5E 2E 64 3A 3D 6E 69 6C 3B 0D 0A 20 20 6F 70    g^.d:=nil;..  op
019730:  70 6F 73 65 3A 3D 75 3B 0D 0A 20 65 6E 64 0D 0A    pose:=u;.. end..
019740:  20 65 6C 73 65 0D 0A 69 66 20 28 28 66 5E 2E 76     else..if ((f^.v
019750:  61 6C 65 75 72 3D 27 78 27 29 20 6F 72 20 28 66    aleur='x') or (f
019760:  5E 2E 76 61 6C 65 75 72 3D 27 5E 27 29 29 20 74    ^.valeur='^')) t
019770:  68 65 6E 0D 0A 20 62 65 67 69 6E 0D 0A 20 20 6E    hen.. begin..  n
019780:  65 77 28 75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A    ew(u);u^.nature:
019790:  3D 27 6D 75 6C 74 69 27 3B 75 5E 2E 76 61 6C 65    ='multi';u^.vale
0197A0:  75 72 3A 3D 27 2A 27 3B 75 5E 2E 64 3A 3D 66 3B    ur:='*';u^.d:=f;
0197B0:  0D 0A 20 20 6E 65 77 28 76 29 3B 76 5E 2E 6E 61    ..  new(v);v^.na
0197C0:  74 75 72 65 3A 3D 27 6E 6F 6D 62 72 65 27 3B 76    ture:='nombre';v
0197D0:  5E 2E 76 61 6C 65 75 72 3A 3D 27 2D 31 27 3B 76    ^.valeur:='-1';v
0197E0:  5E 2E 64 3A 3D 6E 69 6C 3B 76 5E 2E 67 3A 3D 6E    ^.d:=nil;v^.g:=n
0197F0:  69 6C 3B 0D 0A 20 20 75 5E 2E 67 3A 3D 76 3B 6F    il;..  u^.g:=v;o
019800:  70 70 6F 73 65 3A 3D 75 3B 0D 0A 20 65 6E 64 0D    ppose:=u;.. end.
019810:  0A 20 65 6C 73 65 0D 0A 69 66 20 66 5E 2E 6E 61    . else..if f^.na
019820:  74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 20 74 68    ture='nombre' th
019830:  65 6E 0D 0A 20 62 65 67 69 6E 0D 0A 20 20 6E 65    en.. begin..  ne
019840:  77 28 75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D    w(u);u^.nature:=
019850:  27 6E 6F 6D 62 72 65 27 3B 75 5E 2E 64 3A 3D 6E    'nombre';u^.d:=n
019860:  69 6C 3B 75 5E 2E 67 3A 3D 6E 69 6C 3B 0D 0A 20    il;u^.g:=nil;.. 
019870:  20 76 61 6C 28 66 5E 2E 76 61 6C 65 75 72 2C 63     val(f^.valeur,c
019880:  6F 65 66 32 2C 72 65 73 75 6C 74 61 74 29 3B 63    oef2,resultat);c
019890:  6F 65 66 32 3A 3D 63 6F 65 66 32 2A 28 2D 31 29    oef2:=coef2*(-1)
0198A0:  3B 0D 0A 20 20 69 66 20 66 72 61 63 28 63 6F 65    ;..  if frac(coe
0198B0:  66 32 29 3D 30 20 74 68 65 6E 20 73 74 72 28 72    f2)=0 then str(r
0198C0:  6F 75 6E 64 28 63 6F 65 66 32 29 2C 75 5E 2E 76    ound(coef2),u^.v
0198D0:  61 6C 65 75 72 29 0D 0A 20 20 20 20 65 6C 73 65    aleur)..    else
0198E0:  0D 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20    ..    begin..   
0198F0:  20 73 74 72 28 63 6F 65 66 32 3A 31 30 3A 35 2C     str(coef2:10:5,
019900:  75 5E 2E 76 61 6C 65 75 72 29 3B 0D 0A 20 20 20    u^.valeur);..   
019910:  20 77 68 69 6C 65 20 70 6F 73 28 27 20 27 2C 75     while pos(' ',u
019920:  5E 2E 76 61 6C 65 75 72 29 3C 3E 30 20 64 6F 20    ^.valeur)<>0 do 
019930:  64 65 6C 65 74 65 28 75 5E 2E 76 61 6C 65 75 72    delete(u^.valeur
019940:  2C 31 2C 31 29 3B 0D 0A 20 20 20 20 65 6E 64 3B    ,1,1);..    end;
019950:  0D 0A 20 20 6F 70 70 6F 73 65 3A 3D 75 3B 0D 0A    ..  oppose:=u;..
019960:  20 65 6E 64 0D 0A 20 65 6C 73 65 0D 0A 69 66 20     end.. else..if 
019970:  66 5E 2E 76 61 6C 65 75 72 3D 27 2B 27 20 74 68    f^.valeur='+' th
019980:  65 6E 0D 0A 20 20 62 65 67 69 6E 20 6E 65 77 28    en..  begin new(
019990:  75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D 27 70    u);u^.nature:='p
0199A0:  6C 75 73 27 3B 75 5E 2E 76 61 6C 65 75 72 3A 3D    lus';u^.valeur:=
0199B0:  27 2B 27 3B 0D 0A 20 20 75 5E 2E 67 3A 3D 6F 70    '+';..  u^.g:=op
0199C0:  70 6F 73 65 28 66 5E 2E 67 29 3B 75 5E 2E 64 3A    pose(f^.g);u^.d:
0199D0:  3D 6F 70 70 6F 73 65 28 66 5E 2E 64 29 3B 6F 70    =oppose(f^.d);op
0199E0:  70 6F 73 65 3A 3D 75 20 65 6E 64 0D 0A 20 65 6C    pose:=u end.. el
0199F0:  73 65 0D 0A 69 66 20 66 5E 2E 76 61 6C 65 75 72    se..if f^.valeur
019A00:  3D 27 2D 27 20 74 68 65 6E 0D 0A 20 20 62 65 67    ='-' then..  beg
019A10:  69 6E 20 6E 65 77 28 75 29 3B 75 5E 2E 6E 61 74    in new(u);u^.nat
019A20:  75 72 65 3A 3D 27 70 6C 75 73 27 3B 75 5E 2E 76    ure:='plus';u^.v
019A30:  61 6C 65 75 72 3A 3D 27 2B 27 3B 75 5E 2E 67 3A    aleur:='+';u^.g:
019A40:  3D 6F 70 70 6F 73 65 28 66 5E 2E 67 29 3B 75 5E    =oppose(f^.g);u^
019A50:  2E 64 3A 3D 66 5E 2E 64 3B 0D 0A 20 20 6F 70 70    .d:=f^.d;..  opp
019A60:  6F 73 65 3A 3D 75 20 65 6E 64 0D 0A 20 20 65 6C    ose:=u end..  el
019A70:  73 65 0D 0A 69 66 20 66 3D 6E 69 6C 20 74 68 65    se..if f=nil the
019A80:  6E 20 6F 70 70 6F 73 65 3A 3D 6E 69 6C 3B 0D 0A    n oppose:=nil;..
019A90:  65 6E 64 3B 0D 0A 0D 0A 0D 0A 0D 0A 66 75 6E 63    end;........func
019AA0:  74 69 6F 6E 20 20 65 78 70 6F 73 61 6E 74 3B 0D    tion  exposant;.
019AB0:  0A 76 61 72 0D 0A 6C 6C 3A 69 6E 74 65 67 65 72    .var..ll:integer
019AC0:  3B 0D 0A 62 65 67 69 6E 0D 0A 6C 6C 3A 3D 72 6F    ;..begin..ll:=ro
019AD0:  75 6E 64 28 6C 29 3B 0D 0A 69 66 20 6B 3D 30 20    und(l);..if k=0 
019AE0:  74 68 65 6E 20 65 78 70 6F 73 61 6E 74 3A 3D 30    then exposant:=0
019AF0:  20 65 6C 73 65 0D 0A 69 66 20 6C 6C 3D 30 20 74     else..if ll=0 t
019B00:  68 65 6E 20 65 78 70 6F 73 61 6E 74 3A 3D 31 20    hen exposant:=1 
019B10:  65 6C 73 65 0D 0A 69 66 20 6C 6C 3E 30 20 74 68    else..if ll>0 th
019B20:  65 6E 20 62 65 67 69 6E 20 6C 3A 3D 6C 2D 31 3B    en begin l:=l-1;
019B30:  65 78 70 6F 73 61 6E 74 3A 3D 6B 2A 65 78 70 6F    exposant:=k*expo
019B40:  73 61 6E 74 28 6B 2C 6C 29 20 65 6E 64 20 65 6C    sant(k,l) end el
019B50:  73 65 0D 0A 69 66 20 6C 6C 3C 30 20 74 68 65 6E    se..if ll<0 then
019B60:  20 62 65 67 69 6E 20 6C 3A 3D 6C 2B 31 3B 65 78     begin l:=l+1;ex
019B70:  70 6F 73 61 6E 74 3A 3D 28 31 2F 6B 29 2A 65 78    posant:=(1/k)*ex
019B80:  70 6F 73 61 6E 74 28 6B 2C 6C 29 20 65 6E 64 3B    posant(k,l) end;
019B90:  0D 0A 65 6E 64 3B 0D 0A 0D 0A 0D 0A 70 72 6F 63    ..end;......proc
019BA0:  65 64 75 72 65 20 20 20 20 63 61 6C 63 75 6C 66    edure    calculf
019BB0:  6F 6E 63 74 69 6F 6E 28 66 3A 66 6F 6E 63 74 69    onction(f:foncti
019BC0:  6F 6E 29 3B 0D 0A 76 61 72 0D 0A 63 68 78 2C 63    on);..var..chx,c
019BD0:  68 79 3A 73 74 72 31 30 3B 0D 0A 62 65 67 69 6E    hy:str10;..begin
019BE0:  0D 0A 20 63 6C 72 73 63 72 3B 0D 0A 20 72 65 70    .. clrscr;.. rep
019BF0:  65 61 74 0D 0A 20 77 72 69 74 65 28 27 76 61 6C    eat.. write('val
019C00:  65 75 72 20 64 65 20 78 20 3F 27 29 3B 0D 0A 20    eur de x ?');.. 
019C10:  72 65 61 64 6C 6E 28 78 29 3B 0D 0A 20 64 65 66    readln(x);.. def
019C20:  69 6E 69 3A 3D 74 72 75 65 3B 72 65 73 75 6C 74    ini:=true;result
019C30:  61 74 3A 3D 63 61 6C 63 75 6C 28 66 2C 78 29 3B    at:=calcul(f,x);
019C40:  0D 0A 20 69 66 20 66 72 61 63 28 78 29 3D 30 20    .. if frac(x)=0 
019C50:  74 68 65 6E 20 73 74 72 28 72 6F 75 6E 64 28 78    then str(round(x
019C60:  29 2C 63 68 78 29 20 65 6C 73 65 20 73 74 72 28    ),chx) else str(
019C70:  78 3A 38 3A 33 2C 63 68 78 29 3B 0D 0A 20 69 66    x:8:3,chx);.. if
019C80:  20 64 65 66 69 6E 69 3D 74 72 75 65 20 74 68 65     defini=true the
019C90:  6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    n..             
019CA0:  20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20           begin..  
019CB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
019CC0:  20 20 77 72 69 74 65 28 27 66 27 2C 69 2C 27 28      write('f',i,'(
019CD0:  27 2C 63 68 78 2C 27 29 3D 27 29 3B 0D 0A 20 20    ',chx,')=');..  
019CE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
019CF0:  20 20 69 66 20 66 72 61 63 28 72 65 73 75 6C 74      if frac(result
019D00:  61 74 29 3D 30 20 74 68 65 6E 20 73 74 72 28 72    at)=0 then str(r
019D10:  6F 75 6E 64 28 72 65 73 75 6C 74 61 74 29 2C 63    ound(resultat),c
019D20:  68 79 29 20 65 6C 73 65 0D 0A 20 20 20 20 20 20    hy) else..      
019D30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74                  st
019D40:  72 28 72 65 73 75 6C 74 61 74 3A 38 3A 33 2C 63    r(resultat:8:3,c
019D50:  68 79 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20    hy);..          
019D60:  20 20 20 20 20 20 20 20 20 20 77 72 69 74 65 6C              writel
019D70:  6E 28 63 68 79 29 3B 0D 0A 20 20 20 20 20 20 20    n(chy);..       
019D80:  20 20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64                 end
019D90:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
019DA0:  20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20          else..    
019DB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
019DC0:  62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20    begin..         
019DD0:  20 20 20 20 20 20 20 20 20 20 20 77 72 69 74 65               write
019DE0:  6C 6E 28 27 66 27 2C 69 2C 27 28 27 2C 63 68 78    ln('f',i,'(',chx
019DF0:  2C 27 29 20 6E 27 27 65 73 74 20 70 61 73 20 64    ,') n''est pas d
019E00:  65 66 69 6E 69 65 27 29 3B 0D 0A 20 20 20 20 20    efinie');..     
019E10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65                   e
019E20:  6E 64 3B 0D 0A 20 77 72 69 74 65 6C 6E 28 27 3C    nd;.. writeln('<
019E30:  31 3E 20 55 6E 20 61 75 74 72 65 20 78 3F 20 3C    1> Un autre x? <
019E40:  32 3E 20 52 65 74 6F 75 72 20 61 75 20 6D 65 6E    2> Retour au men
019E50:  75 20 27 29 3B 0D 0A 20 20 20 72 65 70 65 61 74    u ');..   repeat
019E60:  0D 0A 20 20 20 72 65 61 64 28 6B 62 64 2C 63 61    ..   read(kbd,ca
019E70:  72 29 3B 0D 0A 20 20 20 75 6E 74 69 6C 20 28 28    r);..   until ((
019E80:  63 61 72 3D 27 31 27 29 20 6F 72 20 28 63 61 72    car='1') or (car
019E90:  3D 27 32 27 29 29 3B 0D 0A 20 20 20 76 61 6C 28    ='2'));..   val(
019EA0:  63 61 72 2C 63 68 6F 69 78 2C 72 65 73 75 6C 74    car,choix,result
019EB0:  29 3B 0D 0A 20 77 72 69 74 65 6C 6E 3B 0D 0A 20    );.. writeln;.. 
019EC0:  75 6E 74 69 6C 20 63 68 6F 69 78 3D 32 0D 0A 65    until choix=2..e
019ED0:  6E 64 3B 0D 0A 0D 0D 0D 0D 1A 1A 1A 1A 1A 1A 1A    nd;.............
019EE0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
019EF0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
019F00:  5E 23 56 EB 11 07 00 19 CD 3A 05 21 2F 00 65 2E    ^#V......:.!/.e.
019F10:  01 E5 CD 8D 06 D1 7D B3 6F CB 45 CA DE 45 21 DA    ......}.o.E..E!.
019F20:  ED E5 21 16 00 CD E5 1C CD 4D 05 05 6D 75 6C 74    ..!......M..mult
019F30:  69 06 06 2A DA ED CD E2 05 2A DA ED 11 07 00 19    i..*.....*......
019F40:  E5 21 2A 00 65 2E 01 E5 06 0A CD 01 06 2A DA ED    .!*.e........*..
019F50:  11 12 00 19 E5 2A E4 ED 5E 23 56 EB EB E1 73 23    .....*..^#V...s#
019F60:  72 2A DA ED 11 14 00 19 E5 21 16 00 CD E5 1C 2A    r*.......!.....*
019F70:  DA ED 11 14 00 19 5E 23 56 EB E5 CD 4D 05 06 6E    ......^#V...M..n
019F80:  6F 6D 62 72 65 06 06 CD 01 06 2A DA ED 11 14 00    ombre.....*.....
019F90:  19 5E 23 56 EB 11 07 00 19 E5 CD 4D 05 02 2D 31    .^#V.......M..-1
019FA0:  06 0A CD 01 06 2A DA ED 11 14 00 19 5E 23 56 EB    .....*......^#V.
019FB0:  11 14 00 19 E5 21 00 00 EB E1 73 23 72 2A DA ED    .....!....s#r*..
019FC0:  11 14 00 19 5E 23 56 EB 11 12 00 19 E5 21 00 00    ....^#V......!..
019FD0:  EB E1 73 23 72 2A DA ED 22 E6 ED C3 19 49 2A E4    ..s#r*.."....I*.
019FE0:  ED 5E 23 56 EB 11 07 00 19 CD 3A 05 21 78 00 65    .^#V......:.!x.e
019FF0:  2E 01 E5 CD 8D 06 E5 2A E4 ED 5E 23 56 EB 11 07    .......*..^#V...
01A000:  00 19 CD 3A 05 21 5E 00 65 2E 01 E5 CD 8D 06 D1    ...:.!^.e.......
01A010:  7D B3 6F CB 45 CA C3 46 21 DA ED E5 21 16 00 CD    }.o.E..F!...!...
01A020:  E5 1C CD 4D 05 05 6D 75 6C 74 69 06 06 2A DA ED    ...M..multi..*..
01A030:  CD E2 05 2A DA ED 11 07 00 19 E5 21 2A 00 65 2E    ...*.......!*.e.
01A040:  01 E5 06 0A CD 01 06 2A DA ED 11 12 00 19 E5 2A    .......*.......*
01A050:  E4 ED 5E 23 56 EB EB E1 73 23 72 21 D8 ED E5 21    ..^#V...s#r!...!
01A060:  16 00 CD E5 1C CD 4D 05 06 6E 6F 6D 62 72 65 06    ......M..nombre.
01A070:  06 2A D8 ED CD E2 05 2A D8 ED 11 07 00 19 E5 CD    .*.....*........
01A080:  4D 05 02 2D 31 06 0A CD 01 06 2A D8 ED 11 12 00    M..-1.....*.....
01A090:  19 E5 21 00 00 EB E1 73 23 72 2A D8 ED 11 14 00    ..!....s#r*.....
01A0A0:  19 E5 21 00 00 EB E1 73 23 72 2A DA ED 11 14 00    ..!....s#r*.....
01A0B0:  19 E5 2A D8 ED EB E1 73 23 72 2A DA ED 22 E6 ED    ..*....s#r*.."..
01A0C0:  C3 19 49 2A E4 ED 5E 23 56 EB CD 3A 05 CD 4D 05    ..I*..^#V..:..M.
01A0D0:  06 6E 6F 6D 62 72 65 CD 8D 06 CB 45 CA E7 47 21    .nombre....E..G!
01A0E0:  DA ED E5 21 16 00 CD E5 1C CD 4D 05 06 6E 6F 6D    ...!......M..nom
01A0F0:  62 72 65 06 06 2A DA ED CD E2 05 2A DA ED 11 12    bre..*.....*....
01A100:  00 19 E5 21 00 00 EB E1 73 23 72 2A DA ED 11 14    ...!....s#r*....
01A110:  00 19 E5 21 00 00 EB E1 73 23 72 2A E4 ED 5E 23    ...!....s#r*..^#
01A120:  56 EB 11 07 00 19 CD 3A 05 21 CE ED E5 21 D4 ED    V......:.!...!..
01A130:  CD F3 1E 21 CE ED CD 2C 05 C5 D5 E5 21 FF FF CD    ...!...,....!...
01A140:  08 10 D9 E1 D1 C1 CD FA 09 D9 21 CE ED CD D1 05    ..........!.....
01A150:  21 CE ED CD 2C 05 CD 34 0C C5 D5 E5 21 00 00 CD    !...,..4....!...
01A160:  08 10 D9 E1 D1 C1 CD 88 06 CB 45 CA 8B 47 21 CE    ..........E..G!.
01A170:  ED CD 2C 05 CD D0 0F E5 21 00 00 E5 2A DA ED 11    ..,.....!...*...
01A180:  07 00 19 06 0A CD BE 1E C3 DE 47 21 CE ED CD 2C    ..........G!...,
01A190:  05 C5 D5 E5 21 0A 00 E5 21 05 00 E5 2A DA ED 11    ....!...!...*...
01A1A0:  07 00 19 06 0A CD BD 1E 21 20 00 65 2E 01 E5 2A    ........! .e...*
01A1B0:  DA ED 11 07 00 19 CD 3A 05 CD B2 08 E5 21 00 00    .......:.....!..
01A1C0:  D1 CD 92 06 CB 45 CA DE 47 2A DA ED 11 07 00 19    .....E..G*......
01A1D0:  E5 21 01 00 E5 21 01 00 CD F3 08 C3 A8 47 2A DA    .!...!.......G*.
01A1E0:  ED 22 E6 ED C3 19 49 2A E4 ED 5E 23 56 EB 11 07    ."....I*..^#V...
01A1F0:  00 19 CD 3A 05 21 2B 00 65 2E 01 E5 CD 8D 06 CB    ...:.!+.e.......
01A200:  45 CA 73 48 21 DA ED E5 21 16 00 CD E5 1C CD 4D    E.sH!...!......M
01A210:  05 04 70 6C 75 73 06 06 2A DA ED CD E2 05 2A DA    ..plus..*.....*.
01A220:  ED 11 07 00 19 E5 21 2B 00 65 2E 01 E5 06 0A CD    ......!+.e......
01A230:  01 06 2A DA ED 11 14 00 19 E5 2A E4 ED 5E 23 56    ..*.......*..^#V
01A240:  EB 11 14 00 19 E5 CD 50 2D EB E1 73 23 72 2A DA    .......P-..s#r*.
01A250:  ED 11 12 00 19 E5 2A E4 ED 5E 23 56 EB 11 12 00    ......*..^#V....
01A260:  19 E5 CD 50 2D EB E1 73 23 72 2A DA ED 22 E6 ED    ...P-..s#r*.."..
01A270:  C3 19 49 2A E4 ED 5E 23 56 EB 11 07 00 19 CD 3A    ..I*..^#V......:
01A280:  05 21 2D 00 65 2E 01 E5 CD 8D 06 CB 45 CA FF 48    .!-.e.......E..H
01A290:  21 DA ED E5 21 16 00 CD E5 1C CD 4D 05 04 70 6C    !...!......M..pl
01A2A0:  75 73 06 06 2A DA ED CD E2 05 2A DA ED 11 07 00    us..*.....*.....
01A2B0:  19 E5 21 2B 00 65 2E 01 E5 06 0A CD 01 06 2A DA    ..!+.e........*.
01A2C0:  ED 11 14 00 19 E5 2A E4 ED 5E 23 56 EB 11 14 00    ......*..^#V....
01A2D0:  19 E5 CD 50 2D EB E1 73 23 72 2A DA ED 11 12 00    ...P-..s#r*.....
01A2E0:  19 E5 2A E4 ED 5E 23 56 EB 11 12 00 19 5E 23 56    ..*..^#V.....^#V
01A2F0:  EB EB E1 73 23 72 2A DA ED 22 E6 ED C3 19 49 2A    ...s#r*.."....I*
01A300:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
01A310:  16 00 00 00 02 09 4E E5 16 00 41 02 00 00 00 02    ......N...A.....
01A320:  16 00 42 02 00 00 00 02 16 00 43 02 00 00 00 02    ..B.......C.....
01A330:  16 00 44 02 00 00 00 02 16 00 45 02 00 00 00 02    ..D.......E.....
01A340:  16 00 46 02 00 00 00 02 16 00 47 02 00 00 00 02    ..F.......G.....
01A350:  16 00 48 02 00 00 00 02 16 00 49 02 00 00 00 02    ..H.......I.....
01A360:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A370:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A380:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A390:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A3A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A3B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A3C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A3D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A3E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A3F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A400:  E4 ED 5E 23 56 EB E5 21 00 00 D1 CD 7F 06 CB 45    ..^#V..!.......E
01A410:  CA 19 49 21 00 00 22 E6 ED 2A E6 ED D9 01 1A 00    ..I!.."..*......
01A420:  11 CE ED C3 22 05 01 1C 00 21 B2 ED CD 08 05 FD    ...."....!......
01A430:  E1 E1 D1 C1 D9 21 BC ED CD D1 05 E1 D1 C1 D9 21    .....!.........!
01A440:  C2 ED CD D1 05 FD E5 21 BC ED CD 2C 05 CD D0 0F    .......!...,....
01A450:  22 B2 ED 21 C2 ED CD 2C 05 C5 D5 E5 21 00 00 CD    "..!...,....!...
01A460:  08 10 D9 E1 D1 C1 CD 88 06 CB 45 CA 7E 49 21 00    ..........E.~I!.
01A470:  00 CD 08 10 D9 21 C8 ED CD D1 05 C3 5F 4A 2A B2    .....!......_J*.
01A480:  ED E5 21 00 00 D1 CD 7F 06 CB 45 CA 9E 49 21 01    ..!.......E..I!.
01A490:  00 CD 08 10 D9 21 C8 ED CD D1 05 C3 5F 4A 2A B2    .....!......_J*.
01A4A0:  ED E5 21 00 00 D1 CD CC 06 CB 45 CA FA 49 21 BC    ..!.......E..I!.
01A4B0:  ED CD 2C 05 C5 D5 E5 21 01 00 CD 08 10 D9 E1 D1    ..,....!........
01A4C0:  C1 CD F2 09 D9 21 BC ED CD D1 05 21 C2 ED CD 2C    .....!.....!...,
01A4D0:  05 C5 D5 E5 21 C2 ED CD 2C 05 C5 D5 E5 21 BC ED    ....!...,....!..
01A4E0:  CD 2C 05 C5 D5 E5 CD 35 36 D9 E1 D1 C1 CD FA 09    .,.....56.......
01A4F0:  D9 21 C8 ED CD D1 05 C3 5F 4A 2A B2 ED E5 21 00    .!......_J*...!.
01A500:  00 D1 CD E0 06 CB 45 CA 5F 4A 21 BC ED CD 2C 05    ......E._J!...,.
01A510:  C5 D5 E5 21 01 00 CD 08 10 D9 E1 D1 C1 CD E9 09    ...!............
01A520:  D9 21 BC ED CD D1 05 21 01 00 E5 21 C2 ED CD 2C    .!.....!...!...,
01A530:  05 D9 E1 CD 08 10 CD FF 09 C5 D5 E5 21 C2 ED CD    ............!...
01A540:  2C 05 C5 D5 E5 21 BC ED CD 2C 05 C5 D5 E5 CD 35    ,....!...,.....5
01A550:  36 D9 E1 D1 C1 CD FA 09 D9 21 C8 ED CD D1 05 21    6........!.....!
01A560:  C8 ED CD 2C 05 D9 01 1C 00 11 B2 ED C3 22 05 01    ...,........."..
01A570:  20 00 21 92 ED CD 08 05 FD E1 E1 22 B0 ED FD E5     .!........"....
01A580:  CD 3E 02 CD 9B 14 CD BA 17 0D 76 61 6C 65 75 72    .>........valeur
01A590:  20 64 65 20 78 20 3F CD 1B 20 21 C1 F1 CD CB 14     de x ?.. !.....
01A5A0:  CD 72 16 CD 1B 20 21 01 00 7D 32 C7 F1 2A B0 ED    .r... !..}2..*..
01A5B0:  E5 21 C1 F1 CD 2C 05 C5 D5 E5 CD 4D 2D D9 21 BB    .!...,.....M-.!.
01A5C0:  F1 CD D1 05 21 C1 F1 CD 2C 05 CD 34 0C C5 D5 E5    ....!...,..4....
01A5D0:  21 00 00 CD 08 10 D9 E1 D1 C1 CD 88 06 CB 45 CA    !.............E.
01A5E0:  FB 4A 21 C1 F1 CD 2C 05 CD D0 0F E5 21 00 00 E5    .J!...,.....!...
01A5F0:  21 9D ED 06 0A CD BE 1E C3 14 4B 21 C1 F1 CD 2C    !.........K!...,
01A600:  05 C5 D5 E5 21 08 00 E5 21 03 00 E5 21 9D ED 06    ....!...!...!...
01A610:  0A CD BD 1E 2A C7 F1 26 00 E5 21 01 00 D1 CD 7F    ....*..&..!.....
01A620:  06 CB 45 CA BC 4B CD 9B 14 21 66 00 CD 22 17 2A    ..E..K...!f..".*
01A630:  98 F2 E5 21 00 00 CD 26 17 21 28 00 CD 22 17 21    ...!...&.!(..".!
01A640:  9D ED CD 3A 05 21 00 00 CD AA 17 CD BA 17 02 29    ...:.!.........)
01A650:  3D CD 1B 20 21 BB F1 CD 2C 05 CD 34 0C C5 D5 E5    =.. !...,..4....
01A660:  21 00 00 CD 08 10 D9 E1 D1 C1 CD 88 06 CB 45 CA    !.............E.
01A670:  8B 4B 21 BB F1 CD 2C 05 CD D0 0F E5 21 00 00 E5    .K!...,.....!...
01A680:  21 92 ED 06 0A CD BE 1E C3 A4 4B 21 BB F1 CD 2C    !.........K!...,
01A690:  05 C5 D5 E5 21 08 00 E5 21 03 00 E5 21 92 ED 06    ....!...!...!...
01A6A0:  0A CD BD 1E 21 92 ED CD 3A 05 CD 9B 14 21 00 00    ....!...:....!..
01A6B0:  CD AA 17 CD CD 17 CD 1B 20 C3 FE 4B CD 9B 14 21    ........ ..K...!
01A6C0:  66 00 CD 22 17 2A 98 F2 E5 21 00 00 CD 26 17 21    f..".*...!...&.!
01A6D0:  28 00 CD 22 17 21 9D ED CD 3A 05 21 00 00 CD AA    (..".!...:.!....
01A6E0:  17 CD BA 17 13 29 20 6E 27 65 73 74 20 70 61 73    .....) n'est pas
01A6F0:  20 64 65 66 69 6E 69 65 CD CD 17 CD 1B 20 CD 9B     definie..... ..
01A700:  14 CD BA 17 23 3C 31 3E 20 55 6E 20 61 75 74 72    ....#<1> Un autr
01A710:  65 20 78 3F 20 3C 32 3E 20 52 65 74 6F 75 72 20    e x? <2> Retour 
01A720:  61 75 20 6D 65 6E 75 20 CD CD 17 CD 1B 20 21 BA    au menu ..... !.
01A730:  00 CD A9 14 21 A5 F2 CD 44 16 CD 1B 20 2A A5 F2    ....!...D... *..
01A740:  26 00 E5 21 31 00 D1 CD 7F 06 E5 2A A5 F2 26 00    &..!1......*..&.
01A750:  E5 21 32 00 D1 CD 7F 06 D1 7D B3 6F CB 45 CA 2E    .!2......}.o.E..
01A760:  4C 2A A5 F2 26 00 65 2E 01 E5 21 90 F2 E5 21 94    L*..&.e...!...!.
01A770:  F2 CD F4 1E CD 9B 14 CD CD 17 CD 1B 20 2A 90 F2    ............ *..
01A780:  E5 21 02 00 D1 CD 7F 06 CB 45 CA 83 4A 01 20 00    .!.......E..J. .
01A790:  11 92 ED C3 22 05 C3 6A 61 C3 BF 6C 01 0E 00 21    ...."..ja..l...!
01A7A0:  84 ED CD 08 05 FD E1 E1 22 90 ED FD E5 2A 90 ED    ........"....*..
01A7B0:  5E 23 56 EB 11 07 00 19 CD 3A 05 21 2A 00 65 2E    ^#V......:.!*.e.
01A7C0:  01 E5 CD 8D 06 E5 2A 90 ED 5E 23 56 EB 11 14 00    ......*..^#V....
01A7D0:  19 5E 23 56 EB 11 07 00 19 CD 3A 05 21 2B 00 65    .^#V......:.!+.e
01A7E0:  2E 01 E5 CD 8D 06 E5 2A 90 ED 5E 23 56 EB 11 14    .......*..^#V...
01A7F0:  00 19 5E 23 56 EB 11 07 00 19 CD 3A 05 21 2D 00    ..^#V......:.!-.
01A800:  65 2E 01 E5 CD 8D 06 D1 7D B3 6F D1 7D A3 6F E5    e.......}.o.}£o.
01A810:  2A 90 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB CD    *..^#V.....^#V..
01A820:  3A 05 CD 4D 05 05 69 64 66 63 74 CD A0 06 D1 7D    :..M..idfct....}
01A830:  A3 6F CB 45 CA 8C 4E 2A 90 ED 5E 23 56 EB E5 2A    £o.E..N*..^#V..*
01A840:  90 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB CD 3A    ..^#V.....^#V..:
01A850:  05 06 06 CD 01 06 2A 90 ED 5E 23 56 EB 11 07 00    ......*..^#V....
01A860:  19 E5 2A 90 ED 5E 23 56 EB 11 14 00 19 5E 23 56    ..*..^#V.....^#V
01A870:  EB 11 07 00 19 CD 3A 05 06 0A CD 01 06 21 84 ED    ......:......!..
01A880:  E5 21 16 00 CD E5 1C CD 4D 05 05 6D 75 6C 74 69    .!......M..multi
01A890:  06 06 2A 84 ED CD E2 05 2A 84 ED 11 07 00 19 E5    ..*.....*.......
01A8A0:  21 2A 00 65 2E 01 E5 06 0A CD 01 06 2A 84 ED 11    !*.e........*...
01A8B0:  14 00 19 E5 2A 90 ED 5E 23 56 EB 11 14 00 19 5E    ....*..^#V.....^
01A8C0:  23 56 EB 11 14 00 19 5E 23 56 EB EB E1 73 23 72    #V.....^#V...s#r
01A8D0:  2A 84 ED 11 12 00 19 E5 2A 90 ED 5E 23 56 EB 11    *.......*..^#V..
01A8E0:  12 00 19 5E 23 56 EB EB E1 73 23 72 21 86 ED E5    ...^#V...s#r!...
01A8F0:  21 16 00 CD E5 1C CD 4D 05 05 6D 75 6C 74 69 06    !......M..multi.
01A900:  06 2A 86 ED CD E2 05 2A 86 ED 11 07 00 19 E5 21    .*.....*.......!
01A910:  2A 00 65 2E 01 E5 06 0A CD 01 06 2A 86 ED 11 14    *.e........*....
01A920:  00 19 E5 2A 90 ED 5E 23 56 EB 11 14 00 19 5E 23    ...*..^#V.....^#
01A930:  56 EB 11 12 00 19 5E 23 56 EB EB E1 73 23 72 2A    V.....^#V...s#r*
01A940:  86 ED 11 12 00 19 E5 2A 90 ED 5E 23 56 EB 11 12    .......*..^#V...
01A950:  00 19 5E 23 56 EB EB E1 73 23 72 2A 90 ED 5E 23    ..^#V...s#r*..^#
01A960:  56 EB 11 14 00 19 E5 2A 84 ED EB E1 73 23 72 2A    V......*....s#r*
01A970:  90 ED 5E 23 56 EB 11 12 00 19 E5 2A 86 ED EB E1    ..^#V......*....
01A980:  73 23 72 21 01 00 22 94 F2 C3 7F 51 2A 90 ED 5E    s#r!.."....Q*..^
01A990:  23 56 EB 11 07 00 19 CD 3A 05 21 2A 00 65 2E 01    #V......:.!*.e..
01A9A0:  E5 CD 8D 06 E5 2A 90 ED 5E 23 56 EB 11 12 00 19    .....*..^#V.....
01A9B0:  5E 23 56 EB 11 07 00 19 CD 3A 05 21 2B 00 65 2E    ^#V......:.!+.e.
01A9C0:  01 E5 CD 8D 06 E5 2A 90 ED 5E 23 56 EB 11 12 00    ......*..^#V....
01A9D0:  19 5E 23 56 EB 11 07 00 19 CD 3A 05 21 2D 00 65    .^#V......:.!-.e
01A9E0:  2E 01 E5 CD 8D 06 D1 7D B3 6F D1 7D A3 6F E5 2A    .......}.o.}£o.*
01A9F0:  90 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB CD 3A    ..^#V.....^#V..:
01AA00:  05 CD 4D 05 05 69 64 66 63 74 CD A0 06 D1 7D A3    ..M..idfct....}£
01AA10:  6F CB 45 CA 6B 50 2A 90 ED 5E 23 56 EB E5 2A 90    o.E.kP*..^#V..*.
01AA20:  ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB CD 3A 05    .^#V.....^#V..:.
01AA30:  06 06 CD 01 06 2A 90 ED 5E 23 56 EB 11 07 00 19    .....*..^#V.....
01AA40:  E5 2A 90 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB    .*..^#V.....^#V.
01AA50:  11 07 00 19 CD 3A 05 06 0A CD 01 06 21 84 ED E5    .....:......!...
01AA60:  21 16 00 CD E5 1C CD 4D 05 05 6D 75 6C 74 69 06    !......M..multi.
01AA70:  06 2A 84 ED CD E2 05 2A 84 ED 11 07 00 19 E5 21    .*.....*.......!
01AA80:  2A 00 65 2E 01 E5 06 0A CD 01 06 2A 84 ED 11 14    *.e........*....
01AA90:  00 19 E5 2A 90 ED 5E 23 56 EB 11 14 00 19 5E 23    ...*..^#V.....^#
01AAA0:  56 EB EB E1 73 23 72 2A 84 ED 11 12 00 19 E5 2A    V...s#r*.......*
01AAB0:  90 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 14    ..^#V.....^#V...
01AAC0:  00 19 5E 23 56 EB EB E1 73 23 72 21 86 ED E5 21    ..^#V...s#r!...!
01AAD0:  16 00 CD E5 1C CD 4D 05 05 6D 75 6C 74 69 06 06    ......M..multi..
01AAE0:  2A 86 ED CD E2 05 2A 86 ED 11 07 00 19 E5 21 2A    *.....*.......!*
01AAF0:  00 65 2E 01 E5 06 0A CD 01 06 2A 86 ED 11 14 00    .e........*.....
01AB00:  19 E5 2A 90 ED 5E 23 56 EB 11 14 00 19 5E 23 56    ..*..^#V.....^#V
01AB10:  EB EB E1 73 23 72 2A 86 ED 11 12 00 19 E5 2A 90    ...s#r*.......*.
01AB20:  ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 12 00    .^#V.....^#V....
01AB30:  19 5E 23 56 EB EB E1 73 23 72 2A 90 ED 5E 23 56    .^#V...s#r*..^#V
01AB40:  EB 11 12 00 19 E5 2A 86 ED EB E1 73 23 72 2A 90    ......*....s#r*.
01AB50:  ED 5E 23 56 EB 11 14 00 19 E5 2A 84 ED EB E1 73    .^#V......*....s
01AB60:  23 72 21 01 00 22 94 F2 C3 7F 51 2A 90 ED 5E 23    #r!.."....Q*..^#
01AB70:  56 EB 11 07 00 19 CD 3A 05 21 5E 00 65 2E 01 E5    V......:.!^.e...
01AB80:  CD 8D 06 E5 2A 90 ED 5E 23 56 EB 11 12 00 19 5E    ....*..^#V.....^
01AB90:  23 56 EB 11 07 00 19 CD 3A 05 21 32 00 65 2E 01    #V......:.!2.e..
01ABA0:  E5 CD 8D 06 D1 7D A3 6F E5 2A 90 ED 5E 23 56 EB    .....}£o.*..^#V.
01ABB0:  11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05 21    ....^#V......:.!
01ABC0:  2A 00 65 2E 01 E5 CD 8D 06 D1 7D A3 6F CB 45 CA    *.e.......}£o.E.
01ABD0:  29 51 2A 90 ED 5E 23 56 EB E5 CD 4D 05 05 6D 75    )Q*..^#V...M..mu
01ABE0:  6C 74 69 06 06 CD 01 06 2A 90 ED 5E 23 56 EB 11    lti.....*..^#V..
01ABF0:  07 00 19 E5 21 2A 00 65 2E 01 E5 06 0A CD 01 06    ....!*.e........
01AC00:  2A 90 ED 5E 23 56 EB 11 12 00 19 E5 2A 90 ED 5E    *..^#V......*..^
01AC10:  23 56 EB 11 14 00 19 5E 23 56 EB EB E1 73 23 72    #V.....^#V...s#r
01AC20:  21 01 00 22 94 F2 C3 7F 51 2A 90 ED 5E 23 56 EB    !.."....Q*..^#V.
01AC30:  11 14 00 19 5E 23 56 EB E5 21 00 00 D1 CD 92 06    ....^#V..!......
01AC40:  CB 45 CA 54 51 2A 90 ED 5E 23 56 EB 11 14 00 19    .E.TQ*..^#V.....
01AC50:  E5 CD 9C 4C 2A 90 ED 5E 23 56 EB 11 12 00 19 5E    ...L*..^#V.....^
01AC60:  23 56 EB E5 21 00 00 D1 CD 92 06 CB 45 CA 7F 51    #V..!.......E..Q
01AC70:  2A 90 ED 5E 23 56 EB 11 12 00 19 E5 CD 9C 4C 01    *..^#V........L.
01AC80:  0E 00 11 84 ED C3 22 05 01 0E 00 21 76 ED CD 08    ......"....!v...
01AC90:  05 FD E1 E1 22 82 ED FD E5 2A 82 ED 5E 23 56 EB    ...."....*..^#V.
01ACA0:  11 07 00 19 CD 3A 05 21 2B 00 65 2E 01 E5 CD 8D    .....:.!+.e.....
01ACB0:  06 E5 2A 82 ED 5E 23 56 EB 11 07 00 19 CD 3A 05    ..*..^#V......:.
01ACC0:  21 2D 00 65 2E 01 E5 CD 8D 06 D1 7D B3 6F E5 2A    !-.e.......}.o.*
01ACD0:  82 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB E5 CD    ..^#V.....^#V...
01ACE0:  99 4C E5 21 00 00 D1 CD A5 06 D1 7D A3 6F E5 2A    .L.!.......}£o.*
01ACF0:  82 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB E5 CD    ..^#V.....^#V...
01AD00:  99 4C E5 2A 82 ED 5E 23 56 EB 11 14 00 19 5E 23    .L.*..^#V.....^#
01AD10:  56 EB E5 CD 99 4C D1 CD 7F 06 D1 7D A3 6F CB 45    V....L.....}£o.E
01AD20:  CA 68 57 2A 82 ED 5E 23 56 EB 11 12 00 19 5E 23    .hW*..^#V.....^#
01AD30:  56 EB 11 07 00 19 CD 3A 05 21 2A 00 65 2E 01 E5    V......:.!*.e...
01AD40:  CD 8D 06 E5 2A 82 ED 5E 23 56 EB 11 14 00 19 5E    ....*..^#V.....^
01AD50:  23 56 EB 11 07 00 19 CD 3A 05 21 2A 00 65 2E 01    #V......:.!*.e..
01AD60:  E5 CD 8D 06 D1 7D A3 6F CB 45 CA 76 54 2A 82 ED    .....}£o.E.vT*..
01AD70:  5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 12 00 19    ^#V.....^#V.....
01AD80:  5E 23 56 EB 11 07 00 19 CD 3A 05 21 78 00 65 2E    ^#V......:.!x.e.
01AD90:  01 E5 CD 8D 06 E5 2A 82 ED 5E 23 56 EB 11 12 00    ......*..^#V....
01ADA0:  19 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 07 00    .^#V.....^#V....
01ADB0:  19 CD 3A 05 21 78 00 65 2E 01 E5 CD 8D 06 D1 7D    ..:.!x.e.......}
01ADC0:  A3 6F E5 2A 82 ED 5E 23 56 EB 11 14 00 19 5E 23    £o.*..^#V.....^#
01ADD0:  56 EB 11 12 00 19 5E 23 56 EB 11 07 00 19 CD 3A    V.....^#V......:
01ADE0:  05 21 5E 00 65 2E 01 E5 CD 8D 06 E5 2A 82 ED 5E    .!^.e.......*..^
01ADF0:  23 56 EB 11 12 00 19 5E 23 56 EB 11 12 00 19 5E    #V.....^#V.....^
01AE00:  23 56 EB 11 07 00 19 CD 3A 05 21 5E 00 65 2E 01    #V......:.!^.e..
01AE10:  E5 CD 8D 06 D1 7D A3 6F E5 2A 82 ED 5E 23 56 EB    .....}£o.*..^#V.
01AE20:  11 14 00 19 5E 23 56 EB 11 12 00 19 5E 23 56 EB    ....^#V.....^#V.
01AE30:  11 12 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05 2A    ....^#V......:.*
01AE40:  82 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 12    ..^#V.....^#V...
01AE50:  00 19 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 07    ..^#V.....^#V...
01AE60:  00 19 CD 3A 05 CD 8D 06 D1 7D A3 6F D1 7D B3 6F    ...:.....}£o.}.o
01AE70:  CB 45 CA 73 54 21 78 ED E5 21 16 00 CD E5 1C 2A    .E.sT!x..!.....*
01AE80:  82 ED 5E 23 56 EB CD 3A 05 06 06 2A 78 ED CD E2    ..^#V..:...*x...
01AE90:  05 2A 78 ED 11 07 00 19 E5 2A 82 ED 5E 23 56 EB    .*x......*..^#V.
01AEA0:  11 07 00 19 CD 3A 05 06 0A CD 01 06 2A 82 ED 5E    .....:......*..^
01AEB0:  23 56 EB E5 CD 4D 05 05 6D 75 6C 74 69 06 06 CD    #V...M..multi...
01AEC0:  01 06 2A 82 ED 5E 23 56 EB 11 07 00 19 E5 21 2A    ..*..^#V......!*
01AED0:  00 65 2E 01 E5 06 0A CD 01 06 2A 78 ED 11 12 00    .e........*x....
01AEE0:  19 E5 2A 82 ED 5E 23 56 EB 11 12 00 19 5E 23 56    ..*..^#V.....^#V
01AEF0:  EB 11 14 00 19 5E 23 56 EB EB E1 73 23 72 2A 78    .....^#V...s#r*x
01AF00:  ED 11 14 00 19 E5 2A 82 ED 5E 23 56 EB 11 14 00    ......*..^#V....
01AF10:  19 5E 23 56 EB 11 14 00 19 5E 23 56 EB EB E1 73    .^#V.....^#V...s
01AF20:  23 72 2A 82 ED 5E 23 56 EB 11 14 00 19 E5 2A 78    #r*..^#V......*x
01AF30:  ED EB E1 73 23 72 2A 82 ED 5E 23 56 EB 11 12 00    ...s#r*..^#V....
01AF40:  19 E5 2A 82 ED 5E 23 56 EB 11 12 00 19 5E 23 56    ..*..^#V.....^#V
01AF50:  EB 11 12 00 19 5E 23 56 EB EB E1 73 23 72 2A 82    .....^#V...s#r*.
01AF60:  ED 5E 23 56 EB 11 14 00 19 E5 CD 56 2D 21 01 00    .^#V.......V-!..
01AF70:  22 94 F2 C3 65 57 2A 82 ED 5E 23 56 EB 11 12 00    "...eW*..^#V....
01AF80:  19 5E 23 56 EB 11 07 00 19 CD 3A 05 21 78 00 65    .^#V......:.!x.e
01AF90:  2E 01 E5 CD 8D 06 E5 2A 82 ED 5E 23 56 EB 11 12    .......*..^#V...
01AFA0:  00 19 5E 23 56 EB 11 07 00 19 CD 3A 05 21 5E 00    ..^#V......:.!^.
01AFB0:  65 2E 01 E5 CD 8D 06 E5 2A 82 ED 5E 23 56 EB 11    e.......*..^#V..
01AFC0:  12 00 19 5E 23 56 EB 11 14 00 19 5E 23 56 EB 11    ...^#V.....^#V..
01AFD0:  07 00 19 CD 3A 05 21 78 00 65 2E 01 E5 CD 8D 06    ....:.!x.e......
01AFE0:  D1 7D A3 6F D1 7D B3 6F CB 45 CA BC 55 21 78 ED    .}£o.}.o.E..U!x.
01AFF0:  E5 21 16 00 CD E5 1C CD 4D 05 05 6D 75 6C 74 69    .!......M..multi
01B000:  06 06 2A 78 ED CD E2 05 2A 78 ED 11 07 00 19 E5    ..*x....*x......
01B010:  21 2A 00 65 2E 01 E5 06 0A CD 01 06 21 76 ED E5    !*.e........!v..
01B020:  21 16 00 CD E5 1C CD 4D 05 06 6E 6F 6D 62 72 65    !......M..nombre
01B030:  06 06 2A 76 ED CD E2 05 2A 76 ED 11 07 00 19 E5    ..*v....*v......
01B040:  21 31 00 65 2E 01 E5 06 0A CD 01 06 2A 76 ED 11    !1.e........*v..
01B050:  12 00 19 E5 21 00 00 EB E1 73 23 72 2A 76 ED 11    ....!....s#r*v..
01B060:  14 00 19 E5 21 00 00 EB E1 73 23 72 2A 78 ED 11    ....!....s#r*x..
01B070:  14 00 19 E5 2A 76 ED EB E1 73 23 72 2A 78 ED 11    ....*v...s#r*x..
01B080:  12 00 19 E5 2A 82 ED 5E 23 56 EB 11 12 00 19 5E    ....*..^#V.....^
01B090:  23 56 EB EB E1 73 23 72 2A 82 ED 5E 23 56 EB 11    #V...s#r*..^#V..
01B0A0:  12 00 19 E5 2A 78 ED EB E1 73 23 72 2A 82 ED E5    ....*x...s#r*...
01B0B0:  CD 88 51 21 01 00 22 94 F2 C3 0F 57 2A 82 ED 5E    ..Q!.."....W*..^
01B0C0:  23 56 EB 11 14 00 19 5E 23 56 EB 11 07 00 19 CD    #V.....^#V......
01B0D0:  3A 05 21 78 00 65 2E 01 E5 CD 8D 06 E5 2A 82 ED    :.!x.e.......*..
01B0E0:  5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 07 00 19    ^#V.....^#V.....
01B0F0:  CD 3A 05 21 5E 00 65 2E 01 E5 CD 8D 06 E5 2A 82    .:.!^.e.......*.
01B100:  ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 14 00    .^#V.....^#V....
01B110:  19 5E 23 56 EB 11 07 00 19 CD 3A 05 21 78 00 65    .^#V......:.!x.e
01B120:  2E 01 E5 CD 8D 06 D1 7D A3 6F D1 7D B3 6F CB 45    .......}£o.}.o.E
01B130:  CA 02 57 21 78 ED E5 21 16 00 CD E5 1C CD 4D 05    ..W!x..!......M.
01B140:  05 6D 75 6C 74 69 06 06 2A 78 ED CD E2 05 2A 78    .multi..*x....*x
01B150:  ED 11 07 00 19 E5 21 2A 00 65 2E 01 E5 06 0A CD    ......!*.e......
01B160:  01 06 21 76 ED E5 21 16 00 CD E5 1C CD 4D 05 06    ..!v..!......M..
01B170:  6E 6F 6D 62 72 65 06 06 2A 76 ED CD E2 05 2A 76    nombre..*v....*v
01B180:  ED 11 07 00 19 E5 21 31 00 65 2E 01 E5 06 0A CD    ......!1.e......
01B190:  01 06 2A 76 ED 11 12 00 19 E5 21 00 00 EB E1 73    ..*v......!....s
01B1A0:  23 72 2A 76 ED 11 14 00 19 E5 21 00 00 EB E1 73    #r*v......!....s
01B1B0:  23 72 2A 78 ED 11 14 00 19 E5 2A 76 ED EB E1 73    #r*x......*v...s
01B1C0:  23 72 2A 78 ED 11 12 00 19 E5 2A 82 ED 5E 23 56    #r*x......*..^#V
01B1D0:  EB 11 14 00 19 5E 23 56 EB EB E1 73 23 72 2A 82    .....^#V...s#r*.
01B1E0:  ED 5E 23 56 EB 11 14 00 19 E5 2A 78 ED EB E1 73    .^#V......*x...s
01B1F0:  23 72 2A 82 ED E5 CD 88 51 21 01 00 22 94 F2 C3    #r*.....Q!.."...
01B200:  0F 57 2A 82 ED E5 CD 56 2D 21 01 00 22 94 F2 2A    .W*....V-!.."..*
01B210:  82 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB E5 21    ..^#V.....^#V..!
01B220:  00 00 D1 CD 92 06 CB 45 CA 3A 57 2A 82 ED 5E 23    .......E.:W*..^#
01B230:  56 EB 11 12 00 19 E5 CD 88 51 2A 82 ED 5E 23 56    V........Q*..^#V
01B240:  EB 11 14 00 19 5E 23 56 EB E5 21 00 00 D1 CD 92    .....^#V..!.....
01B250:  06 CB 45 CA 65 57 2A 82 ED 5E 23 56 EB 11 14 00    ..E.eW*..^#V....
01B260:  19 E5 CD 88 51 C3 BE 57 2A 82 ED 5E 23 56 EB 11    ....Q..W*..^#V..
01B270:  12 00 19 5E 23 56 EB E5 21 00 00 D1 CD 92 06 CB    ...^#V..!.......
01B280:  45 CA 93 57 2A 82 ED 5E 23 56 EB 11 12 00 19 E5    E..W*..^#V......
01B290:  CD 88 51 2A 82 ED 5E 23 56 EB 11 14 00 19 5E 23    ..Q*..^#V.....^#
01B2A0:  56 EB E5 21 00 00 D1 CD 92 06 CB 45 CA BE 57 2A    V..!.......E..W*
01B2B0:  82 ED 5E 23 56 EB 11 14 00 19 E5 CD 88 51 01 0E    ..^#V........Q..
01B2C0:  00 11 76 ED C3 22 05 01 0E 00 21 68 ED CD 08 05    ..v.."....!h....
01B2D0:  FD E1 E1 22 74 ED FD E5 2A 74 ED 5E 23 56 EB 11    ..."t...*t.^#V..
01B2E0:  07 00 19 CD 3A 05 21 2A 00 65 2E 01 E5 CD 8D 06    ....:.!*.e......
01B2F0:  CB 45 CA 0B 61 2A 74 ED 5E 23 56 EB 11 12 00 19    .E..a*t.^#V.....
01B300:  E5 CD 96 4C 2A 74 ED 5E 23 56 EB 11 14 00 19 E5    ...L*t.^#V......
01B310:  CD 96 4C 2A 74 ED E5 CD 96 4C 2A 74 ED 5E 23 56    ..L*t....L*t.^#V
01B320:  EB 11 12 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05    .....^#V......:.
01B330:  21 2A 00 65 2E 01 E5 CD 8D 06 E5 2A 74 ED 5E 23    !*.e.......*t.^#
01B340:  56 EB 11 14 00 19 5E 23 56 EB CD 3A 05 CD 4D 05    V.....^#V..:..M.
01B350:  06 6E 6F 6D 62 72 65 CD 8D 06 D1 7D A3 6F E5 2A    .nombre....}£o.*
01B360:  74 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 14    t.^#V.....^#V...
01B370:  00 19 5E 23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D    ..^#V..:..M..nom
01B380:  62 72 65 CD 8D 06 D1 7D A3 6F CB 45 CA 52 59 21    bre....}£o.E.RY!
01B390:  68 ED E5 21 16 00 CD E5 1C 2A 68 ED 11 12 00 19    h..!.....*h.....
01B3A0:  E5 2A 74 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB    .*t.^#V.....^#V.
01B3B0:  EB E1 73 23 72 2A 68 ED 11 14 00 19 E5 2A 74 ED    ..s#r*h......*t.
01B3C0:  5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 14 00 19    ^#V.....^#V.....
01B3D0:  5E 23 56 EB EB E1 73 23 72 CD 4D 05 05 6D 75 6C    ^#V...s#r.M..mul
01B3E0:  74 69 06 06 2A 68 ED CD E2 05 2A 68 ED 11 07 00    ti..*h....*h....
01B3F0:  19 E5 21 2A 00 65 2E 01 E5 06 0A CD 01 06 2A 74    ..!*.e........*t
01B400:  ED 5E 23 56 EB 11 12 00 19 E5 2A 74 ED 5E 23 56    .^#V......*t.^#V
01B410:  EB 11 12 00 19 5E 23 56 EB 11 12 00 19 5E 23 56    .....^#V.....^#V
01B420:  EB EB E1 73 23 72 2A 74 ED 5E 23 56 EB 11 14 00    ...s#r*t.^#V....
01B430:  19 E5 2A 68 ED EB E1 73 23 72 2A 74 ED 5E 23 56    ..*h...s#r*t.^#V
01B440:  EB 11 14 00 19 E5 CD 56 2D 21 01 00 22 94 F2 C3    .......V-!.."...
01B450:  08 61 2A 74 ED 5E 23 56 EB 11 14 00 19 5E 23 56    .a*t.^#V.....^#V
01B460:  EB 11 07 00 19 CD 3A 05 21 2A 00 65 2E 01 E5 CD    ......:.!*.e....
01B470:  8D 06 E5 2A 74 ED 5E 23 56 EB 11 14 00 19 5E 23    ...*t.^#V.....^#
01B480:  56 EB 11 14 00 19 5E 23 56 EB CD 3A 05 CD 4D 05    V.....^#V..:..M.
01B490:  06 6E 6F 6D 62 72 65 CD 8D 06 D1 7D A3 6F E5 2A    .nombre....}£o.*
01B4A0:  74 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB CD 3A    t.^#V.....^#V..:
01B4B0:  05 CD 4D 05 06 6E 6F 6D 62 72 65 CD 8D 06 D1 7D    ..M..nombre....}
01B4C0:  A3 6F CB 45 CA 8A 5A 21 68 ED E5 21 16 00 CD E5    £o.E..Z!h..!....
01B4D0:  1C 2A 68 ED 11 14 00 19 E5 2A 74 ED 5E 23 56 EB    .*h......*t.^#V.
01B4E0:  11 14 00 19 5E 23 56 EB 11 14 00 19 5E 23 56 EB    ....^#V.....^#V.
01B4F0:  EB E1 73 23 72 2A 68 ED 11 12 00 19 E5 2A 74 ED    ..s#r*h......*t.
01B500:  5E 23 56 EB 11 12 00 19 5E 23 56 EB EB E1 73 23    ^#V.....^#V...s#
01B510:  72 CD 4D 05 05 6D 75 6C 74 69 06 06 2A 68 ED CD    r.M..multi..*h..
01B520:  E2 05 2A 68 ED 11 07 00 19 E5 21 2A 00 65 2E 01    ..*h......!*.e..
01B530:  E5 06 0A CD 01 06 2A 74 ED 5E 23 56 EB 11 12 00    ......*t.^#V....
01B540:  19 E5 2A 74 ED 5E 23 56 EB 11 14 00 19 5E 23 56    ..*t.^#V.....^#V
01B550:  EB 11 12 00 19 5E 23 56 EB EB E1 73 23 72 2A 74    .....^#V...s#r*t
01B560:  ED 5E 23 56 EB 11 14 00 19 E5 2A 68 ED EB E1 73    .^#V......*h...s
01B570:  23 72 2A 74 ED 5E 23 56 EB 11 14 00 19 E5 CD 56    #r*t.^#V.......V
01B580:  2D 21 01 00 22 94 F2 C3 08 61 2A 74 ED 5E 23 56    -!.."....a*t.^#V
01B590:  EB 11 12 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05    .....^#V......:.
01B5A0:  21 2A 00 65 2E 01 E5 CD 8D 06 E5 2A 74 ED 5E 23    !*.e.......*t.^#
01B5B0:  56 EB 11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A    V.....^#V......:
01B5C0:  05 21 2A 00 65 2E 01 E5 CD 8D 06 D1 7D A3 6F E5    .!*.e.......}£o.
01B5D0:  2A 74 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB 11    *t.^#V.....^#V..
01B5E0:  14 00 19 5E 23 56 EB CD 3A 05 CD 4D 05 06 6E 6F    ...^#V..:..M..no
01B5F0:  6D 62 72 65 CD 8D 06 D1 7D A3 6F E5 2A 74 ED 5E    mbre....}£o.*t.^
01B600:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
01B610:  17 00 00 00 02 09 4E E5 17 00 41 02 00 00 00 02    ......N...A.....
01B620:  17 00 42 02 00 00 00 02 17 00 43 02 00 00 00 02    ..B.......C.....
01B630:  17 00 44 02 00 00 00 02 17 00 45 02 00 00 00 02    ..D.......E.....
01B640:  17 00 46 02 00 00 00 02 17 00 47 02 00 00 00 02    ..F.......G.....
01B650:  17 00 48 02 00 00 00 02 17 00 49 02 00 00 00 02    ..H.......I.....
01B660:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B670:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B680:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B690:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B6A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B6B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B6C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B6D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B6E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B6F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B700:  23 56 EB 11 12 00 19 5E 23 56 EB 11 14 00 19 5E    #V.....^#V.....^
01B710:  23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62 72 65    #V..:..M..nombre
01B720:  CD 8D 06 D1 7D A3 6F CB 45 CA 5A 5C 21 6A ED E5    ....}£o.E.Z\!j..
01B730:  21 16 00 CD E5 1C CD 4D 05 05 6D 75 6C 74 69 06    !......M..multi.
01B740:  06 2A 6A ED CD E2 05 2A 6A ED 11 07 00 19 E5 21    .*j....*j......!
01B750:  2A 00 65 2E 01 E5 06 0A CD 01 06 2A 6A ED 11 14    *.e........*j...
01B760:  00 19 E5 2A 74 ED 5E 23 56 EB 11 14 00 19 5E 23    ...*t.^#V.....^#
01B770:  56 EB 11 14 00 19 5E 23 56 EB EB E1 73 23 72 2A    V.....^#V...s#r*
01B780:  6A ED 11 12 00 19 E5 2A 74 ED 5E 23 56 EB 11 12    j......*t.^#V...
01B790:  00 19 5E 23 56 EB 11 14 00 19 5E 23 56 EB EB E1    ..^#V.....^#V...
01B7A0:  73 23 72 21 68 ED E5 21 16 00 CD E5 1C CD 4D 05    s#r!h..!......M.
01B7B0:  05 6D 75 6C 74 69 06 06 2A 68 ED CD E2 05 2A 68    .multi..*h....*h
01B7C0:  ED 11 07 00 19 E5 21 2A 00 65 2E 01 E5 06 0A CD    ......!*.e......
01B7D0:  01 06 2A 68 ED 11 14 00 19 E5 2A 74 ED 5E 23 56    ..*h......*t.^#V
01B7E0:  EB 11 14 00 19 5E 23 56 EB 11 12 00 19 5E 23 56    .....^#V.....^#V
01B7F0:  EB EB E1 73 23 72 2A 68 ED 11 12 00 19 E5 2A 74    ...s#r*h......*t
01B800:  ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 12 00    .^#V.....^#V....
01B810:  19 5E 23 56 EB EB E1 73 23 72 2A 74 ED 5E 23 56    .^#V...s#r*t.^#V
01B820:  EB 11 14 00 19 E5 2A 6A ED EB E1 73 23 72 2A 74    ......*j...s#r*t
01B830:  ED 5E 23 56 EB 11 12 00 19 E5 2A 68 ED EB E1 73    .^#V......*h...s
01B840:  23 72 2A 74 ED 5E 23 56 EB 11 14 00 19 E5 CD 56    #r*t.^#V.......V
01B850:  2D 21 01 00 22 94 F2 C3 08 61 2A 74 ED 5E 23 56    -!.."....a*t.^#V
01B860:  EB 11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05    .....^#V......:.
01B870:  21 78 00 65 2E 01 E5 CD 8D 06 E5 2A 74 ED 5E 23    !x.e.......*t.^#
01B880:  56 EB 11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A    V.....^#V......:
01B890:  05 21 5E 00 65 2E 01 E5 CD 8D 06 E5 2A 74 ED 5E    .!^.e.......*t.^
01B8A0:  23 56 EB 11 14 00 19 5E 23 56 EB 11 14 00 19 5E    #V.....^#V.....^
01B8B0:  23 56 EB 11 07 00 19 CD 3A 05 21 78 00 65 2E 01    #V......:.!x.e..
01B8C0:  E5 CD 8D 06 D1 7D A3 6F D1 7D B3 6F E5 2A 74 ED    .....}£o.}.o.*t.
01B8D0:  5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 07 00 19    ^#V.....^#V.....
01B8E0:  CD 3A 05 21 78 00 65 2E 01 E5 CD 8D 06 E5 2A 74    .:.!x.e.......*t
01B8F0:  ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 07 00    .^#V.....^#V....
01B900:  19 CD 3A 05 21 5E 00 65 2E 01 E5 CD 8D 06 E5 2A    ..:.!^.e.......*
01B910:  74 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 14    t.^#V.....^#V...
01B920:  00 19 5E 23 56 EB 11 07 00 19 CD 3A 05 21 78 00    ..^#V......:.!x.
01B930:  65 2E 01 E5 CD 8D 06 D1 7D A3 6F D1 7D B3 6F D1    e.......}£o.}.o.
01B940:  7D A3 6F CB 45 CA 70 5F 2A 74 ED 5E 23 56 EB E5    }£o.E.p_*t.^#V..
01B950:  CD 4D 05 05 70 75 69 73 73 06 06 CD 01 06 2A 74    .M..puiss.....*t
01B960:  ED 5E 23 56 EB 11 07 00 19 E5 21 5E 00 65 2E 01    .^#V......!^.e..
01B970:  E5 06 0A CD 01 06 21 6A ED E5 21 16 00 CD E5 1C    ......!j..!.....
01B980:  CD 4D 05 04 70 6C 75 73 06 06 2A 6A ED CD E2 05    .M..plus..*j....
01B990:  2A 6A ED 11 07 00 19 E5 21 2B 00 65 2E 01 E5 06    *j......!+.e....
01B9A0:  0A CD 01 06 2A 74 ED 5E 23 56 EB 11 14 00 19 5E    ....*t.^#V.....^
01B9B0:  23 56 EB 11 07 00 19 CD 3A 05 21 78 00 65 2E 01    #V......:.!x.e..
01B9C0:  E5 CD 8D 06 CB 45 CA 2C 5E 21 68 ED E5 21 16 00    .....E.,^!h..!..
01B9D0:  CD E5 1C CD 4D 05 06 6E 6F 6D 62 72 65 06 06 2A    ....M..nombre..*
01B9E0:  68 ED CD E2 05 2A 68 ED 11 07 00 19 E5 21 31 00    h....*h......!1.
01B9F0:  65 2E 01 E5 06 0A CD 01 06 2A 68 ED 11 12 00 19    e........*h.....
01BA00:  E5 21 00 00 EB E1 73 23 72 2A 68 ED 11 14 00 19    .!....s#r*h.....
01BA10:  E5 21 00 00 EB E1 73 23 72 2A 6A ED 11 14 00 19    .!....s#r*j.....
01BA20:  E5 2A 68 ED EB E1 73 23 72 C3 50 5E 2A 6A ED 11    .*h...s#r.P^*j..
01BA30:  14 00 19 E5 2A 74 ED 5E 23 56 EB 11 14 00 19 5E    ....*t.^#V.....^
01BA40:  23 56 EB 11 12 00 19 5E 23 56 EB EB E1 73 23 72    #V.....^#V...s#r
01BA50:  2A 74 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11    *t.^#V.....^#V..
01BA60:  07 00 19 CD 3A 05 21 78 00 65 2E 01 E5 CD 8D 06    ....:.!x.e......
01BA70:  CB 45 CA F8 5E 21 68 ED E5 21 16 00 CD E5 1C CD    .E..^!h..!......
01BA80:  4D 05 06 6E 6F 6D 62 72 65 06 06 2A 68 ED CD E2    M..nombre..*h...
01BA90:  05 2A 68 ED 11 07 00 19 E5 21 31 00 65 2E 01 E5    .*h......!1.e...
01BAA0:  06 0A CD 01 06 2A 68 ED 11 14 00 19 E5 21 00 00    .....*h......!..
01BAB0:  EB E1 73 23 72 2A 68 ED 11 12 00 19 E5 21 00 00    ..s#r*h......!..
01BAC0:  EB E1 73 23 72 2A 6A ED 11 12 00 19 E5 2A 68 ED    ..s#r*j......*h.
01BAD0:  EB E1 73 23 72 2A 74 ED 5E 23 56 EB 11 14 00 19    ..s#r*t.^#V.....
01BAE0:  E5 2A 74 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB    .*t.^#V.....^#V.
01BAF0:  EB E1 73 23 72 C3 44 5F 2A 6A ED 11 12 00 19 E5    ..s#r.D_*j......
01BB00:  2A 74 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11    *t.^#V.....^#V..
01BB10:  12 00 19 5E 23 56 EB EB E1 73 23 72 2A 74 ED 5E    ...^#V...s#r*t.^
01BB20:  23 56 EB 11 14 00 19 E5 2A 74 ED 5E 23 56 EB 11    #V......*t.^#V..
01BB30:  12 00 19 5E 23 56 EB 11 14 00 19 5E 23 56 EB EB    ...^#V.....^#V..
01BB40:  E1 73 23 72 2A 74 ED 5E 23 56 EB 11 12 00 19 E5    .s#r*t.^#V......
01BB50:  2A 6A ED EB E1 73 23 72 2A 74 ED 5E 23 56 EB 11    *j...s#r*t.^#V..
01BB60:  12 00 19 E5 CD 56 2D 21 01 00 22 94 F2 C3 08 61    .....V-!.."....a
01BB70:  2A 74 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB 11    *t.^#V.....^#V..
01BB80:  07 00 19 CD 3A 05 21 2A 00 65 2E 01 E5 CD 8D 06    ....:.!*.e......
01BB90:  E5 2A 74 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB    .*t.^#V.....^#V.
01BBA0:  11 07 00 19 CD 3A 05 21 78 00 65 2E 01 E5 CD 8D    .....:.!x.e.....
01BBB0:  06 E5 2A 74 ED 5E 23 56 EB 11 12 00 19 5E 23 56    ..*t.^#V.....^#V
01BBC0:  EB 11 07 00 19 CD 3A 05 21 5E 00 65 2E 01 E5 CD    ......:.!^.e....
01BBD0:  8D 06 D1 7D B3 6F D1 7D A3 6F CB 45 CA B2 60 2A    ...}.o.}£o.E..`*
01BBE0:  74 ED 5E 23 56 EB 11 14 00 19 E5 CD 96 4C 21 6A    t.^#V........L!j
01BBF0:  ED E5 21 16 00 CD E5 1C CD 4D 05 05 6D 75 6C 74    ..!......M..mult
01BC00:  69 06 06 2A 6A ED CD E2 05 2A 6A ED 11 07 00 19    i..*j....*j.....
01BC10:  E5 21 2A 00 65 2E 01 E5 06 0A CD 01 06 2A 6A ED    .!*.e........*j.
01BC20:  11 12 00 19 E5 2A 74 ED 5E 23 56 EB 11 12 00 19    .....*t.^#V.....
01BC30:  5E 23 56 EB EB E1 73 23 72 2A 6A ED 11 14 00 19    ^#V...s#r*j.....
01BC40:  E5 2A 74 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB    .*t.^#V.....^#V.
01BC50:  11 12 00 19 5E 23 56 EB EB E1 73 23 72 2A 74 ED    ....^#V...s#r*t.
01BC60:  5E 23 56 EB 11 12 00 19 E5 2A 6A ED EB E1 73 23    ^#V......*j...s#
01BC70:  72 2A 74 ED 5E 23 56 EB 11 14 00 19 E5 2A 74 ED    r*t.^#V......*t.
01BC80:  5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 14 00 19    ^#V.....^#V.....
01BC90:  5E 23 56 EB EB E1 73 23 72 2A 74 ED 5E 23 56 EB    ^#V...s#r*t.^#V.
01BCA0:  11 12 00 19 E5 CD C7 57 2A 74 ED E5 CD 96 4C C3    .......W*t....L.
01BCB0:  08 61 2A 74 ED 5E 23 56 EB 11 14 00 19 5E 23 56    .a*t.^#V.....^#V
01BCC0:  EB E5 21 00 00 D1 CD 92 06 CB 45 CA DD 60 2A 74    ..!.......E..`*t
01BCD0:  ED 5E 23 56 EB 11 14 00 19 E5 CD C7 57 2A 74 ED    .^#V........W*t.
01BCE0:  5E 23 56 EB 11 12 00 19 5E 23 56 EB E5 21 00 00    ^#V.....^#V..!..
01BCF0:  D1 CD 92 06 CB 45 CA 08 61 2A 74 ED 5E 23 56 EB    .....E..a*t.^#V.
01BD00:  11 12 00 19 E5 CD C7 57 C3 61 61 2A 74 ED 5E 23    .......W.aa*t.^#
01BD10:  56 EB 11 14 00 19 5E 23 56 EB E5 21 00 00 D1 CD    V.....^#V..!....
01BD20:  92 06 CB 45 CA 36 61 2A 74 ED 5E 23 56 EB 11 14    ...E.6a*t.^#V...
01BD30:  00 19 E5 CD C7 57 2A 74 ED 5E 23 56 EB 11 12 00    .....W*t.^#V....
01BD40:  19 5E 23 56 EB E5 21 00 00 D1 CD 92 06 CB 45 CA    .^#V..!.......E.
01BD50:  61 61 2A 74 ED 5E 23 56 EB 11 12 00 19 E5 CD C7    aa*t.^#V........
01BD60:  57 01 0E 00 11 68 ED C3 22 05 01 0C 00 21 5C ED    W....h.."....!\.
01BD70:  CD 08 05 FD E1 E1 22 66 ED FD E5 2A 66 ED 5E 23    ......"f...*f.^#
01BD80:  56 EB 11 07 00 19 CD 3A 05 21 2B 00 65 2E 01 E5    V......:.!+.e...
01BD90:  CD 8D 06 E5 2A 66 ED 5E 23 56 EB 11 07 00 19 CD    ....*f.^#V......
01BDA0:  3A 05 21 2D 00 65 2E 01 E5 CD 8D 06 D1 7D B3 6F    :.!-.e.......}.o
01BDB0:  CB 45 CA 16 6B 2A 66 ED 5E 23 56 EB 11 07 00 19    .E..k*f.^#V.....
01BDC0:  CD 3A 05 21 2D 00 65 2E 01 E5 CD 8D 06 CB 45 CA    .:.!-.e.......E.
01BDD0:  1F 62 2A 66 ED 5E 23 56 EB E5 CD 4D 05 04 70 6C    .b*f.^#V...M..pl
01BDE0:  75 73 06 06 CD 01 06 2A 66 ED 5E 23 56 EB 11 07    us.....*f.^#V...
01BDF0:  00 19 E5 21 2B 00 65 2E 01 E5 06 0A CD 01 06 2A    ...!+.e........*
01BE00:  66 ED 5E 23 56 EB 11 12 00 19 E5 2A 66 ED 5E 23    f.^#V......*f.^#
01BE10:  56 EB 11 12 00 19 E5 CD 50 2D EB E1 73 23 72 2A    V.......P-..s#r*
01BE20:  66 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 07    f.^#V.....^#V...
01BE30:  00 19 CD 3A 05 21 2B 00 65 2E 01 E5 CD 8D 06 E5    ...:.!+.e.......
01BE40:  2A 66 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB 11    *f.^#V.....^#V..
01BE50:  07 00 19 CD 3A 05 21 2D 00 65 2E 01 E5 CD 8D 06    ....:.!-.e......
01BE60:  D1 7D B3 6F E5 2A 66 ED 5E 23 56 EB 11 12 00 19    .}.o.*f.^#V.....
01BE70:  5E 23 56 EB 11 07 00 19 CD 3A 05 21 2B 00 65 2E    ^#V......:.!+.e.
01BE80:  01 E5 CD 8D 06 E5 2A 66 ED 5E 23 56 EB 11 12 00    ......*f.^#V....
01BE90:  19 5E 23 56 EB 11 07 00 19 CD 3A 05 21 2D 00 65    .^#V......:.!-.e
01BEA0:  2E 01 E5 CD 8D 06 D1 7D B3 6F D1 7D A3 6F CB 45    .......}.o.}£o.E
01BEB0:  CA D4 65 2A 66 ED 5E 23 56 EB 11 12 00 19 E5 CD    ..e*f.^#V.......
01BEC0:  96 4C 2A 66 ED 5E 23 56 EB 11 14 00 19 E5 CD 96    .L*f.^#V........
01BED0:  4C 2A 66 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB    L*f.^#V.....^#V.
01BEE0:  11 12 00 19 5E 23 56 EB E5 CD 99 4C E5 21 00 00    ....^#V....L.!..
01BEF0:  D1 CD A5 06 E5 2A 66 ED 5E 23 56 EB 11 14 00 19    .....*f.^#V.....
01BF00:  5E 23 56 EB 11 12 00 19 5E 23 56 EB E5 CD 99 4C    ^#V.....^#V....L
01BF10:  E5 2A 66 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB    .*f.^#V.....^#V.
01BF20:  11 14 00 19 5E 23 56 EB E5 CD 99 4C D1 CD E0 06    ....^#V....L....
01BF30:  D1 7D A3 6F CB 45 CA D1 65 2A 66 ED 5E 23 56 EB    .}£o.E..e*f.^#V.
01BF40:  11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05 21    ....^#V......:.!
01BF50:  2D 00 65 2E 01 E5 CD 8D 06 CB 45 CA CB 63 2A 66    -.e.......E..c*f
01BF60:  ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB E5 CD 4D    .^#V.....^#V...M
01BF70:  05 04 70 6C 75 73 06 06 CD 01 06 2A 66 ED 5E 23    ..plus.....*f.^#
01BF80:  56 EB 11 14 00 19 5E 23 56 EB 11 07 00 19 E5 21    V.....^#V......!
01BF90:  2B 00 65 2E 01 E5 06 0A CD 01 06 2A 66 ED 5E 23    +.e........*f.^#
01BFA0:  56 EB 11 14 00 19 5E 23 56 EB 11 12 00 19 E5 2A    V.....^#V......*
01BFB0:  66 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 12    f.^#V.....^#V...
01BFC0:  00 19 E5 CD 50 2D EB E1 73 23 72 2A 66 ED 5E 23    ....P-..s#r*f.^#
01BFD0:  56 EB 11 12 00 19 5E 23 56 EB 11 07 00 19 CD 3A    V.....^#V......:
01BFE0:  05 21 2D 00 65 2E 01 E5 CD 8D 06 CB 45 CA 5D 64    .!-.e.......E.]d
01BFF0:  2A 66 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB E5    *f.^#V.....^#V..
01C000:  CD 4D 05 04 70 6C 75 73 06 06 CD 01 06 2A 66 ED    .M..plus.....*f.
01C010:  5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 07 00 19    ^#V.....^#V.....
01C020:  E5 21 2B 00 65 2E 01 E5 06 0A CD 01 06 2A 66 ED    .!+.e........*f.
01C030:  5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 12 00 19    ^#V.....^#V.....
01C040:  E5 2A 66 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB    .*f.^#V.....^#V.
01C050:  11 12 00 19 E5 CD 50 2D EB E1 73 23 72 21 5C ED    ......P-..s#r!\.
01C060:  E5 21 16 00 CD E5 1C CD 4D 05 04 70 6C 75 73 06    .!......M..plus.
01C070:  06 2A 5C ED CD E2 05 2A 5C ED 11 07 00 19 E5 21    .*\....*\......!
01C080:  2B 00 65 2E 01 E5 06 0A CD 01 06 2A 5C ED 11 12    +.e........*\...
01C090:  00 19 E5 21 16 00 CD E5 1C 2A 5C ED 11 12 00 19    ...!.....*\.....
01C0A0:  5E 23 56 EB E5 CD 4D 05 04 70 6C 75 73 06 06 CD    ^#V...M..plus...
01C0B0:  01 06 2A 5C ED 11 12 00 19 5E 23 56 EB 11 07 00    ..*\.....^#V....
01C0C0:  19 E5 21 2B 00 65 2E 01 E5 06 0A CD 01 06 2A 5C    ..!+.e........*\
01C0D0:  ED 11 12 00 19 5E 23 56 EB 11 12 00 19 E5 2A 66    .....^#V......*f
01C0E0:  ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 12 00    .^#V.....^#V....
01C0F0:  19 5E 23 56 EB EB E1 73 23 72 2A 5C ED 11 12 00    .^#V...s#r*\....
01C100:  19 5E 23 56 EB 11 14 00 19 E5 2A 66 ED 5E 23 56    .^#V......*f.^#V
01C110:  EB 11 14 00 19 5E 23 56 EB 11 12 00 19 5E 23 56    .....^#V.....^#V
01C120:  EB EB E1 73 23 72 2A 5C ED 11 14 00 19 E5 21 16    ...s#r*\......!.
01C130:  00 CD E5 1C 2A 5C ED 11 14 00 19 5E 23 56 EB 11    ....*\.....^#V..
01C140:  07 00 19 E5 21 2B 00 65 2E 01 E5 06 0A CD 01 06    ....!+.e........
01C150:  2A 5C ED 11 14 00 19 5E 23 56 EB E5 CD 4D 05 04    *\.....^#V...M..
01C160:  70 6C 75 73 06 06 CD 01 06 2A 5C ED 11 14 00 19    plus.....*\.....
01C170:  5E 23 56 EB 11 14 00 19 E5 2A 66 ED 5E 23 56 EB    ^#V......*f.^#V.
01C180:  11 14 00 19 5E 23 56 EB 11 14 00 19 5E 23 56 EB    ....^#V.....^#V.
01C190:  EB E1 73 23 72 2A 5C ED 11 14 00 19 5E 23 56 EB    ..s#r*\.....^#V.
01C1A0:  11 12 00 19 E5 2A 66 ED 5E 23 56 EB 11 12 00 19    .....*f.^#V.....
01C1B0:  5E 23 56 EB 11 14 00 19 5E 23 56 EB EB E1 73 23    ^#V.....^#V...s#
01C1C0:  72 2A 66 ED 5E 23 56 EB 22 5C ED 21 01 00 22 94    r*f.^#V."\.!..".
01C1D0:  F2 C3 13 6B 2A 66 ED 5E 23 56 EB 11 07 00 19 CD    ...k*f.^#V......
01C1E0:  3A 05 21 2B 00 65 2E 01 E5 CD 8D 06 E5 2A 66 ED    :.!+.e.......*f.
01C1F0:  5E 23 56 EB 11 07 00 19 CD 3A 05 21 2D 00 65 2E    ^#V......:.!-.e.
01C200:  01 E5 CD 8D 06 D1 7D B3 6F E5 2A 66 ED 5E 23 56    ......}.o.*f.^#V
01C210:  EB 11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05    .....^#V......:.
01C220:  21 2B 00 65 2E 01 E5 CD 8D 06 E5 2A 66 ED 5E 23    !+.e.......*f.^#
01C230:  56 EB 11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A    V.....^#V......:
01C240:  05 21 2D 00 65 2E 01 E5 CD 8D 06 D1 7D B3 6F D1    .!-.e.......}.o.
01C250:  7D A3 6F CB 45 CA 0C 68 2A 66 ED 5E 23 56 EB 11    }£o.E..h*f.^#V..
01C260:  14 00 19 E5 CD 96 4C 2A 66 ED 5E 23 56 EB 11 14    ......L*f.^#V...
01C270:  00 19 5E 23 56 EB 11 12 00 19 5E 23 56 EB E5 CD    ..^#V.....^#V...
01C280:  99 4C E5 21 00 00 D1 CD A5 06 E5 2A 66 ED 5E 23    .L.!.......*f.^#
01C290:  56 EB 11 14 00 19 5E 23 56 EB 11 12 00 19 5E 23    V.....^#V.....^#
01C2A0:  56 EB E5 CD 99 4C E5 2A 66 ED 5E 23 56 EB 11 12    V....L.*f.^#V...
01C2B0:  00 19 5E 23 56 EB E5 CD 99 4C D1 CD E0 06 D1 7D    ..^#V....L.....}
01C2C0:  A3 6F CB 45 CA 09 68 2A 66 ED 5E 23 56 EB 11 14    £o.E..h*f.^#V...
01C2D0:  00 19 5E 23 56 EB 11 07 00 19 CD 3A 05 21 2D 00    ..^#V......:.!-.
01C2E0:  65 2E 01 E5 CD 8D 06 CB 45 CA 59 67 2A 66 ED 5E    e.......E.Yg*f.^
01C2F0:  23 56 EB 11 14 00 19 5E 23 56 EB E5 CD 4D 05 04    #V.....^#V...M..
01C300:  70 6C 75 73 06 06 CD 01 06 2A 66 ED 5E 23 56 EB    plus.....*f.^#V.
01C310:  11 14 00 19 5E 23 56 EB 11 07 00 19 E5 21 2B 00    ....^#V......!+.
01C320:  65 2E 01 E5 06 0A CD 01 06 2A 66 ED 5E 23 56 EB    e........*f.^#V.
01C330:  11 14 00 19 5E 23 56 EB 11 12 00 19 E5 2A 66 ED    ....^#V......*f.
01C340:  5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 12 00 19    ^#V.....^#V.....
01C350:  E5 CD 50 2D EB E1 73 23 72 21 5C ED E5 21 16 00    ..P-..s#r!\..!..
01C360:  CD E5 1C CD 4D 05 04 70 6C 75 73 06 06 2A 5C ED    ....M..plus..*\.
01C370:  CD E2 05 2A 5C ED 11 07 00 19 E5 21 2B 00 65 2E    ...*\......!+.e.
01C380:  01 E5 06 0A CD 01 06 2A 5C ED 11 14 00 19 E5 2A    .......*\......*
01C390:  66 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 14    f.^#V.....^#V...
01C3A0:  00 19 5E 23 56 EB EB E1 73 23 72 2A 5C ED 11 12    ..^#V...s#r*\...
01C3B0:  00 19 E5 2A 66 ED 5E 23 56 EB 11 12 00 19 5E 23    ...*f.^#V.....^#
01C3C0:  56 EB EB E1 73 23 72 2A 66 ED 5E 23 56 EB 11 12    V...s#r*f.^#V...
01C3D0:  00 19 E5 2A 66 ED 5E 23 56 EB 11 14 00 19 5E 23    ...*f.^#V.....^#
01C3E0:  56 EB 11 12 00 19 5E 23 56 EB EB E1 73 23 72 2A    V.....^#V...s#r*
01C3F0:  66 ED 5E 23 56 EB 11 14 00 19 E5 2A 5C ED EB E1    f.^#V......*\...
01C400:  73 23 72 21 01 00 22 94 F2 C3 13 6B 2A 66 ED 5E    s#r!.."....k*f.^
01C410:  23 56 EB 11 07 00 19 CD 3A 05 21 2B 00 65 2E 01    #V......:.!+.e..
01C420:  E5 CD 8D 06 E5 2A 66 ED 5E 23 56 EB 11 07 00 19    .....*f.^#V.....
01C430:  CD 3A 05 21 2D 00 65 2E 01 E5 CD 8D 06 D1 7D B3    .:.!-.e.......}.
01C440:  6F E5 2A 66 ED 5E 23 56 EB 11 12 00 19 5E 23 56    o.*f.^#V.....^#V
01C450:  EB 11 07 00 19 CD 3A 05 21 2B 00 65 2E 01 E5 CD    ......:.!+.e....
01C460:  8D 06 E5 2A 66 ED 5E 23 56 EB 11 12 00 19 5E 23    ...*f.^#V.....^#
01C470:  56 EB 11 07 00 19 CD 3A 05 21 2D 00 65 2E 01 E5    V......:.!-.e...
01C480:  CD 8D 06 D1 7D B3 6F D1 7D A3 6F CB 45 CA 3D 6A    ....}.o.}£o.E.=j
01C490:  2A 66 ED 5E 23 56 EB 11 12 00 19 E5 CD 96 4C 2A    *f.^#V........L*
01C4A0:  66 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB E5 CD    f.^#V.....^#V...
01C4B0:  99 4C E5 21 00 00 D1 CD A5 06 E5 2A 66 ED 5E 23    .L.!.......*f.^#
01C4C0:  56 EB 11 14 00 19 5E 23 56 EB E5 CD 99 4C E5 2A    V.....^#V....L.*
01C4D0:  66 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 14    f.^#V.....^#V...
01C4E0:  00 19 5E 23 56 EB E5 CD 99 4C D1 CD E0 06 D1 7D    ..^#V....L.....}
01C4F0:  A3 6F CB 45 CA 3A 6A 2A 66 ED 5E 23 56 EB 11 12    £o.E.:j*f.^#V...
01C500:  00 19 5E 23 56 EB 11 07 00 19 CD 3A 05 21 2D 00    ..^#V......:.!-.
01C510:  65 2E 01 E5 CD 8D 06 CB 45 CA 89 69 2A 66 ED 5E    e.......E..i*f.^
01C520:  23 56 EB 11 12 00 19 5E 23 56 EB E5 CD 4D 05 04    #V.....^#V...M..
01C530:  70 6C 75 73 06 06 CD 01 06 2A 66 ED 5E 23 56 EB    plus.....*f.^#V.
01C540:  11 12 00 19 5E 23 56 EB 11 07 00 19 E5 21 2B 00    ....^#V......!+.
01C550:  65 2E 01 E5 06 0A CD 01 06 2A 66 ED 5E 23 56 EB    e........*f.^#V.
01C560:  11 12 00 19 5E 23 56 EB 11 12 00 19 E5 2A 66 ED    ....^#V......*f.
01C570:  5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 12 00 19    ^#V.....^#V.....
01C580:  E5 CD 50 2D EB E1 73 23 72 2A 66 ED 5E 23 56 EB    ..P-..s#r*f.^#V.
01C590:  11 14 00 19 5E 23 56 EB 22 5C ED 2A 66 ED 5E 23    ....^#V."\.*f.^#
01C5A0:  56 EB 11 14 00 19 E5 2A 66 ED 5E 23 56 EB 11 12    V......*f.^#V...
01C5B0:  00 19 5E 23 56 EB 11 14 00 19 5E 23 56 EB EB E1    ..^#V.....^#V...
01C5C0:  73 23 72 2A 66 ED 5E 23 56 EB 11 12 00 19 5E 23    s#r*f.^#V.....^#
01C5D0:  56 EB 11 14 00 19 E5 2A 5C ED EB E1 73 23 72 2A    V......*\...s#r*
01C5E0:  66 ED 5E 23 56 EB 11 12 00 19 E5 CD 88 51 2A 66    f.^#V........Q*f
01C5F0:  ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 22 5C ED    .^#V.....^#V."\.
01C600:  2A 66 ED 5E 23 56 EB 11 12 00 19 E5 2A 66 ED 5E    *f.^#V......*f.^
01C610:  23 56 EB 11 14 00 19 5E 23 56 EB EB E1 73 23 72    #V.....^#V...s#r
01C620:  2A 66 ED 5E 23 56 EB 11 14 00 19 E5 2A 5C ED EB    *f.^#V......*\..
01C630:  E1 73 23 72 21 01 00 22 94 F2 C3 13 6B 2A 66 ED    .s#r!.."....k*f.
01C640:  5E 23 56 EB 11 07 00 19 CD 3A 05 21 2B 00 65 2E    ^#V......:.!+.e.
01C650:  01 E5 CD 8D 06 E5 2A 66 ED 5E 23 56 EB 11 07 00    ......*f.^#V....
01C660:  19 CD 3A 05 21 2D 00 65 2E 01 E5 CD 8D 06 D1 7D    ..:.!-.e.......}
01C670:  B3 6F E5 2A 66 ED 5E 23 56 EB 11 14 00 19 5E 23    .o.*f.^#V.....^#
01C680:  56 EB E5 CD 99 4C E5 21 00 00 D1 CD A5 06 D1 7D    V....L.!.......}
01C690:  A3 6F E5 2A 66 ED 5E 23 56 EB 11 14 00 19 5E 23    £o.*f.^#V.....^#
01C6A0:  56 EB E5 CD 99 4C E5 2A 66 ED 5E 23 56 EB 11 12    V....L.*f.^#V...
01C6B0:  00 19 5E 23 56 EB E5 CD 99 4C D1 CD E0 06 D1 7D    ..^#V....L.....}
01C6C0:  A3 6F CB 45 CA 13 6B 2A 66 ED 5E 23 56 EB 11 12    £o.E..k*f.^#V...
01C6D0:  00 19 5E 23 56 EB 22 5C ED 2A 66 ED 5E 23 56 EB    ..^#V."\.*f.^#V.
01C6E0:  11 12 00 19 E5 2A 66 ED 5E 23 56 EB 11 14 00 19    .....*f.^#V.....
01C6F0:  5E 23 56 EB EB E1 73 23 72 2A 66 ED 5E 23 56 EB    ^#V...s#r*f.^#V.
01C700:  11 14 00 19 E5 2A 5C ED EB E1 73 23 72 21 01 00    .....*\...s#r!..
01C710:  22 94 F2 C3 60 6C 2A 66 ED 5E 23 56 EB 11 07 00    "...`l*f.^#V....
01C720:  19 CD 3A 05 21 2A 00 65 2E 01 E5 CD 8D 06 E5 2A    ..:.!*.e.......*
01C730:  66 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 07    f.^#V.....^#V...
01C740:  00 19 CD 3A 05 21 78 00 65 2E 01 E5 CD 8D 06 E5    ...:.!x.e.......
01C750:  2A 66 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB 11    *f.^#V.....^#V..
01C760:  07 00 19 CD 3A 05 21 5E 00 65 2E 01 E5 CD 8D 06    ....:.!^.e......
01C770:  E5 2A 66 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB    .*f.^#V.....^#V.
01C780:  11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05 21    ....^#V......:.!
01C790:  78 00 65 2E 01 E5 CD 8D 06 D1 7D A3 6F D1 7D B3    x.e.......}£o.}.
01C7A0:  6F D1 7D A3 6F CB 45 CA 60 6C 2A 66 ED 5E 23 56    o.}£o.E.`l*f.^#V
01C7B0:  EB 11 07 00 19 CD 3A 05 21 2D 00 65 2E 01 E5 CD    ......:.!-.e....
01C7C0:  8D 06 CB 45 CA 14 6C 2A 66 ED 5E 23 56 EB E5 CD    ...E..l*f.^#V...
01C7D0:  4D 05 04 70 6C 75 73 06 06 CD 01 06 2A 66 ED 5E    M..plus.....*f.^
01C7E0:  23 56 EB 11 07 00 19 E5 21 2B 00 65 2E 01 E5 06    #V......!+.e....
01C7F0:  0A CD 01 06 2A 66 ED 5E 23 56 EB 11 12 00 19 E5    ....*f.^#V......
01C800:  2A 66 ED 5E 23 56 EB 11 12 00 19 E5 CD 50 2D EB    *f.^#V.......P-.
01C810:  E1 73 23 72 2A 66 ED 5E 23 56 EB 11 12 00 19 5E    .s#r*f.^#V.....^
01C820:  23 56 EB 22 5C ED 2A 66 ED 5E 23 56 EB 11 12 00    #V."\.*f.^#V....
01C830:  19 E5 2A 66 ED 5E 23 56 EB 11 14 00 19 5E 23 56    ..*f.^#V.....^#V
01C840:  EB EB E1 73 23 72 2A 66 ED 5E 23 56 EB 11 14 00    ...s#r*f.^#V....
01C850:  19 E5 2A 5C ED EB E1 73 23 72 21 01 00 22 94 F2    ..*\...s#r!.."..
01C860:  2A 66 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB E5    *f.^#V.....^#V..
01C870:  21 00 00 D1 CD 92 06 CB 45 CA 8B 6C 2A 66 ED 5E    !.......E..l*f.^
01C880:  23 56 EB 11 12 00 19 E5 CD 96 4C 2A 66 ED 5E 23    #V........L*f.^#
01C890:  56 EB 11 14 00 19 5E 23 56 EB E5 21 00 00 D1 CD    V.....^#V..!....
01C8A0:  92 06 CB 45 CA B6 6C 2A 66 ED 5E 23 56 EB 11 14    ...E..l*f.^#V...
01C8B0:  00 19 E5 CD 96 4C 01 0C 00 11 5C ED C3 22 05 01    .....L....\.."..
01C8C0:  10 00 21 4C ED CD 08 05 FD E1 E1 22 58 ED FD E5    ..!L......."X...
01C8D0:  2A 58 ED 11 07 00 19 CD 3A 05 21 2A 00 65 2E 01    *X......:.!*.e..
01C8E0:  E5 CD 8D 06 CB 45 CA 35 6E 2A 58 ED 11 14 00 19    .....E.5n*X.....
01C8F0:  5E 23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62 72    ^#V..:..M..nombr
01C900:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
01C910:  18 00 00 00 02 09 4E E5 18 00 41 02 00 00 00 02    ......N...A.....
01C920:  18 00 42 02 00 00 00 02 18 00 43 02 00 00 00 02    ..B.......C.....
01C930:  18 00 44 02 00 00 00 02 18 00 45 02 00 00 00 02    ..D.......E.....
01C940:  18 00 46 02 00 00 00 02 18 00 47 02 00 00 00 02    ..F.......G.....
01C950:  18 00 48 02 00 00 00 02 18 00 49 02 00 00 00 02    ..H.......I.....
01C960:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C970:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C980:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C990:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C9A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C9B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C9C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C9D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C9E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C9F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01CA00:  65 CD 8D 06 E5 2A 58 ED 11 12 00 19 5E 23 56 EB    e....*X.....^#V.
01CA10:  CD 3A 05 CD 4D 05 06 6E 6F 6D 62 72 65 CD 8D 06    .:..M..nombre...
01CA20:  D1 7D A3 6F CB 45 CA 32 6D 21 00 00 22 5A ED C3    .}£o.E.2m!.."Z..
01CA30:  32 6E 2A 58 ED 11 14 00 19 5E 23 56 EB CD 3A 05    2n*X.....^#V..:.
01CA40:  CD 4D 05 06 6E 6F 6D 62 72 65 CD 8D 06 E5 2A 58    .M..nombre....*X
01CA50:  ED 11 12 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05    .....^#V......:.
01CA60:  21 78 00 65 2E 01 E5 CD 8D 06 D1 7D A3 6F CB 45    !x.e.......}£o.E
01CA70:  CA 7C 6D 21 01 00 22 5A ED C3 32 6E 2A 58 ED 11    .|m!.."Z..2n*X..
01CA80:  14 00 19 5E 23 56 EB CD 3A 05 CD 4D 05 06 6E 6F    ...^#V..:..M..no
01CA90:  6D 62 72 65 CD 8D 06 E5 2A 58 ED 11 12 00 19 5E    mbre....*X.....^
01CAA0:  23 56 EB 11 07 00 19 CD 3A 05 21 5E 00 65 2E 01    #V......:.!^.e..
01CAB0:  E5 CD 8D 06 D1 7D A3 6F E5 2A 58 ED 11 12 00 19    .....}£o.*X.....
01CAC0:  5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 07 00 19    ^#V.....^#V.....
01CAD0:  CD 3A 05 21 78 00 65 2E 01 E5 CD 8D 06 D1 7D A3    .:.!x.e.......}£
01CAE0:  6F CB 45 CA 2C 6E 2A 58 ED 11 12 00 19 5E 23 56    o.E.,n*X.....^#V
01CAF0:  EB 11 12 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05    .....^#V......:.
01CB00:  21 4E ED E5 21 4C ED CD F4 1E 2A 4C ED E5 21 00    !N..!L....*L..!.
01CB10:  00 D1 CD 7F 06 CB 45 CA 23 6E 2A 4E ED 22 5A ED    ......E.#n*N."Z.
01CB20:  C3 29 6E 21 FF FF 22 5A ED C3 32 6E 21 FF FF 22    .)n!.."Z..2n!.."
01CB30:  5A ED C3 16 6F 2A 58 ED 11 07 00 19 CD 3A 05 21    Z...o*X......:.!
01CB40:  78 00 65 2E 01 E5 CD 8D 06 CB 45 CA 57 6E 21 01    x.e.......E.Wn!.
01CB50:  00 22 5A ED C3 16 6F 2A 58 ED CD 3A 05 CD 4D 05    ."Z...o*X..:..M.
01CB60:  06 6E 6F 6D 62 72 65 CD 8D 06 CB 45 CA 78 6E 21    .nombre....E.xn!
01CB70:  00 00 22 5A ED C3 16 6F 2A 58 ED 11 07 00 19 CD    .."Z...o*X......
01CB80:  3A 05 21 5E 00 65 2E 01 E5 CD 8D 06 E5 2A 58 ED    :.!^.e.......*X.
01CB90:  11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05 21    ....^#V......:.!
01CBA0:  78 00 65 2E 01 E5 CD 8D 06 D1 7D A3 6F E5 2A 58    x.e.......}£o.*X
01CBB0:  ED 11 12 00 19 5E 23 56 EB CD 3A 05 CD 4D 05 06    .....^#V..:..M..
01CBC0:  6E 6F 6D 62 72 65 CD 8D 06 D1 7D A3 6F CB 45 CA    nombre....}£o.E.
01CBD0:  10 6F 2A 58 ED 11 12 00 19 5E 23 56 EB 11 07 00    .o*X.....^#V....
01CBE0:  19 CD 3A 05 21 4E ED E5 21 4C ED CD F4 1E 2A 4C    ..:.!N..!L....*L
01CBF0:  ED E5 21 00 00 D1 CD 7F 06 CB 45 CA 07 6F 2A 4E    ..!.......E..o*N
01CC00:  ED 22 5A ED C3 0D 6F 21 FF FF 22 5A ED C3 16 6F    ."Z...o!.."Z...o
01CC10:  21 FF FF 22 5A ED 2A 5A ED D9 01 10 00 11 4C ED    !.."Z.*Z......L.
01CC20:  C3 22 05 01 0E 00 21 3E ED CD 08 05 FD E1 E1 22    ."....!>......."
01CC30:  4A ED FD E5 2A 4A ED 5E 23 56 EB E5 21 00 00 D1    J...*J.^#V..!...
01CC40:  CD 92 06 CB 45 CA D5 75 2A 4A ED 5E 23 56 EB 11    ....E..u*J.^#V..
01CC50:  07 00 19 CD 3A 05 21 2B 00 65 2E 01 E5 CD 8D 06    ....:.!+.e......
01CC60:  E5 2A 4A ED 5E 23 56 EB 11 07 00 19 CD 3A 05 21    .*J.^#V......:.!
01CC70:  2D 00 65 2E 01 E5 CD 8D 06 D1 7D B3 6F CB 45 CA    -.e.......}.o.E.
01CC80:  7F 75 2A 4A ED E5 CD 88 51 2A 4A ED 5E 23 56 EB    .u*J....Q*J.^#V.
01CC90:  11 12 00 19 5E 23 56 EB E5 21 00 00 D1 CD 92 06    ....^#V..!......
01CCA0:  CB 45 CA B4 6F 2A 4A ED 5E 23 56 EB 11 12 00 19    .E..o*J.^#V.....
01CCB0:  E5 CD 96 4C 2A 4A ED 5E 23 56 EB 11 14 00 19 5E    ...L*J.^#V.....^
01CCC0:  23 56 EB E5 21 00 00 D1 CD 92 06 CB 45 CA DF 6F    #V..!.......E..o
01CCD0:  2A 4A ED 5E 23 56 EB 11 14 00 19 E5 CD 96 4C 2A    *J.^#V........L*
01CCE0:  4A ED 5E 23 56 EB 11 07 00 19 CD 3A 05 21 2D 00    J.^#V......:.!-.
01CCF0:  65 2E 01 E5 CD 8D 06 CB 45 CA 49 70 2A 4A ED 5E    e.......E.Ip*J.^
01CD00:  23 56 EB 11 07 00 19 E5 21 2B 00 65 2E 01 E5 06    #V......!+.e....
01CD10:  0A CD 01 06 2A 4A ED 5E 23 56 EB E5 CD 4D 05 04    ....*J.^#V...M..
01CD20:  70 6C 75 73 06 06 CD 01 06 2A 4A ED 5E 23 56 EB    plus.....*J.^#V.
01CD30:  11 12 00 19 E5 2A 4A ED 5E 23 56 EB 11 12 00 19    .....*J.^#V.....
01CD40:  E5 CD 50 2D EB E1 73 23 72 2A 4A ED 5E 23 56 EB    ..P-..s#r*J.^#V.
01CD50:  11 12 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05 21    ....^#V......:.!
01CD60:  2D 00 65 2E 01 E5 CD 8D 06 CB 45 CA DB 70 2A 4A    -.e.......E..p*J
01CD70:  ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 12 00    .^#V.....^#V....
01CD80:  19 E5 2A 4A ED 5E 23 56 EB 11 12 00 19 5E 23 56    ..*J.^#V.....^#V
01CD90:  EB 11 12 00 19 E5 CD 50 2D EB E1 73 23 72 2A 4A    .......P-..s#r*J
01CDA0:  ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 07 00    .^#V.....^#V....
01CDB0:  19 E5 21 2B 00 65 2E 01 E5 06 0A CD 01 06 2A 4A    ..!+.e........*J
01CDC0:  ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB E5 CD 4D    .^#V.....^#V...M
01CDD0:  05 04 70 6C 75 73 06 06 CD 01 06 2A 4A ED 5E 23    ..plus.....*J.^#
01CDE0:  56 EB 11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A    V.....^#V......:
01CDF0:  05 21 2D 00 65 2E 01 E5 CD 8D 06 CB 45 CA 6D 71    .!-.e.......E.mq
01CE00:  A2 EC E5 21 00 00 CD 26 17 CD BA 17 02 20 3D CD    ...!...&..... =.
01CE10:  1B 20 21 FD EB E5 2A A0 EC 2B 29 5D 54 29 19 D1    . !...*..+)]T)..
01CE20:  19 CD CB 14 CD 72 16 CD 1B 20 2A A2 EC 23 D1 1B    .....r... *..#..
01CE30:  C3 CD 58 C3 A3 5A 19 11 03 00 B7 ED 52 C2 A3 5A    ..X.£Z......R.£Z
01CE40:  CD 9B 14 CD BA 17 1B 4E 6F 20 64 65 20 6C 61 20    .......No de la 
01CE50:  66 6F 6E 63 74 69 6F 6E 20 72 3D 66 28 74 29 20    fonction r=f(t) 
01CE60:  6E 2E 2A A4 EC E5 21 00 00 CD 26 17 CD BA 17 02    n.*...!...&.....
01CE70:  20 3D CD 1B 20 21 89 EC E5 2A A4 EC 2B 29 D1 19     =.. !...*..+)..
01CE80:  E5 CD F3 4C EB E1 73 23 72 21 A4 F2 E5 21 89 EC    ...L..s#r!...!..
01CE90:  E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB 29 D1 19 5E    .*..+)..^#V.)..^
01CEA0:  23 56 EB E5 21 00 00 D1 CD 7F 06 CB 45 CA F4 59    #V..!.......E..Y
01CEB0:  21 A4 F2 E5 21 89 EC E5 2A A4 EC 2B 29 D1 19 5E    !...!...*..+)..^
01CEC0:  23 56 EB 29 D1 19 E5 CD 1F 21 21 B2 F1 E5 21 89    #V.).....!!...!.
01CED0:  EC E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB 29 D1 19    ..*..+)..^#V.)..
01CEE0:  E5 21 B2 F1 E5 2A 96 F2 29 D1 19 5E 23 56 EB EB    .!...*..)..^#V..
01CEF0:  E1 73 23 72 21 B2 F1 E5 21 89 EC E5 2A A4 EC 2B    .s#r!...!...*..+
01CF00:  29 D1 19 5E 23 56 EB 29 D1 19 5E 23 56 EB E5 21    )..^#V.)..^#V..!
01CF10:  00 00 D1 CD CC 06 CB 45 CA A3 5A 21 01 00 E5 21    .......E.£Z!...!
01CF20:  B2 F1 E5 21 89 EC E5 2A A4 EC 2B 29 D1 19 5E 23    ...!...*..+)..^#
01CF30:  56 EB 29 D1 19 5E 23 56 EB D1 CD 66 06 7A B3 CA    V.)..^#V...f.z..
01CF40:  A3 5A D5 22 A2 EC 2A A0 EC E5 21 01 00 D1 19 22    £Z."..*...!...."
01CF50:  A0 EC CD 9B 14 CD BA 17 16 56 61 6C 65 75 72 20    .........Valeur 
01CF60:  64 75 20 70 61 72 61 6D 65 74 72 65 20 6E 2E 2A    du parametre n.*
01CF70:  A2 EC E5 21 00 00 CD 26 17 CD BA 17 02 20 3D CD    ...!...&..... =.
01CF80:  1B 20 21 FD EB E5 2A A0 EC 2B 29 5D 54 29 19 D1    . !...*..+)]T)..
01CF90:  19 CD CB 14 CD 72 16 CD 1B 20 2A A2 EC 23 D1 1B    .....r... *..#..
01CFA0:  C3 3D 5A 2A A4 EC 23 D1 1B C3 58 54 CD 3E 02 21    .=Z*..#...XT.>.!
01CFB0:  D0 EC CD 2C 05 CD D0 0F E5 21 CA EC CD 2C 05 CD    ...,.....!...,..
01CFC0:  D0 0F E5 CD F1 4F 21 00 00 E5 21 00 00 E5 CD 49    .....O!...!....I
01CFD0:  4F 21 80 02 E5 21 D0 EC CD 2C 05 CD D0 0F D1 EB    O!...!...,......
01CFE0:  B7 ED 52 E5 21 00 00 E5 CD F5 4E 21 80 FD E5 21    ..R.!.....N!...!
01CFF0:  00 00 E5 CD F5 4E 21 00 00 E5 21 00 00 E5 CD 49    .....N!...!....I
01D000:  4F 21 00 00 E5 21 90 01 E5 21 CA EC CD 2C 05 CD    O!...!...!...,..
01D010:  D0 0F D1 EB B7 ED 52 E5 CD F5 4E 21 00 00 E5 21    ......R...N!...!
01D020:  70 FE E5 CD F5 4E 21 B8 EC CD 2C 05 CD D0 0F E5    p....N!...,.....
01D030:  21 00 00 E5 CD 49 4F 21 00 00 E5 21 05 00 E5 CD    !....IO!...!....
01D040:  F5 4E 21 00 00 E5 21 F6 FF E5 CD F5 4E 21 00 00    .N!...!.....N!..
01D050:  E5 21 B2 EC CD 2C 05 CD D0 0F E5 CD 49 4F 21 05    .!...,......IO!.
01D060:  00 E5 21 00 00 E5 CD F5 4E 21 F6 FF E5 21 00 00    ..!.....N!...!..
01D070:  E5 CD F5 4E 21 00 00 22 A0 EC 21 01 00 E5 2A A6    ...N!.."..!...*.
01D080:  EC D1 CD 66 06 7A B3 CA AB 62 D5 22 A4 EC 2A 8E    ...f.z...b."..*.
01D090:  F2 11 01 00 B7 ED 52 C2 7F 5D 21 C4 EC CD 2C 05    ......R..]!...,.
01D0A0:  D9 21 AB F1 CD D1 05 21 00 00 7D 32 9D EC 21 B2    .!.....!..}2..!.
01D0B0:  F1 E5 21 89 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56    ..!...*..+)..^#V
01D0C0:  EB 29 D1 19 5E 23 56 EB E5 21 00 00 D1 CD CC 06    .)..^#V..!......
01D0D0:  CB 45 CA 57 5C 21 01 00 E5 21 B2 F1 E5 21 89 EC    .E.W\!...!...!..
01D0E0:  E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB 29 D1 19 5E    .*..+)..^#V.)..^
01D0F0:  23 56 EB D1 CD 66 06 7A B3 CA 57 5C D5 22 A2 EC    #V...f.z..W\."..
01D100:  2A A0 EC E5 21 01 00 D1 19 22 A0 EC 21 C8 F1 E5    *...!...."..!...
01D110:  2A A2 EC 2B 29 E5 29 29 29 29 29 D1 19 D1 19 E5    *..+).))))).....
01D120:  21 89 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB 29    !...*..+)..^#V.)
01D130:  5D 54 29 19 D1 19 E5 21 FD EB E5 2A A0 EC 2B 29    ]T)....!...*..+)
01D140:  5D 54 29 19 D1 19 CD 2C 05 D9 E1 CD D1 05 2A A2    ]T)....,......*.
01D150:  EC 23 D1 1B C3 F7 5B 21 AB F1 CD 2C 05 C5 D5 E5    .#....[!...,....
01D160:  21 BE EC CD 2C 05 D9 E1 D1 C1 CD E9 06 CB 45 CA    !...,.........E.
01D170:  7C 5D 21 01 00 7D 32 B1 F1 21 89 EC E5 2A A4 EC    |]!..}2..!...*..
01D180:  2B 29 D1 19 5E 23 56 EB 22 96 F2 21 A4 F2 E5 21    +)..^#V."..!...!
01D190:  89 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB 29 D1    ...*..+)..^#V.).
01D1A0:  19 5E 23 56 EB E5 21 AB F1 CD 2C 05 C5 D5 E5 CD    .^#V..!...,.....
01D1B0:  48 2D D9 21 A5 F1 CD D1 05 2A B1 F1 26 00 E5 21    H-.!.....*..&..!
01D1C0:  01 00 D1 CD 7F 06 E5 21 A5 F1 CD 2C 05 CB B8 C5    .......!...,....
01D1D0:  D5 E5 21 E8 03 CD 08 10 D9 E1 D1 C1 CD E9 06 D1    ..!.............
01D1E0:  7D A3 6F CB 45 CA 55 5D 21 AB F1 CD 2C 05 C5 D5    }£o.E.U]!...,...
01D1F0:  E5 21 B8 EC CD 2C 05 D9 E1 D1 C1 CD FA 09 CD D0    .!...,..........
01D200:  0F 22 AA EC 21 A5 F1 CD 2C 05 C5 D5 E5 21 B2 EC    ."..!...,....!..
01D210:  CD 2C 05 D9 E1 D1 C1 CD FA 09 CD D0 0F 22 A8 EC    .,..........."..
01D220:  2A 9D EC 26 00 E5 21 00 00 D1 CD 7F 06 CB 45 CA    *..&..!.......E.
01D230:  40 5D 2A AA EC E5 2A A8 EC E5 CD 9D 4F C3 4B 5D    @]*...*.....O.K]
01D240:  2A AA EC E5 2A A8 EC E5 CD 1F 4F 21 01 00 7D 32    *...*.....O!..}2
01D250:  9D EC C3 5C 5D 21 00 00 7D 32 9D EC 21 AB F1 CD    ...\]!..}2..!...
01D260:  2C 05 C5 D5 E5 21 AC EC CD 2C 05 D9 E1 D1 C1 CD    ,....!...,......
01D270:  E9 09 D9 21 AB F1 CD D1 05 C3 57 5C C3 A2 62 19    ...!......W\..b.
01D280:  11 02 00 B7 ED 52 C2 90 60 21 C4 EC CD 2C 05 D9    .....R..`!...,..
01D290:  21 AB F1 CD D1 05 21 00 00 7D 32 9D EC 21 B2 F1    !.....!..}2..!..
01D2A0:  E5 21 89 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB    .!...*..+)..^#V.
01D2B0:  29 D1 19 5E 23 56 EB E5 21 00 00 D1 CD CC 06 CB    )..^#V..!.......
01D2C0:  45 CA 46 5E 21 01 00 E5 21 B2 F1 E5 21 89 EC E5    E.F^!...!...!...
01D2D0:  2A A4 EC 2B 29 D1 19 5E 23 56 EB 29 D1 19 5E 23    *..+)..^#V.)..^#
01D2E0:  56 EB D1 CD 66 06 7A B3 CA 46 5E D5 22 A2 EC 2A    V...f.z..F^."..*
01D2F0:  A0 EC E5 21 01 00 D1 19 22 A0 EC 21 C8 F1 E5 2A    ...!...."..!...*
01D300:  A2 EC 2B 29 E5 29 29 29 29 29 D1 19 D1 19 E5 21    ..+).))))).....!
01D310:  89 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB 29 5D    ...*..+)..^#V.)]
01D320:  54 29 19 D1 19 E5 21 FD EB E5 2A A0 EC 2B 29 5D    T)....!...*..+)]
01D330:  54 29 19 D1 19 CD 2C 05 D9 E1 CD D1 05 2A A2 EC    T)....,......*..
01D340:  23 D1 1B C3 E6 5D 21 B2 F1 E5 21 75 EC E5 2A A4    #....]!...!u..*.
01D350:  EC 2B 29 D1 19 5E 23 56 EB 29 D1 19 5E 23 56 EB    .+)..^#V.)..^#V.
01D360:  E5 21 00 00 D1 CD CC 06 CB 45 CA EF 5E 21 01 00    .!.......E..^!..
01D370:  E5 21 B2 F1 E5 21 75 EC E5 2A A4 EC 2B 29 D1 19    .!...!u..*..+)..
01D380:  5E 23 56 EB 29 D1 19 5E 23 56 EB D1 CD 66 06 7A    ^#V.)..^#V...f.z
01D390:  B3 CA EF 5E D5 22 A2 EC 2A A0 EC E5 21 01 00 D1    ...^."..*...!...
01D3A0:  19 22 A0 EC 21 C8 F1 E5 2A A2 EC 2B 29 E5 29 29    ."..!...*..+).))
01D3B0:  29 29 29 D1 19 D1 19 E5 21 75 EC E5 2A A4 EC 2B    ))).....!u..*..+
01D3C0:  29 D1 19 5E 23 56 EB 29 5D 54 29 19 D1 19 E5 21    )..^#V.)]T)....!
01D3D0:  FD EB E5 2A A0 EC 2B 29 5D 54 29 19 D1 19 CD 2C    ...*..+)]T)....,
01D3E0:  05 D9 E1 CD D1 05 2A A2 EC 23 D1 1B C3 8F 5E 21    ......*..#....^!
01D3F0:  AB F1 CD 2C 05 C5 D5 E5 21 BE EC CD 2C 05 D9 E1    ...,....!...,...
01D400:  D1 C1 CD E9 06 CB 45 CA 8D 60 21 01 00 7D 32 B1    ......E..`!..}2.
01D410:  F1 21 89 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB    .!...*..+)..^#V.
01D420:  22 96 F2 21 A4 F2 E5 21 89 EC E5 2A A4 EC 2B 29    "..!...!...*..+)
01D430:  D1 19 5E 23 56 EB 29 D1 19 5E 23 56 EB E5 21 AB    ..^#V.)..^#V..!.
01D440:  F1 CD 2C 05 C5 D5 E5 CD 48 2D D9 21 A5 F1 CD D1    ..,.....H-.!....
01D450:  05 2A B1 F1 26 00 E5 21 01 00 D1 CD 7F 06 E5 21    .*..&..!.......!
01D460:  A5 F1 CD 2C 05 CB B8 C5 D5 E5 21 E8 03 CD 08 10    ...,......!.....
01D470:  D9 E1 D1 C1 CD E9 06 D1 7D A3 6F CB 45 CA 66 60    ........}£o.E.f`
01D480:  21 A5 F1 CD 2C 05 C5 D5 E5 21 B8 EC CD 2C 05 D9    !...,....!...,..
01D490:  E1 D1 C1 CD FA 09 CD D0 0F 22 AA EC 21 75 EC E5    ........."..!u..
01D4A0:  2A A4 EC 2B 29 D1 19 5E 23 56 EB 22 96 F2 21 A4    *..+)..^#V."..!.
01D4B0:  F2 E5 21 75 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56    ..!u..*..+)..^#V
01D4C0:  EB 29 D1 19 5E 23 56 EB E5 21 AB F1 CD 2C 05 C5    .)..^#V..!...,..
01D4D0:  D5 E5 CD 48 2D D9 21 A5 F1 CD D1 05 2A B1 F1 26    ...H-.!.....*..&
01D4E0:  00 E5 21 01 00 D1 CD 7F 06 E5 21 A5 F1 CD 2C 05    ..!.......!...,.
01D4F0:  CB B8 C5 D5 E5 21 E8 03 CD 08 10 D9 E1 D1 C1 CD    .....!..........
01D500:  E9 06 D1 7D A3 6F CB 45 CA 5C 60 21 A5 F1 CD 2C    ...}£o.E.\`!...,
01D510:  05 C5 D5 E5 21 B2 EC CD 2C 05 D9 E1 D1 C1 CD FA    ....!...,.......
01D520:  09 CD D0 0F 22 A8 EC 2A 9D EC 26 00 E5 21 00 00    ...."..*..&..!..
01D530:  D1 CD 7F 06 CB 45 CA 47 60 2A AA EC E5 2A A8 EC    .....E.G`*...*..
01D540:  E5 CD 9D 4F C3 52 60 2A AA EC E5 2A A8 EC E5 CD    ...O.R`*...*....
01D550:  1F 4F 21 01 00 7D 32 9D EC C3 63 60 21 00 00 7D    .O!..}2...c`!..}
01D560:  32 9D EC C3 6D 60 21 00 00 7D 32 9D EC 21 AB F1    2...m`!..}2..!..
01D570:  CD 2C 05 C5 D5 E5 21 AC EC CD 2C 05 D9 E1 D1 C1    .,....!...,.....
01D580:  CD E9 09 D9 21 AB F1 CD D1 05 C3 EF 5E C3 A2 62    ....!.......^..b
01D590:  19 11 03 00 B7 ED 52 C2 A2 62 21 C4 EC CD 2C 05    ......R..b!...,.
01D5A0:  D9 21 AB F1 CD D1 05 21 00 00 7D 32 9D EC 21 B2    .!.....!..}2..!.
01D5B0:  F1 E5 21 89 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56    ..!...*..+)..^#V
01D5C0:  EB 29 D1 19 5E 23 56 EB E5 21 00 00 D1 CD CC 06    .)..^#V..!......
01D5D0:  CB 45 CA 57 61 21 01 00 E5 21 B2 F1 E5 21 89 EC    .E.Wa!...!...!..
01D5E0:  E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB 29 D1 19 5E    .*..+)..^#V.)..^
01D5F0:  23 56 EB D1 CD 66 06 7A B3 CA 57 61 D5 22 A2 EC    #V...f.z..Wa."..
01D600:  2A A0 EC E5 21 01 00 D1 19 22 A0 EC 21 C8 F1 E5    *...!...."..!...
01D610:  2A A2 EC 2B 29 E5 29 29 29 29 29 D1 19 D1 19 E5    *..+).))))).....
01D620:  21 89 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB 29    !...*..+)..^#V.)
01D630:  5D 54 29 19 D1 19 E5 21 FD EB E5 2A A0 EC 2B 29    ]T)....!...*..+)
01D640:  5D 54 29 19 D1 19 CD 2C 05 D9 E1 CD D1 05 2A A2    ]T)....,......*.
01D650:  EC 23 D1 1B C3 F7 60 21 AB F1 CD 2C 05 C5 D5 E5    .#....`!...,....
01D660:  21 BE EC CD 2C 05 D9 E1 D1 C1 CD E9 06 CB 45 CA    !...,.........E.
01D670:  A2 62 21 01 00 7D 32 B1 F1 21 89 EC E5 2A A4 EC    .b!..}2..!...*..
01D680:  2B 29 D1 19 5E 23 56 EB 22 96 F2 21 A4 F2 E5 21    +)..^#V."..!...!
01D690:  89 EC E5 2A A4 EC 2B 29 D1 19 5E 23 56 EB 29 D1    ...*..+)..^#V.).
01D6A0:  19 5E 23 56 EB E5 21 AB F1 CD 2C 05 C5 D5 E5 CD    .^#V..!...,.....
01D6B0:  48 2D D9 21 A5 F1 CD D1 05 2A B1 F1 26 00 E5 21    H-.!.....*..&..!
01D6C0:  01 00 D1 CD 7F 06 E5 21 A5 F1 CD 2C 05 CB B8 C5    .......!...,....
01D6D0:  D5 E5 21 E8 03 CD 08 10 D9 E1 D1 C1 CD E9 06 D1    ..!.............
01D6E0:  7D A3 6F CB 45 CA 7B 62 21 A5 F1 CD 2C 05 C5 D5    }£o.E.{b!...,...
01D6F0:  E5 21 AB F1 CD 2C 05 CD 7F 0C D9 E1 D1 C1 CD FA    .!...,..........
01D700:  09 C5 D5 E5 21 B8 EC CD 2C 05 D9 E1 D1 C1 CD FA    ....!...,.......
01D710:  09 CD D0 0F 22 AA EC 21 A5 F1 CD 2C 05 C5 D5 E5    ...."..!...,....
01D720:  21 AB F1 CD 2C 05 CD 87 0C D9 E1 D1 C1 CD FA 09    !...,...........
01D730:  C5 D5 E5 21 B2 EC CD 2C 05 D9 E1 D1 C1 CD FA 09    ...!...,........
01D740:  CD D0 0F 22 A8 EC 2A 9D EC 26 00 E5 21 00 00 D1    ..."..*..&..!...
01D750:  CD 7F 06 CB 45 CA 66 62 2A AA EC E5 2A A8 EC E5    ....E.fb*...*...
01D760:  CD 9D 4F C3 71 62 2A AA EC E5 2A A8 EC E5 CD 1F    ..O.qb*...*.....
01D770:  4F 21 01 00 7D 32 9D EC C3 82 62 21 00 00 7D 32    O!..}2....b!..}2
01D780:  9D EC 21 AB F1 CD 2C 05 C5 D5 E5 21 AC EC CD 2C    ..!...,....!...,
01D790:  05 D9 E1 D1 C1 CD E9 09 D9 21 AB F1 CD D1 05 C3    .........!......
01D7A0:  57 61 2A A4 EC 23 D1 1B C3 85 5B 21 01 00 E5 21    Wa*..#....[!...!
01D7B0:  18 00 CD DB 1F CD 9B 14 CD BA 17 2A 3C 31 3E 20    ...........*<1> 
01D7C0:  49 6D 70 72 69 6D 65 72 20 3C 32 3E 20 52 65 76    Imprimer <2> Rev
01D7D0:  6F 69 72 20 3C 33 3E 20 52 65 74 6F 75 72 20 61    oir <3> Retour a
01D7E0:  75 20 6D 65 6E 75 CD 1B 20 21 BA 00 CD A9 14 21    u menu.. !.....!
01D7F0:  A3 F2 CD 44 16 CD 1B 20 2A A3 F2 26 00 E5 21 30    £..D... *£.&..!0
01D800:  00 D1 CD CC 06 E5 2A A3 F2 26 00 E5 21 34 00 D1    ......*£.&..!4..
01D810:  CD E0 06 D1 7D A3 6F CB 45 CA E9 62 2A A3 F2 26    ....}£o.E..b*£.&
01D820:  00 65 2E 01 E5 21 9E EC E5 21 92 F2 CD F4 1E 2A    .e...!...!.....*
01D830:  9E EC E5 21 01 00 D1 CD 7F 06 CB 45 CA 8C 63 21    ...!.......E..c!
01D840:  01 00 E5 21 18 00 CD DB 1F CD 9B 14 CD BA 17 2B    ...!...........+
01D850:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01D860:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01D870:  20 20 20 20 20 20 20 20 20 20 20 CD 1B 20 21 00               .. !.
01D880:  00 E5 21 00 00 E5 CD F1 4F CD 84 50 2A 9E EC E5    ..!.....O..P*...
01D890:  21 02 00 D1 CD 7F 06 CB 45 CA A3 63 21 01 00 E5    !.......E.£c!...
01D8A0:  CD 65 4D 01 E3 00 11 FD EB C3 22 05 21 00 00 E5    .eM.......".!...
01D8B0:  21 0A 00 D1 CD 66 06 7A B3 CA EF 63 D5 22 96 F2    !....f.z...c."..
01D8C0:  21 A4 F2 E5 2A 96 F2 29 D1 19 E5 21 00 00 EB E1    !...*..)...!....
01D8D0:  73 23 72 21 B2 F1 E5 2A 96 F2 29 D1 19 E5 21 00    s#r!...*..)...!.
01D8E0:  00 EB E1 73 23 72 2A 96 F2 23 D1 1B C3 B7 63 21    ...s#r*..#....c!
01D8F0:  0A 00 E5 21 0A 00 E5 CD 1B 50 CD 68 4D C3 D4 20    ...!.....P.hM.. 
01D900:  0A 20 20 20 6F 72 69 67 69 6E 28 30 2C 30 29 3B    .   origin(0,0);
01D910:  76 69 64 61 67 65 3B 0D 0A 20 20 20 65 6E 64 3B    vidage;..   end;
01D920:  0D 0A 20 20 69 66 20 63 68 6F 69 78 62 69 73 3D    ..  if choixbis=
01D930:  32 20 74 68 65 6E 0D 0A 20 20 67 72 61 70 68 65    2 then..  graphe
01D940:  28 31 29 3B 0D 0A 65 6E 64 3B 1A 1A 1A 1A 1A 1A    (1);..end;......
01D950:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01D960:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01D970:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01D980:  20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 63     begin..       c
01D990:  6C 72 73 63 72 3B 77 72 69 74 65 28 27 4E 6F 20    lrscr;write('No 
01D9A0:  64 65 20 6C 61 20 66 6F 6E 63 74 69 6F 6E 20 28    de la fonction (
01D9B0:  31 20 61 20 39 29 3F 27 29 3B 0D 0A 20 20 20 20    1 a 9)?');..    
01D9C0:  20 20 20 69 3A 3D 6E 75 6D 66 6F 6E 63 3B 0D 0A       i:=numfonc;..
01D9D0:  20 20 20 20 20 20 20 69 66 20 6D 5B 69 5D 3E 30           if m[i]>0
01D9E0:  20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 62 65     then..       be
01D9F0:  67 69 6E 0D 0A 20 20 20 20 20 20 20 66 6F 72 20    gin..       for 
01DA00:  67 69 6E 0D 0A 20 20 20 20 20 20 77 72 69 74 65    gin..      write
01DA10:  28 27 4E 6F 20 64 65 20 6C 61 20 66 6F 6E 63 74    ('No de la fonct
01DA20:  69 6F 6E 20 79 3D 66 28 78 29 20 6E 2E 27 2C 7A    ion y=f(x) n.',z
01DA30:  2C 27 20 3D 27 29 3B 66 78 5B 7A 5D 3A 3D 6E 75    ,' =');fx[z]:=nu
01DA40:  6D 66 6F 6E 63 3B 0D 0A 20 20 20 20 20 20 69 66    mfonc;..      if
01DA50:  20 66 5B 66 78 5B 7A 5D 5D 3D 6E 69 6C 20 74 68     f[fx[z]]=nil th
01DA60:  65 6E 0D 0A 20 20 20 20 20 20 20 62 65 67 69 6E    en..       begin
01DA70:  0D 0A 20 20 20 20 20 20 20 20 6C 69 72 66 6F 6E    ..        lirfon
01DA80:  63 74 69 6F 6E 28 66 5B 66 78 5B 7A 5D 5D 29 3B    ction(f[fx[z]]);
01DA90:  0D 0A 20 20 20 20 20 20 20 20 6D 5B 66 78 5B 7A    ..        m[fx[z
01DAA0:  5D 5D 3A 3D 6D 5B 69 5D 3B 0D 0A 20 20 20 20 20    ]]:=m[i];..     
01DAB0:  20 65 6E 64 3B 0D 0A 20 20 20 20 20 20 69 66 20     end;..      if 
01DAC0:  6D 5B 66 78 5B 7A 5D 5D 3E 30 20 74 68 65 6E 0D    m[fx[z]]>0 then.
01DAD0:  0A 20 20 20 20 20 20 62 65 67 69 6E 20 66 6F 72    .      begin for
01DAE0:  20 62 6B 3A 3D 31 20 74 6F 20 6D 5B 66 78 5B 7A     bk:=1 to m[fx[z
01DAF0:  5D 5D 20 64 6F 0D 0A 20 20 20 20 20 20 20 20 20    ]] do..         
01DB00:  62 65 67 69 6E 20 69 6E 64 65 78 3A 3D 69 6E 64    begin index:=ind
01DB10:  65 78 2B 31 3B 77 72 69 74 65 28 27 56 61 6C 65    ex+1;write('Vale
01DB20:  75 72 20 64 75 20 70 61 72 61 6D 65 74 72 65 20    ur du parametre 
01DB30:  6E 2E 27 2C 62 6B 2C 27 20 3D 27 29 3B 0D 0A 20    n.',bk,' =');.. 
01DB40:  20 20 20 20 20 20 20 20 72 65 61 64 6C 6E 28 6C            readln(l
01DB50:  64 61 5B 69 6E 64 65 78 5D 29 3B 0D 0A 20 20 20    da[index]);..   
01DB60:  20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20          end;..    
01DB70:  20 20 65 6E 64 3B 0D 0A 20 20 20 20 20 65 6E 64      end;..     end
01DB80:  3B 0D 0A 20 20 20 20 32 3A 20 62 65 67 69 6E 0D    ;..    2: begin.
01DB90:  0A 20 20 20 20 20 20 77 72 69 74 65 28 27 4E 6F    .      write('No
01DBA0:  20 64 65 20 6C 61 20 66 6F 6E 63 74 69 6F 6E 20     de la fonction 
01DBB0:  78 3D 66 28 74 29 20 6E 2E 27 2C 7A 2C 27 20 3D    x=f(t) n.',z,' =
01DBC0:  27 29 3B 66 78 5B 7A 5D 3A 3D 6E 75 6D 66 6F 6E    ');fx[z]:=numfon
01DBD0:  63 3B 0D 0A 20 20 20 20 20 20 69 66 20 66 5B 66    c;..      if f[f
01DBE0:  78 5B 7A 5D 5D 3D 6E 69 6C 20 74 68 65 6E 0D 0A    x[z]]=nil then..
01DBF0:  20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20          begin..   
01DC00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
01DC10:  19 00 00 00 02 09 4E E5 19 00 41 02 00 00 00 02    ......N...A.....
01DC20:  19 00 42 02 00 00 00 02 19 00 43 02 00 00 00 02    ..B.......C.....
01DC30:  19 00 44 02 00 00 00 02 19 00 45 02 00 00 00 02    ..D.......E.....
01DC40:  19 00 46 02 00 00 00 02 19 00 47 02 00 00 00 02    ..F.......G.....
01DC50:  19 00 48 02 00 00 00 02 19 00 49 02 00 00 00 02    ..H.......I.....
01DC60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DC70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DC80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DC90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DCA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DCB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DCC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DCD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DCE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DCF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DD00:  20 20 20 20 20 6C 69 72 66 6F 6E 63 74 69 6F 6E         lirfonction
01DD10:  28 66 5B 66 78 5B 7A 5D 5D 29 3B 0D 0A 20 20 20    (f[fx[z]]);..   
01DD20:  20 20 20 20 20 6D 5B 66 78 5B 7A 5D 5D 3A 3D 6D         m[fx[z]]:=m
01DD30:  5B 69 5D 3B 0D 0A 20 20 20 20 20 65 6E 64 3B 0D    [i];..     end;.
01DD40:  0A 20 20 20 20 20 20 69 66 20 6D 5B 66 78 5B 7A    .      if m[fx[z
01DD50:  5D 5D 3E 30 20 74 68 65 6E 0D 0A 20 20 20 20 20    ]]>0 then..     
01DD60:  20 62 65 67 69 6E 20 66 6F 72 20 62 6B 3A 3D 31     begin for bk:=1
01DD70:  20 74 6F 20 6D 5B 66 78 5B 7A 5D 5D 20 64 6F 0D     to m[fx[z]] do.
01DD80:  0A 20 20 20 20 20 20 20 20 20 62 65 67 69 6E 20    .         begin 
01DD90:  20 69 6E 64 65 78 3A 3D 69 6E 64 65 78 2B 31 3B     index:=index+1;
01DDA0:  77 72 69 74 65 28 27 56 61 6C 65 75 72 20 64 75    write('Valeur du
01DDB0:  20 70 61 72 61 6D 65 74 72 65 20 6E 2E 27 2C 62     parametre n.',b
01DDC0:  6B 2C 27 20 3D 27 29 3B 0D 0A 20 20 20 20 20 20    k,' =');..      
01DDD0:  20 20 20 72 65 61 64 6C 6E 28 6C 64 61 5B 69 6E       readln(lda[in
01DDE0:  64 65 78 5D 29 3B 0D 0A 20 20 20 20 20 20 20 20    dex]);..        
01DDF0:  20 65 6E 64 3B 0D 0A 20 20 20 20 20 20 65 6E 64     end;..      end
01DE00:  3B 0D 0A 20 20 20 20 20 20 77 72 69 74 65 28 27    ;..      write('
01DE10:  4E 6F 20 64 65 20 6C 61 20 66 6F 6E 63 74 69 6F    No de la fonctio
01DE20:  6E 20 79 3D 66 28 74 29 20 6E 2E 27 2C 7A 2C 27    n y=f(t) n.',z,'
01DE30:  20 3D 27 29 3B 66 79 5B 7A 5D 3A 3D 6E 75 6D 66     =');fy[z]:=numf
01DE40:  6F 6E 63 3B 0D 0A 20 20 20 20 20 20 69 66 20 66    onc;..      if f
01DE50:  5B 66 79 5B 7A 5D 5D 3D 6E 69 6C 20 74 68 65 6E    [fy[z]]=nil then
01DE60:  0D 0A 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A    ..       begin..
01DE70:  20 20 20 20 20 20 20 20 20 6C 69 72 66 6F 6E 63             lirfonc
01DE80:  74 69 6F 6E 28 66 5B 66 79 5B 7A 5D 5D 29 3B 0D    tion(f[fy[z]]);.
01DE90:  0A 20 20 20 20 20 20 20 20 20 6D 5B 66 79 5B 7A    .         m[fy[z
01DEA0:  5D 5D 3A 3D 6D 5B 69 5D 3B 0D 0A 20 20 20 20 20    ]]:=m[i];..     
01DEB0:  20 65 6E 64 3B 0D 0A 20 20 20 20 20 20 69 66 20     end;..      if 
01DEC0:  66 79 5B 7A 5D 3D 66 78 5B 7A 5D 20 74 68 65 6E    fy[z]=fx[z] then
01DED0:  0D 0A 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20    ..      begin.. 
01DEE0:  20 20 20 20 20 20 20 66 79 5B 7A 5D 3A 3D 30 3B           fy[z]:=0;
01DEF0:  0D 0A 20 20 20 20 20 20 20 20 66 5B 30 5D 3A 3D    ..        f[0]:=
01DF00:  66 5B 66 78 5B 7A 5D 5D 3B 0D 0A 20 20 20 20 20    f[fx[z]];..     
01DF10:  20 20 20 6D 5B 30 5D 3A 3D 6D 5B 66 78 5B 7A 5D       m[0]:=m[fx[z]
01DF20:  5D 3B 0D 0A 20 20 20 20 20 20 65 6E 64 3B 0D 0A    ];..      end;..
01DF30:  20 20 20 20 20 20 69 66 20 6D 5B 66 79 5B 7A 5D          if m[fy[z]
01DF40:  5D 3E 30 20 74 68 65 6E 0D 0A 20 20 20 20 20 20    ]>0 then..      
01DF50:  62 65 67 69 6E 20 66 6F 72 20 62 6B 3A 3D 31 20    begin for bk:=1 
01DF60:  74 6F 20 6D 5B 66 79 5B 7A 5D 5D 20 64 6F 0D 0A    to m[fy[z]] do..
01DF70:  20 20 20 20 20 20 20 20 20 62 65 67 69 6E 20 20             begin  
01DF80:  69 6E 64 65 78 3A 3D 69 6E 64 65 78 2B 31 3B 77    index:=index+1;w
01DF90:  72 69 74 65 28 27 56 61 6C 65 75 72 20 64 75 20    rite('Valeur du 
01DFA0:  70 61 72 61 6D 65 74 72 65 20 6E 2E 27 2C 62 6B    parametre n.',bk
01DFB0:  2C 27 20 3D 27 29 3B 0D 0A 20 20 20 20 20 20 20    ,' =');..       
01DFC0:  20 20 72 65 61 64 6C 6E 28 6C 64 61 5B 69 6E 64      readln(lda[ind
01DFD0:  65 78 5D 29 3B 0D 0A 20 20 20 20 20 20 20 20 20    ex]);..         
01DFE0:  65 6E 64 3B 0D 0A 20 20 20 20 20 20 65 6E 64 3B    end;..      end;
01DFF0:  0D 0A 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20    ..    end;..    
01E000:  33 3A 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 77    3: begin..     w
01E010:  72 69 74 65 28 27 4E 6F 20 64 65 20 6C 61 20 66    rite('No de la f
01E020:  6F 6E 63 74 69 6F 6E 20 72 3D 66 28 74 29 20 6E    onction r=f(t) n
01E030:  2E 27 2C 7A 2C 27 20 3D 27 29 3B 66 78 5B 7A 5D    .',z,' =');fx[z]
01E040:  3A 3D 6E 75 6D 66 6F 6E 63 3B 0D 0A 20 20 20 20    :=numfonc;..    
01E050:  20 69 66 20 66 5B 66 78 5B 7A 5D 5D 3D 6E 69 6C     if f[fx[z]]=nil
01E060:  20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 62 65     then..       be
01E070:  67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 6C 69    gin..         li
01E080:  72 66 6F 6E 63 74 69 6F 6E 28 66 5B 66 78 5B 7A    rfonction(f[fx[z
01E090:  5D 5D 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 6D    ]]);..         m
01E0A0:  5B 66 78 5B 7A 5D 5D 3A 3D 6D 5B 69 5D 3B 0D 0A    [fx[z]]:=m[i];..
01E0B0:  20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20           end;..   
01E0C0:  20 20 69 66 20 6D 5B 66 78 5B 7A 5D 5D 3E 30 20      if m[fx[z]]>0 
01E0D0:  74 68 65 6E 0D 0A 20 20 20 20 20 62 65 67 69 6E    then..     begin
01E0E0:  20 66 6F 72 20 62 6B 3A 3D 31 20 74 6F 20 6D 5B     for bk:=1 to m[
01E0F0:  66 78 5B 7A 5D 5D 20 64 6F 0D 0A 20 20 20 20 20    fx[z]] do..     
01E100:  20 20 20 20 62 65 67 69 6E 20 20 69 6E 64 65 78        begin  index
01E110:  3A 3D 69 6E 64 65 78 2B 31 3B 77 72 69 74 65 28    :=index+1;write(
01E120:  27 56 61 6C 65 75 72 20 64 75 20 70 61 72 61 6D    'Valeur du param
01E130:  65 74 72 65 20 6E 2E 27 2C 62 6B 2C 27 20 3D 27    etre n.',bk,' ='
01E140:  29 3B 0D 0A 20 20 20 20 20 20 20 20 20 72 65 61    );..         rea
01E150:  64 6C 6E 28 6C 64 61 5B 69 6E 64 65 78 5D 29 3B    dln(lda[index]);
01E160:  0D 0A 20 20 20 20 20 20 20 20 20 65 6E 64 3B 0D    ..         end;.
01E170:  0A 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20    .     end;..    
01E180:  20 65 6E 64 3B 0D 0A 20 20 20 20 65 6E 64 3B 0D     end;..    end;.
01E190:  0A 20 20 20 65 6E 64 3B 0D 0A 20 65 6E 64 3B 0D    .   end;.. end;.
01E1A0:  0A 20 20 63 6C 72 73 63 72 3B 0D 0A 20 20 6F 72    .  clrscr;..  or
01E1B0:  69 67 69 6E 28 72 6F 75 6E 64 28 78 6F 29 2C 72    igin(round(xo),r
01E1C0:  6F 75 6E 64 28 79 6F 29 29 3B 0D 0A 20 20 67 72    ound(yo));..  gr
01E1D0:  61 66 6D 6F 76 65 28 30 2C 30 29 3B 64 72 61 77    afmove(0,0);draw
01E1E0:  72 28 36 34 30 2D 72 6F 75 6E 64 28 78 6F 29 2C    r(640-round(xo),
01E1F0:  30 29 3B 64 72 61 77 72 28 2D 36 34 30 2C 30 29    0);drawr(-640,0)
01E200:  3B 0D 0A 20 20 67 72 61 66 6D 6F 76 65 28 30 2C    ;..  grafmove(0,
01E210:  30 29 3B 64 72 61 77 72 28 30 2C 34 30 30 2D 72    0);drawr(0,400-r
01E220:  6F 75 6E 64 28 79 6F 29 29 3B 64 72 61 77 72 28    ound(yo));drawr(
01E230:  30 2C 2D 34 30 30 29 3B 0D 0A 20 20 67 72 61 66    0,-400);..  graf
01E240:  6D 6F 76 65 28 72 6F 75 6E 64 28 75 78 29 2C 30    move(round(ux),0
01E250:  29 3B 64 72 61 77 72 28 30 2C 35 29 3B 64 72 61    );drawr(0,5);dra
01E260:  77 72 28 30 2C 2D 31 30 29 3B 0D 0A 20 20 67 72    wr(0,-10);..  gr
01E270:  61 66 6D 6F 76 65 28 30 2C 72 6F 75 6E 64 28 75    afmove(0,round(u
01E280:  79 29 29 3B 64 72 61 77 72 28 35 2C 30 29 3B 64    y));drawr(5,0);d
01E290:  72 61 77 72 28 2D 31 30 2C 30 29 3B 0D 0A 20 20    rawr(-10,0);..  
01E2A0:  69 6E 64 65 78 3A 3D 30 3B 0D 0A 20 20 66 6F 72    index:=0;..  for
01E2B0:  20 7A 3A 3D 31 20 74 6F 20 6E 62 66 6F 6E 63 20     z:=1 to nbfonc 
01E2C0:  64 6F 0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 63    do..  begin..  c
01E2D0:  61 73 65 20 63 68 6F 69 78 20 6F 66 0D 0A 20 20    ase choix of..  
01E2E0:  31 3A 20 62 65 67 69 6E 0D 0A 20 20 78 3A 3D 78    1: begin..  x:=x
01E2F0:  78 64 3B 70 72 65 63 65 64 65 3A 3D 66 61 6C 73    xd;precede:=fals
01E300:  65 3B 0D 0A 20 20 20 20 69 66 20 6D 5B 66 78 5B    e;..    if m[fx[
01E310:  7A 5D 5D 3E 30 20 74 68 65 6E 0D 0A 20 20 20 20    z]]>0 then..    
01E320:  20 62 65 67 69 6E 20 66 6F 72 20 62 6B 3A 3D 31     begin for bk:=1
01E330:  20 74 6F 20 6D 5B 66 78 5B 7A 5D 5D 20 64 6F 0D     to m[fx[z]] do.
01E340:  0A 20 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D    .         begin.
01E350:  0A 20 20 20 20 20 20 20 20 20 69 6E 64 65 78 3A    .         index:
01E360:  3D 69 6E 64 65 78 2B 31 3B 70 5B 62 6B 2C 66 78    =index+1;p[bk,fx
01E370:  5B 7A 5D 5D 3A 3D 6C 64 61 5B 69 6E 64 65 78 5D    [z]]:=lda[index]
01E380:  3B 0D 0A 20 20 20 20 20 20 20 20 20 65 6E 64 3B    ;..         end;
01E390:  0D 0A 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 77    ..     end;..  w
01E3A0:  68 69 6C 65 20 78 3C 78 78 61 20 64 6F 0D 0A 20    hile x<xxa do.. 
01E3B0:  20 62 65 67 69 6E 0D 0A 20 20 64 65 66 69 6E 69     begin..  defini
01E3C0:  3A 3D 74 72 75 65 3B 69 3A 3D 66 78 5B 7A 5D 3B    :=true;i:=fx[z];
01E3D0:  0D 0A 20 20 20 20 20 20 20 20 20 72 65 73 75 6C    ..         resul
01E3E0:  74 61 74 3A 3D 63 61 6C 63 75 6C 28 66 5B 66 78    tat:=calcul(f[fx
01E3F0:  5B 7A 5D 5D 2C 78 29 3B 0D 0A 20 20 20 20 20 20    [z]],x);..      
01E400:  20 20 20 69 66 20 28 28 64 65 66 69 6E 69 3D 74       if ((defini=t
01E410:  72 75 65 29 20 61 6E 64 20 28 61 62 73 28 72 65    rue) and (abs(re
01E420:  73 75 6C 74 61 74 29 3C 31 30 30 30 29 29 20 74    sultat)<1000)) t
01E430:  68 65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20    hen begin..     
01E440:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E450:  20 20 20 20 20 20 20 20 20 78 70 3A 3D 72 6F 75             xp:=rou
01E460:  6E 64 28 78 2A 75 78 29 3B 0D 0A 20 20 20 20 20    nd(x*ux);..     
01E470:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E480:  20 20 20 20 20 20 20 20 20 79 70 3A 3D 72 6F 75             yp:=rou
01E490:  6E 64 28 72 65 73 75 6C 74 61 74 2A 75 79 29 3B    nd(resultat*uy);
01E4A0:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
01E4B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E4C0:  69 66 20 70 72 65 63 65 64 65 3D 66 61 6C 73 65    if precede=false
01E4D0:  20 74 68 65 6E 20 70 6C 6F 74 28 78 70 2C 79 70     then plot(xp,yp
01E4E0:  29 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    )..             
01E4F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E500:  20 65 6C 73 65 20 64 72 61 77 28 78 70 2C 79 70     else draw(xp,yp
01E510:  29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    );..            
01E520:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E530:  20 20 70 72 65 63 65 64 65 3A 3D 74 72 75 65 3B      precede:=true;
01E540:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
01E550:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65                   e
01E560:  6E 64 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    nd..            
01E570:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E580:  20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20     else..         
01E590:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E5A0:  20 20 20 20 70 72 65 63 65 64 65 3A 3D 66 61 6C        precede:=fal
01E5B0:  73 65 3B 0D 0A 20 20 20 20 20 20 20 20 78 3A 3D    se;..        x:=
01E5C0:  78 2B 70 61 73 3B 0D 0A 20 20 20 20 20 65 6E 64    x+pas;..     end
01E5D0:  3B 0D 0A 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20    ;..    end;..   
01E5E0:  32 3A 20 62 65 67 69 6E 0D 0A 20 20 20 78 3A 3D    2: begin..   x:=
01E5F0:  78 78 64 3B 70 72 65 63 65 64 65 3A 3D 66 61 6C    xxd;precede:=fal
01E600:  73 65 3B 0D 0A 20 20 20 20 69 66 20 6D 5B 66 78    se;..    if m[fx
01E610:  5B 7A 5D 5D 3E 30 20 74 68 65 6E 0D 0A 20 20 20    [z]]>0 then..   
01E620:  20 62 65 67 69 6E 20 66 6F 72 20 62 6B 3A 3D 31     begin for bk:=1
01E630:  20 74 6F 20 6D 5B 66 78 5B 7A 5D 5D 20 64 6F 0D     to m[fx[z]] do.
01E640:  0A 20 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D    .         begin.
01E650:  0A 20 20 20 20 20 20 20 20 20 69 6E 64 65 78 3A    .         index:
01E660:  3D 69 6E 64 65 78 2B 31 3B 70 5B 62 6B 2C 66 78    =index+1;p[bk,fx
01E670:  5B 7A 5D 5D 3A 3D 6C 64 61 5B 69 6E 64 65 78 5D    [z]]:=lda[index]
01E680:  3B 0D 0A 20 20 20 20 20 20 20 20 20 65 6E 64 3B    ;..         end;
01E690:  0D 0A 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20    ..    end;..    
01E6A0:  69 66 20 6D 5B 66 79 5B 7A 5D 5D 3E 30 20 74 68    if m[fy[z]]>0 th
01E6B0:  65 6E 0D 0A 20 20 20 20 62 65 67 69 6E 20 66 6F    en..    begin fo
01E6C0:  72 20 62 6B 3A 3D 31 20 74 6F 20 6D 5B 66 79 5B    r bk:=1 to m[fy[
01E6D0:  7A 5D 5D 20 64 6F 0D 0A 20 20 20 20 20 20 20 20    z]] do..        
01E6E0:  20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20     begin..        
01E6F0:  20 69 6E 64 65 78 3A 3D 69 6E 64 65 78 2B 31 3B     index:=index+1;
01E700:  70 5B 62 6B 2C 66 79 5B 7A 5D 5D 3A 3D 6C 64 61    p[bk,fy[z]]:=lda
01E710:  5B 69 6E 64 65 78 5D 3B 0D 0A 20 20 20 20 20 20    [index];..      
01E720:  20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 65 6E 64       end;..    end
01E730:  3B 0D 0A 20 20 20 77 68 69 6C 65 20 78 3C 78 78    ;..   while x<xx
01E740:  61 20 64 6F 0D 0A 20 20 20 62 65 67 69 6E 0D 0A    a do..   begin..
01E750:  20 20 20 64 65 66 69 6E 69 3A 3D 74 72 75 65 3B       defini:=true;
01E760:  69 3A 3D 66 78 5B 7A 5D 3B 0D 0A 20 20 20 20 20    i:=fx[z];..     
01E770:  20 20 20 20 20 72 65 73 75 6C 74 61 74 3A 3D 63         resultat:=c
01E780:  61 6C 63 75 6C 28 66 5B 66 78 5B 7A 5D 5D 2C 78    alcul(f[fx[z]],x
01E790:  29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 69 66    );..          if
01E7A0:  20 28 28 64 65 66 69 6E 69 3D 74 72 75 65 29 20     ((defini=true) 
01E7B0:  61 6E 64 20 28 61 62 73 28 72 65 73 75 6C 74 61    and (abs(resulta
01E7C0:  74 29 3C 31 30 30 30 29 29 20 74 68 65 6E 20 62    t)<1000)) then b
01E7D0:  65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20    egin..          
01E7E0:  78 70 3A 3D 72 6F 75 6E 64 28 72 65 73 75 6C 74    xp:=round(result
01E7F0:  61 74 2A 75 78 29 3B 69 3A 3D 66 79 5B 7A 5D 3B    at*ux);i:=fy[z];
01E800:  0D 0A 20 20 20 20 20 20 20 20 20 20 72 65 73 75    ..          resu
01E810:  6C 74 61 74 3A 3D 63 61 6C 63 75 6C 28 66 5B 66    ltat:=calcul(f[f
01E820:  79 5B 7A 5D 5D 2C 78 29 3B 0D 0A 20 20 20 20 20    y[z]],x);..     
01E830:  20 20 20 20 20 69 66 20 28 28 64 65 66 69 6E 69         if ((defini
01E840:  3D 74 72 75 65 29 20 61 6E 64 20 28 61 62 73 28    =true) and (abs(
01E850:  72 65 73 75 6C 74 61 74 29 3C 31 30 30 30 29 29    resultat)<1000))
01E860:  20 74 68 65 6E 20 62 65 67 69 6E 0D 0A 20 20 20     then begin..   
01E870:  20 20 20 20 20 20 20 79 70 3A 3D 72 6F 75 6E 64           yp:=round
01E880:  28 72 65 73 75 6C 74 61 74 2A 75 79 29 3B 0D 0A    (resultat*uy);..
01E890:  20 20 20 20 20 20 20 20 20 20 69 66 20 70 72 65              if pre
01E8A0:  63 65 64 65 3D 66 61 6C 73 65 20 74 68 65 6E 20    cede=false then 
01E8B0:  70 6C 6F 74 28 78 70 2C 79 70 29 20 65 6C 73 65    plot(xp,yp) else
01E8C0:  20 64 72 61 77 28 78 70 2C 79 70 29 3B 0D 0A 20     draw(xp,yp);.. 
01E8D0:  20 20 20 20 20 20 20 20 20 70 72 65 63 65 64 65             precede
01E8E0:  3A 3D 74 72 75 65 3B 0D 0A 20 20 20 20 20 20 20    :=true;..       
01E8F0:  20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20       end..        
01E900:  20 20 65 6C 73 65 20 70 72 65 63 65 64 65 3A 3D      else precede:=
01E910:  66 61 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20    false..         
01E920:  20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20 20 20     end..          
01E930:  65 6C 73 65 20 70 72 65 63 65 64 65 3A 3D 66 61    else precede:=fa
01E940:  6C 73 65 3B 0D 0A 20 20 20 20 20 20 20 78 3A 3D    lse;..       x:=
01E950:  78 2B 70 61 73 3B 0D 0A 20 20 20 20 20 65 6E 64    x+pas;..     end
01E960:  3B 0D 0A 20 20 20 65 6E 64 3B 0D 0A 20 20 33 3A    ;..   end;..  3:
01E970:  62 65 67 69 6E 0D 0A 20 20 78 3A 3D 78 78 64 3B    begin..  x:=xxd;
01E980:  70 72 65 63 65 64 65 3A 3D 66 61 6C 73 65 3B 0D    precede:=false;.
01E990:  0A 20 20 20 69 66 20 6D 5B 66 78 5B 7A 5D 5D 3E    .   if m[fx[z]]>
01E9A0:  30 20 74 68 65 6E 0D 0A 20 20 20 62 65 67 69 6E    0 then..   begin
01E9B0:  20 20 66 6F 72 20 62 6B 3A 3D 31 20 74 6F 20 6D      for bk:=1 to m
01E9C0:  5B 66 78 5B 7A 5D 5D 20 64 6F 0D 0A 20 20 20 20    [fx[z]] do..    
01E9D0:  20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20         begin..    
01E9E0:  20 20 20 20 20 69 6E 64 65 78 3A 3D 69 6E 64 65         index:=inde
01E9F0:  78 2B 31 3B 70 5B 62 6B 2C 66 78 5B 7A 5D 5D 3A    x+1;p[bk,fx[z]]:
01EA00:  3D 6C 64 61 5B 69 6E 64 65 78 5D 3B 0D 0A 20 20    =lda[index];..  
01EA10:  20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20           end;..   
01EA20:  65 6E 64 3B 0D 0A 20 20 77 68 69 6C 65 20 78 3C    end;..  while x<
01EA30:  78 78 61 20 64 6F 0D 0A 20 20 62 65 67 69 6E 0D    xxa do..  begin.
01EA40:  0A 20 20 20 64 65 66 69 6E 69 3A 3D 74 72 75 65    .   defini:=true
01EA50:  3B 69 3A 3D 66 78 5B 7A 5D 3B 0D 0A 20 20 20 20    ;i:=fx[z];..    
01EA60:  20 20 20 20 20 72 65 73 75 6C 74 61 74 3A 3D 63         resultat:=c
01EA70:  61 6C 63 75 6C 28 66 5B 66 78 5B 7A 5D 5D 2C 78    alcul(f[fx[z]],x
01EA80:  29 3B 0D 0A 20 20 20 20 20 20 20 20 20 69 66 20    );..         if 
01EA90:  28 28 64 65 66 69 6E 69 3D 74 72 75 65 29 20 61    ((defini=true) a
01EAA0:  6E 64 20 28 61 62 73 28 72 65 73 75 6C 74 61 74    nd (abs(resultat
01EAB0:  29 3C 31 30 30 30 29 29 20 74 68 65 6E 0D 0A 20    )<1000)) then.. 
01EAC0:  20 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20            begin.. 
01EAD0:  20 20 20 20 20 20 20 20 20 20 78 70 3A 3D 72 6F              xp:=ro
01EAE0:  75 6E 64 28 72 65 73 75 6C 74 61 74 2A 63 6F 73    und(resultat*cos
01EAF0:  28 78 29 2A 75 78 29 3B 0D 0A 20 20 20 20 20 20    (x)*ux);..      
01EB00:  70 72 6F 63 65 64 75 72 65 20 20 6F 72 64 72 65    procedure  ordre
01EB10:  28 76 61 72 20 66 3A 66 6F 6E 63 74 69 6F 6E 29    (var f:fonction)
01EB20:  3B 0D 0A 66 6F 72 77 61 72 64 3B 0D 0A 0D 0A 66    ;..forward;....f
01EB30:  75 6E 63 74 69 6F 6E 20 20 6D 6F 6E 6F 6D 65 28    unction  monome(
01EB40:  66 3A 66 6F 6E 63 74 69 6F 6E 29 3A 69 6E 74 65    f:fonction):inte
01EB50:  67 65 72 3B 0D 0A 66 6F 72 77 61 72 64 3B 0D 0A    ger;..forward;..
01EB60:  0D 0A 70 72 6F 63 65 64 75 72 65 20 20 64 65 76    ..procedure  dev
01EB70:  65 6C 6F 70 28 76 61 72 20 66 3A 66 6F 6E 63 74    elop(var f:fonct
01EB80:  69 6F 6E 29 3B 0D 0A 76 61 72 0D 0A 75 2C 76 3A    ion);..var..u,v:
01EB90:  66 6F 6E 63 74 69 6F 6E 3B 0D 0A 62 65 67 69 6E    fonction;..begin
01EBA0:  0D 0A 20 69 66 20 28 28 66 5E 2E 76 61 6C 65 75    .. if ((f^.valeu
01EBB0:  72 3D 27 2A 27 29 20 61 6E 64 20 28 28 66 5E 2E    r='*') and ((f^.
01EBC0:  67 5E 2E 76 61 6C 65 75 72 3D 27 2B 27 29 20 6F    g^.valeur='+') o
01EBD0:  72 20 28 66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D    r (f^.g^.valeur=
01EBE0:  27 2D 27 29 29 0D 0A 20 61 6E 64 20 28 66 5E 2E    '-')).. and (f^.
01EBF0:  64 5E 2E 6E 61 74 75 72 65 3C 3E 27 69 64 66 63    d^.nature<>'idfc
01EC00:  74 27 29 29 20 74 68 65 6E 0D 0A 20 20 20 62 65    t')) then..   be
01EC10:  67 69 6E 20 66 5E 2E 6E 61 74 75 72 65 3A 3D 66    gin f^.nature:=f
01EC20:  5E 2E 67 5E 2E 6E 61 74 75 72 65 3B 66 5E 2E 76    ^.g^.nature;f^.v
01EC30:  61 6C 65 75 72 3A 3D 66 5E 2E 67 5E 2E 76 61 6C    aleur:=f^.g^.val
01EC40:  65 75 72 3B 0D 0A 20 20 20 20 20 20 20 20 20 6E    eur;..         n
01EC50:  65 77 28 76 29 3B 76 5E 2E 6E 61 74 75 72 65 3A    ew(v);v^.nature:
01EC60:  3D 27 6D 75 6C 74 69 27 3B 76 5E 2E 76 61 6C 65    ='multi';v^.vale
01EC70:  75 72 3A 3D 27 2A 27 3B 76 5E 2E 67 3A 3D 66 5E    ur:='*';v^.g:=f^
01EC80:  2E 67 5E 2E 67 3B 76 5E 2E 64 3A 3D 66 5E 2E 64    .g^.g;v^.d:=f^.d
01EC90:  3B 0D 0A 20 20 20 20 20 20 20 20 20 6E 65 77 28    ;..         new(
01ECA0:  75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D 27 6D    u);u^.nature:='m
01ECB0:  75 6C 74 69 27 3B 75 5E 2E 76 61 6C 65 75 72 3A    ulti';u^.valeur:
01ECC0:  3D 27 2A 27 3B 75 5E 2E 67 3A 3D 66 5E 2E 67 5E    ='*';u^.g:=f^.g^
01ECD0:  2E 64 3B 75 5E 2E 64 3A 3D 66 5E 2E 64 3B 0D 0A    .d;u^.d:=f^.d;..
01ECE0:  20 20 20 20 20 20 20 20 20 66 5E 2E 67 3A 3D 76             f^.g:=v
01ECF0:  3B 66 5E 2E 64 3A 3D 75 3B 0D 0A 20 20 20 20 20    ;f^.d:=u;..     
01ED00:  20 20 20 20 72 65 73 75 6C 74 3A 3D 31 0D 0A 20        result:=1.. 
01ED10:  20 20 65 6E 64 0D 0A 20 20 20 65 6C 73 65 0D 0A      end..   else..
01ED20:  20 20 69 66 20 28 28 66 5E 2E 76 61 6C 65 75 72      if ((f^.valeur
01ED30:  3D 27 2A 27 29 20 61 6E 64 20 28 28 66 5E 2E 64    ='*') and ((f^.d
01ED40:  5E 2E 76 61 6C 65 75 72 3D 27 2B 27 29 20 6F 72    ^.valeur='+') or
01ED50:  20 28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27     (f^.d^.valeur='
01ED60:  2D 27 29 29 0D 0A 20 20 61 6E 64 20 28 66 5E 2E    -'))..  and (f^.
01ED70:  67 5E 2E 6E 61 74 75 72 65 3C 3E 27 69 64 66 63    g^.nature<>'idfc
01ED80:  74 27 29 29 20 74 68 65 6E 0D 0A 20 20 20 62 65    t')) then..   be
01ED90:  67 69 6E 20 66 5E 2E 6E 61 74 75 72 65 3A 3D 66    gin f^.nature:=f
01EDA0:  5E 2E 64 5E 2E 6E 61 74 75 72 65 3B 66 5E 2E 76    ^.d^.nature;f^.v
01EDB0:  61 6C 65 75 72 3A 3D 66 5E 2E 64 5E 2E 76 61 6C    aleur:=f^.d^.val
01EDC0:  65 75 72 3B 0D 0A 20 20 20 20 20 20 20 20 20 6E    eur;..         n
01EDD0:  65 77 28 76 29 3B 76 5E 2E 6E 61 74 75 72 65 3A    ew(v);v^.nature:
01EDE0:  3D 27 6D 75 6C 74 69 27 3B 76 5E 2E 76 61 6C 65    ='multi';v^.vale
01EDF0:  75 72 3A 3D 27 2A 27 3B 76 5E 2E 67 3A 3D 66 5E    ur:='*';v^.g:=f^
01EE00:  2E 67 3B 76 5E 2E 64 3A 3D 66 5E 2E 64 5E 2E 67    .g;v^.d:=f^.d^.g
01EE10:  3B 0D 0A 20 20 20 20 20 20 20 20 20 6E 65 77 28    ;..         new(
01EE20:  75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D 27 6D    u);u^.nature:='m
01EE30:  75 6C 74 69 27 3B 75 5E 2E 76 61 6C 65 75 72 3A    ulti';u^.valeur:
01EE40:  3D 27 2A 27 3B 75 5E 2E 67 3A 3D 66 5E 2E 67 3B    ='*';u^.g:=f^.g;
01EE50:  75 5E 2E 64 3A 3D 66 5E 2E 64 5E 2E 64 3B 0D 0A    u^.d:=f^.d^.d;..
01EE60:  20 20 20 20 20 20 20 20 20 66 5E 2E 64 3A 3D 75             f^.d:=u
01EE70:  3B 66 5E 2E 67 3A 3D 76 3B 0D 0A 20 20 20 20 20    ;f^.g:=v;..     
01EE80:  20 20 20 20 72 65 73 75 6C 74 3A 3D 31 0D 0A 20        result:=1.. 
01EE90:  20 20 20 65 6E 64 0D 0A 20 20 20 20 65 6C 73 65       end..    else
01EEA0:  0D 0A 20 20 69 66 20 28 28 66 5E 2E 76 61 6C 65    ..  if ((f^.vale
01EEB0:  75 72 3D 27 5E 27 29 61 6E 64 28 66 5E 2E 64 5E    ur='^')and(f^.d^
01EEC0:  2E 76 61 6C 65 75 72 3D 27 32 27 29 61 6E 64 28    .valeur='2')and(
01EED0:  66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D 27 2A 27    f^.g^.valeur='*'
01EEE0:  29 29 20 74 68 65 6E 0D 0A 20 20 20 20 62 65 67    )) then..    beg
01EEF0:  69 6E 20 66 5E 2E 6E 61 74 75 72 65 3A 3D 27 6D    in f^.nature:='m
01EF00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
01EF10:  1A 00 00 00 02 09 4E E5 1A 00 41 02 00 00 00 02    ......N...A.....
01EF20:  1A 00 42 02 00 00 00 02 1A 00 43 02 00 00 00 02    ..B.......C.....
01EF30:  1A 00 44 02 00 00 00 02 1A 00 45 02 00 00 00 02    ..D.......E.....
01EF40:  1A 00 46 02 00 00 00 02 1A 00 47 02 00 00 00 02    ..F.......G.....
01EF50:  1A 00 48 02 00 00 00 02 1A 00 49 02 00 00 00 02    ..H.......I.....
01EF60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EF70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EF80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EF90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EFA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EFB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EFC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EFD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EFE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EFF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01F000:  75 6C 74 69 27 3B 66 5E 2E 76 61 6C 65 75 72 3A    ulti';f^.valeur:
01F010:  3D 27 2A 27 3B 66 5E 2E 64 3A 3D 66 5E 2E 67 3B    ='*';f^.d:=f^.g;
01F020:  72 65 73 75 6C 74 3A 3D 31 0D 0A 20 20 20 20 65    result:=1..    e
01F030:  6E 64 0D 0A 20 20 20 20 65 6C 73 65 0D 0A 20 20    nd..    else..  
01F040:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 69 66 20      begin..    if 
01F050:  66 5E 2E 67 3C 3E 6E 69 6C 20 74 68 65 6E 20 64    f^.g<>nil then d
01F060:  65 76 65 6C 6F 70 28 66 5E 2E 67 29 3B 69 66 20    evelop(f^.g);if 
01F070:  66 5E 2E 64 3C 3E 6E 69 6C 20 74 68 65 6E 20 64    f^.d<>nil then d
01F080:  65 76 65 6C 6F 70 28 66 5E 2E 64 29 3B 0D 0A 20    evelop(f^.d);.. 
01F090:  20 20 20 65 6E 64 3B 0D 0A 65 6E 64 3B 0D 0A 0D       end;..end;...
01F0A0:  0A 70 72 6F 63 65 64 75 72 65 20 20 72 65 64 75    .procedure  redu
01F0B0:  69 72 65 28 76 61 72 20 66 3A 66 6F 6E 63 74 69    ire(var f:foncti
01F0C0:  6F 6E 29 3B 0D 0A 76 61 72 0D 0A 75 2C 76 3A 66    on);..var..u,v:f
01F0D0:  6F 6E 63 74 69 6F 6E 3B 0D 0A 62 65 67 69 6E 0D    onction;..begin.
01F0E0:  0A 20 69 66 20 28 28 28 66 5E 2E 76 61 6C 65 75    . if (((f^.valeu
01F0F0:  72 3D 27 2B 27 29 6F 72 28 66 5E 2E 76 61 6C 65    r='+')or(f^.vale
01F100:  75 72 3D 27 2D 27 29 29 61 6E 64 28 6D 6F 6E 6F    ur='-'))and(mono
01F110:  6D 65 28 66 5E 2E 64 29 3E 3D 30 29 61 6E 64 0D    me(f^.d)>=0)and.
01F120:  0A 20 28 6D 6F 6E 6F 6D 65 28 66 5E 2E 64 29 3D    . (monome(f^.d)=
01F130:  6D 6F 6E 6F 6D 65 28 66 5E 2E 67 29 29 29 20 74    monome(f^.g))) t
01F140:  68 65 6E 0D 0A 20 62 65 67 69 6E 0D 0A 20 20 20    hen.. begin..   
01F150:  69 66 20 28 28 66 5E 2E 64 5E 2E 76 61 6C 65 75    if ((f^.d^.valeu
01F160:  72 3D 27 2A 27 29 61 6E 64 28 66 5E 2E 67 5E 2E    r='*')and(f^.g^.
01F170:  76 61 6C 65 75 72 3D 27 2A 27 29 29 20 74 68 65    valeur='*')) the
01F180:  6E 0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 20 69    n..  begin..   i
01F190:  66 20 28 28 28 66 5E 2E 67 5E 2E 64 5E 2E 76 61    f (((f^.g^.d^.va
01F1A0:  6C 65 75 72 3D 27 78 27 29 20 61 6E 64 20 28 66    leur='x') and (f
01F1B0:  5E 2E 64 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27    ^.d^.d^.valeur='
01F1C0:  78 27 29 29 20 6F 72 0D 0A 20 20 28 28 66 5E 2E    x')) or..  ((f^.
01F1D0:  67 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 5E 27    g^.d^.valeur='^'
01F1E0:  29 61 6E 64 28 66 5E 2E 64 5E 2E 64 5E 2E 76 61    )and(f^.d^.d^.va
01F1F0:  6C 65 75 72 3D 27 5E 27 29 61 6E 64 0D 0A 20 20    leur='^')and..  
01F200:  28 66 5E 2E 67 5E 2E 64 5E 2E 64 5E 2E 76 61 6C    (f^.g^.d^.d^.val
01F210:  65 75 72 3D 66 5E 2E 64 5E 2E 64 5E 2E 64 5E 2E    eur=f^.d^.d^.d^.
01F220:  76 61 6C 65 75 72 29 29 29 0D 0A 20 20 20 74 68    valeur)))..   th
01F230:  65 6E 0D 0A 20 20 20 20 20 62 65 67 69 6E 0D 0A    en..     begin..
01F240:  20 20 20 20 20 20 6E 65 77 28 75 29 3B 75 5E 2E          new(u);u^.
01F250:  6E 61 74 75 72 65 3A 3D 66 5E 2E 6E 61 74 75 72    nature:=f^.natur
01F260:  65 3B 75 5E 2E 76 61 6C 65 75 72 3A 3D 66 5E 2E    e;u^.valeur:=f^.
01F270:  76 61 6C 65 75 72 3B 0D 0A 20 20 20 20 20 20 66    valeur;..      f
01F280:  5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75 6C 74 69    ^.nature:='multi
01F290:  27 3B 66 5E 2E 76 61 6C 65 75 72 3A 3D 27 2A 27    ';f^.valeur:='*'
01F2A0:  3B 0D 0A 20 20 20 20 20 20 75 5E 2E 64 3A 3D 66    ;..      u^.d:=f
01F2B0:  5E 2E 64 5E 2E 67 3B 75 5E 2E 67 3A 3D 66 5E 2E    ^.d^.g;u^.g:=f^.
01F2C0:  67 5E 2E 67 3B 66 5E 2E 67 3A 3D 75 3B 66 5E 2E    g^.g;f^.g:=u;f^.
01F2D0:  64 3A 3D 66 5E 2E 64 5E 2E 64 3B 73 69 6D 70 6C    d:=f^.d^.d;simpl
01F2E0:  69 66 28 66 5E 2E 67 29 3B 0D 0A 20 20 20 20 20    if(f^.g);..     
01F2F0:  20 72 65 73 75 6C 74 3A 3D 31 0D 0A 20 20 20 20     result:=1..    
01F300:  20 65 6E 64 0D 0A 20 20 20 20 65 6E 64 0D 0A 20     end..    end.. 
01F310:  20 20 20 65 6C 73 65 0D 0A 20 20 62 65 67 69 6E       else..  begin
01F320:  0D 0A 20 20 20 20 20 69 66 20 28 28 66 5E 2E 64    ..     if ((f^.d
01F330:  5E 2E 76 61 6C 65 75 72 3D 27 78 27 29 6F 72 28    ^.valeur='x')or(
01F340:  28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 5E    (f^.d^.valeur='^
01F350:  27 29 61 6E 64 28 66 5E 2E 64 5E 2E 67 5E 2E 76    ')and(f^.d^.g^.v
01F360:  61 6C 65 75 72 3D 27 78 27 29 29 29 0D 0A 20 20    aleur='x')))..  
01F370:  20 20 20 20 74 68 65 6E 20 62 65 67 69 6E 20 6E        then begin n
01F380:  65 77 28 75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A    ew(u);u^.nature:
01F390:  3D 27 6D 75 6C 74 69 27 3B 75 5E 2E 76 61 6C 65    ='multi';u^.vale
01F3A0:  75 72 3A 3D 27 2A 27 3B 0D 0A 20 20 20 20 20 20    ur:='*';..      
01F3B0:  20 20 20 20 20 20 20 20 20 20 20 6E 65 77 28 76               new(v
01F3C0:  29 3B 76 5E 2E 6E 61 74 75 72 65 3A 3D 27 6E 6F    );v^.nature:='no
01F3D0:  6D 62 72 65 27 3B 76 5E 2E 76 61 6C 65 75 72 3A    mbre';v^.valeur:
01F3E0:  3D 27 31 27 3B 0D 0A 20 20 20 20 20 20 20 20 20    ='1';..         
01F3F0:  20 20 20 20 20 20 20 20 20 76 5E 2E 64 3A 3D 6E             v^.d:=n
01F400:  69 6C 3B 76 5E 2E 67 3A 3D 6E 69 6C 3B 75 5E 2E    il;v^.g:=nil;u^.
01F410:  67 3A 3D 76 3B 75 5E 2E 64 3A 3D 66 5E 2E 64 3B    g:=v;u^.d:=f^.d;
01F420:  66 5E 2E 64 3A 3D 75 3B 0D 0A 20 20 20 20 20 20    f^.d:=u;..      
01F430:  20 20 20 20 20 20 20 20 20 20 20 72 65 64 75 69               redui
01F440:  72 65 28 66 29 3B 72 65 73 75 6C 74 3A 3D 31 3B    re(f);result:=1;
01F450:  0D 0A 20 20 20 20 20 20 20 20 20 20 65 6E 64 0D    ..          end.
01F460:  0A 20 20 20 20 20 20 20 20 20 20 65 6C 73 65 0D    .          else.
01F470:  0A 20 20 20 20 20 69 66 20 28 28 66 5E 2E 67 5E    .     if ((f^.g^
01F480:  2E 76 61 6C 65 75 72 3D 27 78 27 29 6F 72 28 28    .valeur='x')or((
01F490:  66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D 27 5E 27    f^.g^.valeur='^'
01F4A0:  29 61 6E 64 28 66 5E 2E 67 5E 2E 67 5E 2E 76 61    )and(f^.g^.g^.va
01F4B0:  6C 65 75 72 3D 27 78 27 29 29 29 0D 0A 20 20 20    leur='x')))..   
01F4C0:  20 20 74 68 65 6E 20 62 65 67 69 6E 20 6E 65 77      then begin new
01F4D0:  28 75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D 27    (u);u^.nature:='
01F4E0:  6D 75 6C 74 69 27 3B 75 5E 2E 76 61 6C 65 75 72    multi';u^.valeur
01F4F0:  3A 3D 27 2A 27 3B 0D 0A 20 20 20 20 20 20 20 20    :='*';..        
01F500:  20 20 20 20 20 20 20 20 6E 65 77 28 76 29 3B 76            new(v);v
01F510:  5E 2E 6E 61 74 75 72 65 3A 3D 27 6E 6F 6D 62 72    ^.nature:='nombr
01F520:  65 27 3B 76 5E 2E 76 61 6C 65 75 72 3A 3D 27 31    e';v^.valeur:='1
01F530:  27 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    ';..            
01F540:  20 20 20 20 76 5E 2E 64 3A 3D 6E 69 6C 3B 76 5E        v^.d:=nil;v^
01F550:  2E 67 3A 3D 6E 69 6C 3B 75 5E 2E 67 3A 3D 76 3B    .g:=nil;u^.g:=v;
01F560:  75 5E 2E 64 3A 3D 66 5E 2E 67 3B 66 5E 2E 67 3A    u^.d:=f^.g;f^.g:
01F570:  3D 75 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    =u;..           
01F580:  20 20 20 20 72 65 64 75 69 72 65 28 66 29 3B 72        reduire(f);r
01F590:  65 73 75 6C 74 3A 3D 31 3B 0D 0A 20 20 20 20 20    esult:=1;..     
01F5A0:  20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20        end..       
01F5B0:  20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20      else..        
01F5C0:  20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20     begin..        
01F5D0:  20 20 20 20 20 20 20 73 69 6D 70 6C 69 66 28 66           simplif(f
01F5E0:  29 3B 72 65 73 75 6C 74 3A 3D 31 3B 0D 0A 20 20    );result:=1;..  
01F5F0:  20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 69           end;..  i
01F600:  66 20 66 5E 2E 64 3C 3E 6E 69 6C 20 74 68 65 6E    f f^.d<>nil then
01F610:  20 72 65 64 75 69 72 65 28 66 5E 2E 64 29 3B 69     reduire(f^.d);i
01F620:  66 20 66 5E 2E 67 3C 3E 6E 69 6C 20 74 68 65 6E    f f^.g<>nil then
01F630:  20 72 65 64 75 69 72 65 28 66 5E 2E 67 29 3B 0D     reduire(f^.g);.
01F640:  0A 20 20 65 6E 64 0D 0A 65 6E 64 0D 0A 20 65 6C    .  end..end.. el
01F650:  73 65 0D 0A 20 62 65 67 69 6E 0D 0A 20 20 69 66    se.. begin..  if
01F660:  20 66 5E 2E 64 3C 3E 6E 69 6C 20 74 68 65 6E 20     f^.d<>nil then 
01F670:  72 65 64 75 69 72 65 28 66 5E 2E 64 29 3B 69 66    reduire(f^.d);if
01F680:  20 66 5E 2E 67 3C 3E 6E 69 6C 20 74 68 65 6E 20     f^.g<>nil then 
01F690:  72 65 64 75 69 72 65 28 66 5E 2E 67 29 3B 0D 0A    reduire(f^.g);..
01F6A0:  20 65 6E 64 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70     end;..end;....p
01F6B0:  72 6F 63 65 64 75 72 65 20 20 70 72 6F 64 75 69    rocedure  produi
01F6C0:  74 28 76 61 72 20 66 3A 66 6F 6E 63 74 69 6F 6E    t(var f:fonction
01F6D0:  29 3B 0D 0A 76 61 72 0D 0A 75 2C 76 3A 66 6F 6E    );..var..u,v:fon
01F6E0:  63 74 69 6F 6E 3B 0D 0A 20 62 65 67 69 6E 0D 0A    ction;.. begin..
01F6F0:  20 20 69 66 20 66 5E 2E 76 61 6C 65 75 72 3D 27      if f^.valeur='
01F700:  2A 27 20 74 68 65 6E 0D 0A 20 20 62 65 67 69 6E    *' then..  begin
01F710:  0D 0A 20 20 6F 72 64 72 65 28 66 5E 2E 64 29 3B    ..  ordre(f^.d);
01F720:  6F 72 64 72 65 28 66 5E 2E 67 29 3B 6F 72 64 72    ordre(f^.g);ordr
01F730:  65 28 66 29 3B 0D 0A 20 69 66 20 28 28 66 5E 2E    e(f);.. if ((f^.
01F740:  64 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 61 6E    d^.valeur='*')an
01F750:  64 28 66 5E 2E 67 5E 2E 6E 61 74 75 72 65 3D 27    d(f^.g^.nature='
01F760:  6E 6F 6D 62 72 65 27 29 61 6E 64 28 66 5E 2E 64    nombre')and(f^.d
01F770:  5E 2E 67 5E 2E 6E 61 74 75 72 65 3D 27 6E 6F 6D    ^.g^.nature='nom
01F780:  62 72 65 27 29 29 0D 0A 20 20 20 74 68 65 6E 0D    bre'))..   then.
01F790:  0A 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20    .     begin..   
01F7A0:  20 20 6E 65 77 28 76 29 3B 76 5E 2E 64 3A 3D 66      new(v);v^.d:=f
01F7B0:  5E 2E 67 3B 76 5E 2E 67 3A 3D 66 5E 2E 64 5E 2E    ^.g;v^.g:=f^.d^.
01F7C0:  67 3B 76 5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75    g;v^.nature:='mu
01F7D0:  6C 74 69 27 3B 76 5E 2E 76 61 6C 65 75 72 3A 3D    lti';v^.valeur:=
01F7E0:  27 2A 27 3B 0D 0A 20 20 20 20 20 66 5E 2E 64 3A    '*';..     f^.d:
01F7F0:  3D 66 5E 2E 64 5E 2E 64 3B 66 5E 2E 67 3A 3D 76    =f^.d^.d;f^.g:=v
01F800:  3B 73 69 6D 70 6C 69 66 28 66 5E 2E 67 29 3B 72    ;simplif(f^.g);r
01F810:  65 73 75 6C 74 3A 3D 31 0D 0A 20 20 20 20 20 65    esult:=1..     e
01F820:  6E 64 0D 0A 20 20 20 20 20 65 6C 73 65 0D 0A 20    nd..     else.. 
01F830:  69 66 20 28 28 66 5E 2E 67 5E 2E 76 61 6C 65 75    if ((f^.g^.valeu
01F840:  72 3D 27 2A 27 29 61 6E 64 28 66 5E 2E 67 5E 2E    r='*')and(f^.g^.
01F850:  67 5E 2E 6E 61 74 75 72 65 3D 27 6E 6F 6D 62 72    g^.nature='nombr
01F860:  65 27 29 61 6E 64 28 66 5E 2E 64 5E 2E 6E 61 74    e')and(f^.d^.nat
01F870:  75 72 65 3D 27 6E 6F 6D 62 72 65 27 29 29 0D 0A    ure='nombre'))..
01F880:  20 20 20 74 68 65 6E 0D 0A 20 20 20 20 62 65 67       then..    beg
01F890:  69 6E 0D 0A 20 20 20 20 20 6E 65 77 28 76 29 3B    in..     new(v);
01F8A0:  76 5E 2E 67 3A 3D 66 5E 2E 67 5E 2E 67 3B 76 5E    v^.g:=f^.g^.g;v^
01F8B0:  2E 64 3A 3D 66 5E 2E 64 3B 76 5E 2E 6E 61 74 75    .d:=f^.d;v^.natu
01F8C0:  72 65 3A 3D 27 6D 75 6C 74 69 27 3B 76 5E 2E 76    re:='multi';v^.v
01F8D0:  61 6C 65 75 72 3A 3D 27 2A 27 3B 0D 0A 20 20 20    aleur:='*';..   
01F8E0:  20 20 66 5E 2E 64 3A 3D 66 5E 2E 67 5E 2E 64 3B      f^.d:=f^.g^.d;
01F8F0:  66 5E 2E 67 3A 3D 76 3B 73 69 6D 70 6C 69 66 28    f^.g:=v;simplif(
01F900:  66 5E 2E 67 29 3B 72 65 73 75 6C 74 3A 3D 31 0D    f^.g);result:=1.
01F910:  0A 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 65    .    end..     e
01F920:  6C 73 65 0D 0A 20 20 20 69 66 20 28 28 66 5E 2E    lse..   if ((f^.
01F930:  64 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 61 6E    d^.valeur='*')an
01F940:  64 28 66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D 27    d(f^.g^.valeur='
01F950:  2A 27 29 61 6E 64 28 66 5E 2E 67 5E 2E 67 5E 2E    *')and(f^.g^.g^.
01F960:  6E 61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 29    nature='nombre')
01F970:  0D 0A 20 20 20 61 6E 64 20 28 66 5E 2E 64 5E 2E    ..   and (f^.d^.
01F980:  67 5E 2E 6E 61 74 75 72 65 3D 27 6E 6F 6D 62 72    g^.nature='nombr
01F990:  65 27 29 29 0D 0A 20 20 20 74 68 65 6E 0D 0A 20    e'))..   then.. 
01F9A0:  20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 6E       begin..     n
01F9B0:  65 77 28 75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A    ew(u);u^.nature:
01F9C0:  3D 27 6D 75 6C 74 69 27 3B 75 5E 2E 76 61 6C 65    ='multi';u^.vale
01F9D0:  75 72 3A 3D 27 2A 27 3B 75 5E 2E 67 3A 3D 66 5E    ur:='*';u^.g:=f^
01F9E0:  2E 67 5E 2E 67 3B 75 5E 2E 64 3A 3D 66 5E 2E 64    .g^.g;u^.d:=f^.d
01F9F0:  5E 2E 67 3B 0D 0A 20 20 20 20 20 6E 65 77 28 76    ^.g;..     new(v
01FA00:  29 3B 76 5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75    );v^.nature:='mu
01FA10:  6C 74 69 27 3B 76 5E 2E 76 61 6C 65 75 72 3A 3D    lti';v^.valeur:=
01FA20:  27 2A 27 3B 76 5E 2E 67 3A 3D 66 5E 2E 67 5E 2E    '*';v^.g:=f^.g^.
01FA30:  64 3B 76 5E 2E 64 3A 3D 66 5E 2E 64 5E 2E 64 3B    d;v^.d:=f^.d^.d;
01FA40:  0D 0A 20 20 20 20 20 66 5E 2E 67 3A 3D 75 3B 66    ..     f^.g:=u;f
01FA50:  5E 2E 64 3A 3D 76 3B 73 69 6D 70 6C 69 66 28 66    ^.d:=v;simplif(f
01FA60:  5E 2E 67 29 3B 72 65 73 75 6C 74 3A 3D 31 0D 0A    ^.g);result:=1..
01FA70:  20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 65 6C        end..     el
01FA80:  73 65 0D 0A 20 20 20 69 66 20 28 28 28 66 5E 2E    se..   if (((f^.
01FA90:  67 5E 2E 76 61 6C 65 75 72 3D 27 78 27 29 20 6F    g^.valeur='x') o
01FAA0:  72 20 28 28 66 5E 2E 67 5E 2E 76 61 6C 65 75 72    r ((f^.g^.valeur
01FAB0:  3D 27 5E 27 29 20 61 6E 64 20 28 66 5E 2E 67 5E    ='^') and (f^.g^
01FAC0:  2E 67 5E 2E 76 61 6C 65 75 72 3D 27 78 27 29 29    .g^.valeur='x'))
01FAD0:  29 0D 0A 20 20 20 61 6E 64 20 28 28 66 5E 2E 64    )..   and ((f^.d
01FAE0:  5E 2E 76 61 6C 65 75 72 3D 27 78 27 29 20 6F 72    ^.valeur='x') or
01FAF0:  20 28 28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D     ((f^.d^.valeur=
01FB00:  27 5E 27 29 20 61 6E 64 20 28 66 5E 2E 64 5E 2E    '^') and (f^.d^.
01FB10:  67 5E 2E 76 61 6C 65 75 72 3D 27 78 27 29 29 29    g^.valeur='x')))
01FB20:  29 0D 0A 20 20 20 74 68 65 6E 0D 0A 20 20 20 20    )..   then..    
01FB30:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 66      begin..      f
01FB40:  5E 2E 6E 61 74 75 72 65 3A 3D 27 70 75 69 73 73    ^.nature:='puiss
01FB50:  27 3B 66 5E 2E 76 61 6C 65 75 72 3A 3D 27 5E 27    ';f^.valeur:='^'
01FB60:  3B 0D 0A 20 20 20 20 20 20 6E 65 77 28 75 29 3B    ;..      new(u);
01FB70:  75 5E 2E 6E 61 74 75 72 65 3A 3D 27 70 6C 75 73    u^.nature:='plus
01FB80:  27 3B 75 5E 2E 76 61 6C 65 75 72 3A 3D 27 2B 27    ';u^.valeur:='+'
01FB90:  3B 0D 0A 20 20 20 20 20 20 69 66 20 66 5E 2E 67    ;..      if f^.g
01FBA0:  5E 2E 76 61 6C 65 75 72 3D 27 78 27 20 74 68 65    ^.valeur='x' the
01FBB0:  6E 20 62 65 67 69 6E 20 6E 65 77 28 76 29 3B 76    n begin new(v);v
01FBC0:  5E 2E 6E 61 74 75 72 65 3A 3D 27 6E 6F 6D 62 72    ^.nature:='nombr
01FBD0:  65 27 3B 0D 0A 20 20 20 20 20 20 76 5E 2E 76 61    e';..      v^.va
01FBE0:  6C 65 75 72 3A 3D 27 31 27 3B 76 5E 2E 64 3A 3D    leur:='1';v^.d:=
01FBF0:  6E 69 6C 3B 76 5E 2E 67 3A 3D 6E 69 6C 3B 75 5E    nil;v^.g:=nil;u^
01FC00:  2E 67 3A 3D 76 20 65 6E 64 0D 0A 20 20 20 20 20    .g:=v end..     
01FC10:  20 65 6C 73 65 20 75 5E 2E 67 3A 3D 66 5E 2E 67     else u^.g:=f^.g
01FC20:  5E 2E 64 3B 0D 0A 20 20 20 20 20 20 69 66 20 66    ^.d;..      if f
01FC30:  5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 78 27 20    ^.d^.valeur='x' 
01FC40:  74 68 65 6E 20 62 65 67 69 6E 20 6E 65 77 28 76    then begin new(v
01FC50:  29 3B 76 5E 2E 6E 61 74 75 72 65 3A 3D 27 6E 6F    );v^.nature:='no
01FC60:  6D 62 72 65 27 3B 0D 0A 20 20 20 20 20 20 76 5E    mbre';..      v^
01FC70:  2E 76 61 6C 65 75 72 3A 3D 27 31 27 3B 76 5E 2E    .valeur:='1';v^.
01FC80:  67 3A 3D 6E 69 6C 3B 76 5E 2E 64 3A 3D 6E 69 6C    g:=nil;v^.d:=nil
01FC90:  3B 75 5E 2E 64 3A 3D 76 3B 66 5E 2E 67 3A 3D 66    ;u^.d:=v;f^.g:=f
01FCA0:  5E 2E 64 20 65 6E 64 0D 0A 20 20 20 20 20 20 65    ^.d end..      e
01FCB0:  6C 73 65 20 62 65 67 69 6E 20 75 5E 2E 64 3A 3D    lse begin u^.d:=
01FCC0:  66 5E 2E 64 5E 2E 64 3B 66 5E 2E 67 3A 3D 66 5E    f^.d^.d;f^.g:=f^
01FCD0:  2E 64 5E 2E 67 20 65 6E 64 3B 0D 0A 20 20 20 20    .d^.g end;..    
01FCE0:  20 20 66 5E 2E 64 3A 3D 75 3B 73 69 6D 70 6C 69      f^.d:=u;simpli
01FCF0:  66 28 66 5E 2E 64 29 3B 72 65 73 75 6C 74 3A 3D    f(f^.d);result:=
01FD00:  31 0D 0A 20 20 20 20 20 20 65 6E 64 0D 0A 20 20    1..      end..  
01FD10:  20 65 6C 73 65 0D 0A 20 20 20 69 66 20 28 28 66     else..   if ((f
01FD20:  5E 2E 67 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29    ^.g^.valeur='*')
01FD30:  20 61 6E 64 20 28 28 66 5E 2E 64 5E 2E 76 61 6C     and ((f^.d^.val
01FD40:  65 75 72 3D 27 78 27 29 20 6F 72 20 28 66 5E 2E    eur='x') or (f^.
01FD50:  64 5E 2E 76 61 6C 65 75 72 3D 27 5E 27 29 29 29    d^.valeur='^')))
01FD60:  0D 0A 20 20 20 74 68 65 6E 0D 0A 20 20 20 62 65    ..   then..   be
01FD70:  67 69 6E 20 20 6F 72 64 72 65 28 66 5E 2E 67 29    gin  ordre(f^.g)
01FD80:  3B 6E 65 77 28 75 29 3B 75 5E 2E 6E 61 74 75 72    ;new(u);u^.natur
01FD90:  65 3A 3D 27 6D 75 6C 74 69 27 3B 75 5E 2E 76 61    e:='multi';u^.va
01FDA0:  6C 65 75 72 3A 3D 27 2A 27 3B 0D 0A 20 20 20 75    leur:='*';..   u
01FDB0:  5E 2E 64 3A 3D 66 5E 2E 64 3B 75 5E 2E 67 3A 3D    ^.d:=f^.d;u^.g:=
01FDC0:  66 5E 2E 67 5E 2E 64 3B 66 5E 2E 64 3A 3D 75 3B    f^.g^.d;f^.d:=u;
01FDD0:  66 5E 2E 67 3A 3D 66 5E 2E 67 5E 2E 67 3B 70 72    f^.g:=f^.g^.g;pr
01FDE0:  6F 64 75 69 74 28 66 5E 2E 64 29 3B 6F 72 64 72    oduit(f^.d);ordr
01FDF0:  65 28 66 29 0D 0A 20 20 20 65 6E 64 0D 0A 20 20    e(f)..   end..  
01FE00:  20 65 6C 73 65 0D 0A 20 62 65 67 69 6E 0D 0A 20     else.. begin.. 
01FE10:  20 69 66 20 66 5E 2E 67 3C 3E 6E 69 6C 20 74 68     if f^.g<>nil th
01FE20:  65 6E 20 70 72 6F 64 75 69 74 28 66 5E 2E 67 29    en produit(f^.g)
01FE30:  3B 69 66 20 66 5E 2E 64 3C 3E 6E 69 6C 20 74 68    ;if f^.d<>nil th
01FE40:  65 6E 20 70 72 6F 64 75 69 74 28 66 5E 2E 64 29    en produit(f^.d)
01FE50:  3B 0D 0A 65 6E 64 0D 0A 65 6E 64 0D 0A 20 65 6C    ;..end..end.. el
01FE60:  73 65 0D 0A 20 62 65 67 69 6E 0D 0A 20 20 69 66    se.. begin..  if
01FE70:  20 66 5E 2E 67 3C 3E 6E 69 6C 20 74 68 65 6E 20     f^.g<>nil then 
01FE80:  70 72 6F 64 75 69 74 28 66 5E 2E 67 29 3B 69 66    produit(f^.g);if
01FE90:  20 66 5E 2E 64 3C 3E 6E 69 6C 20 74 68 65 6E 20     f^.d<>nil then 
01FEA0:  70 72 6F 64 75 69 74 28 66 5E 2E 64 29 3B 0D 0A    produit(f^.d);..
01FEB0:  20 65 6E 64 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 0D     end;..end;.....
01FEC0:  0A 70 72 6F 63 65 64 75 72 65 20 6F 72 64 72 65    .procedure ordre
01FED0:  3B 0D 0A 76 61 72 0D 0A 75 3A 66 6F 6E 63 74 69    ;..var..u:foncti
01FEE0:  6F 6E 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 69 66    on;..begin..  if
01FEF0:  20 28 28 66 5E 2E 76 61 6C 65 75 72 3D 27 2B 27     ((f^.valeur='+'
01FF00:  29 6F 72 28 66 5E 2E 76 61 6C 65 75 72 3D 27 2D    )or(f^.valeur='-
01FF10:  27 29 29 20 74 68 65 6E 0D 0A 20 20 62 65 67 69    ')) then..  begi
01FF20:  6E 0D 0A 20 20 20 20 20 69 66 20 66 5E 2E 76 61    n..     if f^.va
01FF30:  6C 65 75 72 3D 27 2D 27 20 74 68 65 6E 20 62 65    leur='-' then be
01FF40:  67 69 6E 20 66 5E 2E 6E 61 74 75 72 65 3A 3D 27    gin f^.nature:='
01FF50:  70 6C 75 73 27 3B 66 5E 2E 76 61 6C 65 75 72 3A    plus';f^.valeur:
01FF60:  3D 27 2B 27 3B 0D 0A 20 20 20 20 20 20 20 20 20    ='+';..         
01FF70:  20 20 20 20 20 20 20 20 20 20 20 66 5E 2E 64 3A               f^.d:
01FF80:  3D 6F 70 70 6F 73 65 28 66 5E 2E 64 29 3B 65 6E    =oppose(f^.d);en
01FF90:  64 3B 0D 0A 20 20 69 66 20 28 28 28 66 5E 2E 67    d;..  if (((f^.g
01FFA0:  5E 2E 76 61 6C 65 75 72 3D 27 2B 27 29 6F 72 20    ^.valeur='+')or 
01FFB0:  28 66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D 27 2D    (f^.g^.valeur='-
01FFC0:  27 29 29 0D 0A 20 20 61 6E 64 28 28 66 5E 2E 64    '))..  and((f^.d
01FFD0:  5E 2E 76 61 6C 65 75 72 3D 27 2B 27 29 6F 72 28    ^.valeur='+')or(
01FFE0:  66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 2D 27    f^.d^.valeur='-'
01FFF0:  29 29 29 20 74 68 65 6E 0D 0A 20 20 62 65 67 69    ))) then..  begi
020000:  6E 0D 0A 20 20 20 6F 72 64 72 65 28 66 5E 2E 64    n..   ordre(f^.d
020010:  29 3B 6F 72 64 72 65 28 66 5E 2E 67 29 3B 0D 0A    );ordre(f^.g);..
020020:  20 20 20 69 66 20 28 28 6D 6F 6E 6F 6D 65 28 66       if ((monome(f
020030:  5E 2E 67 5E 2E 64 29 3E 3D 30 29 61 6E 64 28 6D    ^.g^.d)>=0)and(m
020040:  6F 6E 6F 6D 65 28 66 5E 2E 67 5E 2E 64 29 3C 6D    onome(f^.g^.d)<m
020050:  6F 6E 6F 6D 65 28 66 5E 2E 64 5E 2E 67 29 29 29    onome(f^.d^.g)))
020060:  20 74 68 65 6E 0D 0A 20 20 20 20 62 65 67 69 6E     then..    begin
020070:  0D 0A 20 20 20 20 69 66 20 66 5E 2E 67 5E 2E 76    ..    if f^.g^.v
020080:  61 6C 65 75 72 3D 27 2D 27 20 74 68 65 6E 20 62    aleur='-' then b
020090:  65 67 69 6E 20 66 5E 2E 67 5E 2E 6E 61 74 75 72    egin f^.g^.natur
0200A0:  65 3A 3D 27 70 6C 75 73 27 3B 66 5E 2E 67 5E 2E    e:='plus';f^.g^.
0200B0:  76 61 6C 65 75 72 3A 3D 27 2B 27 3B 0D 0A 20 20    valeur:='+';..  
0200C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0200D0:  20 20 66 5E 2E 67 5E 2E 64 3A 3D 6F 70 70 6F 73      f^.g^.d:=oppos
0200E0:  65 28 66 5E 2E 67 5E 2E 64 29 3B 65 6E 64 3B 0D    e(f^.g^.d);end;.
0200F0:  0A 20 20 20 20 69 66 20 66 5E 2E 64 5E 2E 76 61    .    if f^.d^.va
020100:  6C 65 75 72 3D 27 2D 27 20 74 68 65 6E 20 62 65    leur='-' then be
020110:  67 69 6E 20 66 5E 2E 64 5E 2E 6E 61 74 75 72 65    gin f^.d^.nature
020120:  3A 3D 27 70 6C 75 73 27 3B 66 5E 2E 64 5E 2E 76    :='plus';f^.d^.v
020130:  61 6C 65 75 72 3A 3D 27 2B 27 3B 0D 0A 20 20 20    aleur:='+';..   
020140:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020150:  20 66 5E 2E 64 5E 2E 64 3A 3D 6F 70 70 6F 73 65     f^.d^.d:=oppose
020160:  28 66 5E 2E 64 5E 2E 64 29 3B 20 65 6E 64 3B 0D    (f^.d^.d); end;.
020170:  0A 20 20 20 20 6E 65 77 28 75 29 3B 75 5E 2E 6E    .    new(u);u^.n
020180:  61 74 75 72 65 3A 3D 27 70 6C 75 73 27 3B 75 5E    ature:='plus';u^
020190:  2E 76 61 6C 65 75 72 3A 3D 27 2B 27 3B 6E 65 77    .valeur:='+';new
0201A0:  28 75 5E 2E 64 29 3B 75 5E 2E 64 5E 2E 6E 61 74    (u^.d);u^.d^.nat
0201B0:  75 72 65 3A 3D 27 70 6C 75 73 27 3B 0D 0A 20 20    ure:='plus';..  
0201C0:  20 20 75 5E 2E 64 5E 2E 76 61 6C 65 75 72 3A 3D      u^.d^.valeur:=
0201D0:  27 2B 27 3B 75 5E 2E 64 5E 2E 64 3A 3D 66 5E 2E    '+';u^.d^.d:=f^.
0201E0:  64 5E 2E 64 3B 75 5E 2E 64 5E 2E 67 3A 3D 66 5E    d^.d;u^.d^.g:=f^
0201F0:  2E 67 5E 2E 64 3B 6E 65 77 28 75 5E 2E 67 29 3B    .g^.d;new(u^.g);
020200:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
020210:  1B 00 00 00 02 09 4E E5 1B 00 41 02 00 00 00 02    ......N...A.....
020220:  1B 00 42 02 00 00 00 02 1B 00 43 02 00 00 00 02    ..B.......C.....
020230:  1B 00 44 02 00 00 00 02 1B 00 45 02 00 00 00 02    ..D.......E.....
020240:  1B 00 46 02 00 00 00 02 1B 00 47 02 00 00 00 02    ..F.......G.....
020250:  1B 00 48 02 00 00 00 02 1B 00 49 02 00 00 00 02    ..H.......I.....
020260:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
020270:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
020280:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
020290:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0202A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0202B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0202C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0202D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0202E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0202F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
020300:  0D 0A 20 20 20 20 75 5E 2E 67 5E 2E 76 61 6C 65    ..    u^.g^.vale
020310:  75 72 3A 3D 27 2B 27 3B 75 5E 2E 67 5E 2E 6E 61    ur:='+';u^.g^.na
020320:  74 75 72 65 3A 3D 27 70 6C 75 73 27 3B 75 5E 2E    ture:='plus';u^.
020330:  67 5E 2E 67 3A 3D 66 5E 2E 67 5E 2E 67 3B 75 5E    g^.g:=f^.g^.g;u^
020340:  2E 67 5E 2E 64 3A 3D 66 5E 2E 64 5E 2E 67 3B 0D    .g^.d:=f^.d^.g;.
020350:  0A 20 20 20 20 75 3A 3D 66 3B 72 65 73 75 6C 74    .    u:=f;result
020360:  3A 3D 31 3B 0D 0A 20 20 20 20 65 6E 64 3B 0D 0A    :=1;..    end;..
020370:  20 20 65 6E 64 0D 0A 20 20 65 6C 73 65 0D 0A 69      end..  else..i
020380:  66 20 28 28 66 5E 2E 76 61 6C 65 75 72 3D 27 2B    f ((f^.valeur='+
020390:  27 29 6F 72 28 66 5E 2E 76 61 6C 65 75 72 3D 27    ')or(f^.valeur='
0203A0:  2D 27 29 29 61 6E 64 28 28 66 5E 2E 67 5E 2E 76    -'))and((f^.g^.v
0203B0:  61 6C 65 75 72 3D 27 2B 27 29 6F 72 28 66 5E 2E    aleur='+')or(f^.
0203C0:  67 5E 2E 76 61 6C 65 75 72 3D 27 2D 27 29 29 0D    g^.valeur='-')).
0203D0:  0A 20 74 68 65 6E 20 62 65 67 69 6E 0D 0A 20 20    . then begin..  
0203E0:  6F 72 64 72 65 28 66 5E 2E 67 29 3B 0D 0A 20 20    ordre(f^.g);..  
0203F0:  69 66 20 28 28 6D 6F 6E 6F 6D 65 28 66 5E 2E 67    if ((monome(f^.g
020400:  5E 2E 64 29 3E 3D 30 29 61 6E 64 20 28 6D 6F 6E    ^.d)>=0)and (mon
020410:  6F 6D 65 28 66 5E 2E 67 5E 2E 64 29 3C 6D 6F 6E    ome(f^.g^.d)<mon
020420:  6F 6D 65 28 66 5E 2E 64 29 29 29 20 74 68 65 6E    ome(f^.d))) then
020430:  0D 0A 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 69    ..   begin..   i
020440:  66 20 66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D 27    f f^.g^.valeur='
020450:  2D 27 20 74 68 65 6E 20 62 65 67 69 6E 20 66 5E    -' then begin f^
020460:  2E 67 5E 2E 6E 61 74 75 72 65 3A 3D 27 70 6C 75    .g^.nature:='plu
020470:  73 27 3B 66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3A    s';f^.g^.valeur:
020480:  3D 27 2B 27 3B 0D 0A 20 20 20 20 20 20 20 20 20    ='+';..         
020490:  20 20 20 20 20 20 20 20 20 20 20 66 5E 2E 67 5E               f^.g^
0204A0:  2E 64 3A 3D 6F 70 70 6F 73 65 28 66 5E 2E 67 5E    .d:=oppose(f^.g^
0204B0:  2E 64 29 3B 20 65 6E 64 3B 0D 0A 20 20 20 6E 65    .d); end;..   ne
0204C0:  77 28 75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D    w(u);u^.nature:=
0204D0:  27 70 6C 75 73 27 3B 75 5E 2E 76 61 6C 65 75 72    'plus';u^.valeur
0204E0:  3A 3D 27 2B 27 3B 75 5E 2E 67 3A 3D 66 5E 2E 67    :='+';u^.g:=f^.g
0204F0:  5E 2E 67 3B 75 5E 2E 64 3A 3D 66 5E 2E 64 3B 0D    ^.g;u^.d:=f^.d;.
020500:  0A 20 20 20 66 5E 2E 64 3A 3D 66 5E 2E 67 5E 2E    .   f^.d:=f^.g^.
020510:  64 3B 66 5E 2E 67 3A 3D 75 3B 72 65 73 75 6C 74    d;f^.g:=u;result
020520:  3A 3D 31 3B 0D 0A 20 20 20 65 6E 64 3B 0D 0A 20    :=1;..   end;.. 
020530:  20 20 65 6E 64 0D 0A 20 20 20 65 6C 73 65 0D 0A      end..   else..
020540:  20 20 20 69 66 20 28 28 66 5E 2E 76 61 6C 65 75       if ((f^.valeu
020550:  72 3D 27 2B 27 29 6F 72 28 66 5E 2E 76 61 6C 65    r='+')or(f^.vale
020560:  75 72 3D 27 2D 27 29 29 61 6E 64 28 28 66 5E 2E    ur='-'))and((f^.
020570:  64 5E 2E 76 61 6C 65 75 72 3D 27 2B 27 29 6F 72    d^.valeur='+')or
020580:  28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 2D    (f^.d^.valeur='-
020590:  27 29 29 0D 0A 20 74 68 65 6E 20 62 65 67 69 6E    ')).. then begin
0205A0:  0D 0A 20 20 6F 72 64 72 65 28 66 5E 2E 64 29 3B    ..  ordre(f^.d);
0205B0:  0D 0A 20 20 69 66 20 28 28 6D 6F 6E 6F 6D 65 28    ..  if ((monome(
0205C0:  66 5E 2E 67 29 3E 3D 30 29 61 6E 64 20 28 6D 6F    f^.g)>=0)and (mo
0205D0:  6E 6F 6D 65 28 66 5E 2E 67 29 3C 6D 6F 6E 6F 6D    nome(f^.g)<monom
0205E0:  65 28 66 5E 2E 64 5E 2E 67 29 29 29 20 74 68 65    e(f^.d^.g))) the
0205F0:  6E 0D 0A 20 20 20 62 65 67 69 6E 0D 0A 20 20 20    n..   begin..   
020600:  69 66 20 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D    if f^.d^.valeur=
020610:  27 2D 27 20 74 68 65 6E 20 62 65 67 69 6E 20 66    '-' then begin f
020620:  5E 2E 64 5E 2E 6E 61 74 75 72 65 3A 3D 27 70 6C    ^.d^.nature:='pl
020630:  75 73 27 3B 66 5E 2E 64 5E 2E 76 61 6C 65 75 72    us';f^.d^.valeur
020640:  3A 3D 27 2B 27 3B 0D 0A 20 20 20 20 20 20 20 20    :='+';..        
020650:  20 20 20 20 20 20 20 20 20 20 20 20 66 5E 2E 64                f^.d
020660:  5E 2E 64 3A 3D 6F 70 70 6F 73 65 28 66 5E 2E 64    ^.d:=oppose(f^.d
020670:  5E 2E 64 29 3B 20 65 6E 64 3B 0D 0A 20 20 20 75    ^.d); end;..   u
020680:  3A 3D 66 5E 2E 67 3B 66 5E 2E 67 3A 3D 66 5E 2E    :=f^.g;f^.g:=f^.
020690:  64 5E 2E 67 3B 66 5E 2E 64 5E 2E 67 3A 3D 75 3B    d^.g;f^.d^.g:=u;
0206A0:  72 65 64 75 69 72 65 28 66 5E 2E 64 29 3B 0D 0A    reduire(f^.d);..
0206B0:  20 20 20 75 3A 3D 66 5E 2E 64 3B 66 5E 2E 64 3A       u:=f^.d;f^.d:
0206C0:  3D 66 5E 2E 67 3B 66 5E 2E 67 3A 3D 75 3B 72 65    =f^.g;f^.g:=u;re
0206D0:  73 75 6C 74 3A 3D 31 3B 0D 0A 20 20 20 65 6E 64    sult:=1;..   end
0206E0:  3B 0D 0A 20 20 20 65 6E 64 0D 0A 20 20 20 65 6C    ;..   end..   el
0206F0:  73 65 0D 0A 20 20 69 66 20 28 28 28 66 5E 2E 76    se..  if (((f^.v
020700:  61 6C 65 75 72 3D 27 2B 27 29 6F 72 28 66 5E 2E    aleur='+')or(f^.
020710:  76 61 6C 65 75 72 3D 27 2D 27 29 29 61 6E 64 20    valeur='-'))and 
020720:  28 6D 6F 6E 6F 6D 65 28 66 5E 2E 67 29 3E 3D 30    (monome(f^.g)>=0
020730:  29 0D 0A 20 20 61 6E 64 20 28 6D 6F 6E 6F 6D 65    )..  and (monome
020740:  28 66 5E 2E 67 29 3C 6D 6F 6E 6F 6D 65 28 66 5E    (f^.g)<monome(f^
020750:  2E 64 29 29 29 20 74 68 65 6E 0D 0A 20 20 20 62    .d))) then..   b
020760:  65 67 69 6E 0D 0A 20 20 20 20 75 3A 3D 66 5E 2E    egin..    u:=f^.
020770:  64 3B 66 5E 2E 64 3A 3D 66 5E 2E 67 3B 66 5E 2E    d;f^.d:=f^.g;f^.
020780:  67 3A 3D 75 3B 72 65 73 75 6C 74 3A 3D 31 3B 0D    g:=u;result:=1;.
020790:  0A 20 20 65 6E 64 3B 0D 0A 20 20 65 6E 64 0D 0A    .  end;..  end..
0207A0:  20 20 65 6C 73 65 0D 0A 20 20 20 20 69 66 20 20      else..    if  
0207B0:  28 28 66 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29    ((f^.valeur='*')
0207C0:  20 61 6E 64 20 28 28 66 5E 2E 67 5E 2E 76 61 6C     and ((f^.g^.val
0207D0:  65 75 72 3D 27 78 27 29 20 6F 72 20 28 28 66 5E    eur='x') or ((f^
0207E0:  2E 67 5E 2E 76 61 6C 65 75 72 3D 27 5E 27 29 20    .g^.valeur='^') 
0207F0:  61 6E 64 0D 0A 20 20 28 66 5E 2E 67 5E 2E 67 5E    and..  (f^.g^.g^
020800:  2E 76 61 6C 65 75 72 3D 27 78 27 29 29 29 29 20    .valeur='x')))) 
020810:  74 68 65 6E 0D 0A 20 20 20 62 65 67 69 6E 0D 0A    then..   begin..
020820:  20 20 20 20 69 66 20 66 5E 2E 76 61 6C 65 75 72        if f^.valeur
020830:  3D 27 2D 27 20 74 68 65 6E 20 62 65 67 69 6E 20    ='-' then begin 
020840:  66 5E 2E 6E 61 74 75 72 65 3A 3D 27 70 6C 75 73    f^.nature:='plus
020850:  27 3B 66 5E 2E 76 61 6C 65 75 72 3A 3D 27 2B 27    ';f^.valeur:='+'
020860:  3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    ;..             
020870:  20 20 20 20 20 20 20 66 5E 2E 64 3A 3D 6F 70 70           f^.d:=opp
020880:  6F 73 65 28 66 5E 2E 64 29 3B 65 6E 64 3B 0D 0A    ose(f^.d);end;..
020890:  20 20 20 20 75 3A 3D 66 5E 2E 64 3B 66 5E 2E 64        u:=f^.d;f^.d
0208A0:  3A 3D 66 5E 2E 67 3B 66 5E 2E 67 3A 3D 75 3B 72    :=f^.g;f^.g:=u;r
0208B0:  65 73 75 6C 74 3A 3D 31 3B 0D 0A 20 20 65 6E 64    esult:=1;..  end
0208C0:  3B 0D 0A 20 20 69 66 20 66 5E 2E 64 3C 3E 6E 69    ;..  if f^.d<>ni
0208D0:  6C 20 74 68 65 6E 20 6F 72 64 72 65 28 66 5E 2E    l then ordre(f^.
0208E0:  64 29 3B 0D 0A 20 20 69 66 20 66 5E 2E 67 3C 3E    d);..  if f^.g<>
0208F0:  6E 69 6C 20 74 68 65 6E 20 6F 72 64 72 65 28 66    nil then ordre(f
020900:  5E 2E 67 29 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 0D    ^.g);..end;.....
020910:  0A 66 75 6E 63 74 69 6F 6E 20 20 20 20 6D 6F 6E    .function    mon
020920:  6F 6D 65 3B 0D 0A 76 61 72 0D 0A 64 65 67 72 65    ome;..var..degre
020930:  2C 72 65 73 75 6C 74 61 74 3A 69 6E 74 65 67 65    ,resultat:intege
020940:  72 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 69 66 20    r;..begin..  if 
020950:  66 5E 2E 76 61 6C 65 75 72 3D 27 2A 27 20 74 68    f^.valeur='*' th
020960:  65 6E 0D 0A 20 20 20 62 65 67 69 6E 0D 0A 20 20    en..   begin..  
020970:  20 20 69 66 20 28 28 66 5E 2E 67 5E 2E 6E 61 74      if ((f^.g^.nat
020980:  75 72 65 3D 27 6E 6F 6D 62 72 65 27 29 20 61 6E    ure='nombre') an
020990:  64 20 28 66 5E 2E 64 5E 2E 6E 61 74 75 72 65 3D    d (f^.d^.nature=
0209A0:  27 6E 6F 6D 62 72 65 27 29 29 20 74 68 65 6E 0D    'nombre')) then.
0209B0:  0A 20 20 20 20 6D 6F 6E 6F 6D 65 3A 3D 30 0D 0A    .    monome:=0..
0209C0:  20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 69 66        else..    if
0209D0:  20 28 28 66 5E 2E 67 5E 2E 6E 61 74 75 72 65 3D     ((f^.g^.nature=
0209E0:  27 6E 6F 6D 62 72 65 27 29 20 61 6E 64 20 28 66    'nombre') and (f
0209F0:  5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 78 27 29    ^.d^.valeur='x')
020A00:  29 20 74 68 65 6E 0D 0A 20 20 20 20 6D 6F 6E 6F    ) then..    mono
020A10:  6D 65 3A 3D 31 0D 0A 20 20 20 20 65 6C 73 65 0D    me:=1..    else.
020A20:  0A 20 20 20 20 69 66 20 28 28 66 5E 2E 67 5E 2E    .    if ((f^.g^.
020A30:  6E 61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 29    nature='nombre')
020A40:  20 61 6E 64 20 28 66 5E 2E 64 5E 2E 76 61 6C 65     and (f^.d^.vale
020A50:  75 72 3D 27 5E 27 29 20 61 6E 64 20 28 66 5E 2E    ur='^') and (f^.
020A60:  64 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D 27 78 27    d^.g^.valeur='x'
020A70:  29 29 0D 0A 20 20 20 20 74 68 65 6E 0D 0A 20 20    ))..    then..  
020A80:  20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20       begin..      
020A90:  76 61 6C 28 66 5E 2E 64 5E 2E 64 5E 2E 76 61 6C    val(f^.d^.d^.val
020AA0:  65 75 72 2C 64 65 67 72 65 2C 72 65 73 75 6C 74    eur,degre,result
020AB0:  61 74 29 3B 0D 0A 20 20 20 20 20 20 69 66 20 72    at);..      if r
020AC0:  65 73 75 6C 74 61 74 3D 30 20 74 68 65 6E 20 6D    esultat=0 then m
020AD0:  6F 6E 6F 6D 65 3A 3D 64 65 67 72 65 20 65 6C 73    onome:=degre els
020AE0:  65 20 6D 6F 6E 6F 6D 65 3A 3D 2D 31 3B 0D 0A 20    e monome:=-1;.. 
020AF0:  20 20 20 20 65 6E 64 0D 0A 20 20 20 20 65 6C 73        end..    els
020B00:  65 0D 0A 20 20 20 20 20 6D 6F 6E 6F 6D 65 3A 3D    e..     monome:=
020B10:  2D 31 0D 0A 20 20 20 65 6E 64 0D 0A 20 20 20 20    -1..   end..    
020B20:  65 6C 73 65 0D 0A 20 20 69 66 20 66 5E 2E 76 61    else..  if f^.va
020B30:  6C 65 75 72 3D 27 78 27 20 74 68 65 6E 20 6D 6F    leur='x' then mo
020B40:  6E 6F 6D 65 3A 3D 31 0D 0A 20 20 20 20 65 6C 73    nome:=1..    els
020B50:  65 0D 0A 20 20 69 66 20 66 5E 2E 6E 61 74 75 72    e..  if f^.natur
020B60:  65 3D 27 6E 6F 6D 62 72 65 27 20 74 68 65 6E 20    e='nombre' then 
020B70:  6D 6F 6E 6F 6D 65 3A 3D 30 0D 0A 20 20 20 20 65    monome:=0..    e
020B80:  6C 73 65 0D 0A 20 20 69 66 20 28 28 66 5E 2E 76    lse..  if ((f^.v
020B90:  61 6C 65 75 72 3D 27 5E 27 29 20 61 6E 64 20 28    aleur='^') and (
020BA0:  66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D 27 78 27    f^.g^.valeur='x'
020BB0:  29 20 61 6E 64 20 28 66 5E 2E 64 5E 2E 6E 61 74    ) and (f^.d^.nat
020BC0:  75 72 65 3D 27 6E 6F 6D 62 72 65 27 29 29 20 74    ure='nombre')) t
020BD0:  68 65 6E 0D 0A 20 20 20 62 65 67 69 6E 0D 0A 20    hen..   begin.. 
020BE0:  20 20 20 20 76 61 6C 28 66 5E 2E 64 5E 2E 76 61        val(f^.d^.va
020BF0:  6C 65 75 72 2C 64 65 67 72 65 2C 72 65 73 75 6C    leur,degre,resul
020C00:  74 61 74 29 3B 0D 0A 20 20 20 20 20 69 66 20 72    tat);..     if r
020C10:  65 73 75 6C 74 61 74 3D 30 20 74 68 65 6E 20 6D    esultat=0 then m
020C20:  6F 6E 6F 6D 65 3A 3D 64 65 67 72 65 20 65 6C 73    onome:=degre els
020C30:  65 20 6D 6F 6E 6F 6D 65 3A 3D 2D 31 3B 0D 0A 20    e monome:=-1;.. 
020C40:  20 20 65 6E 64 0D 0A 20 20 20 20 65 6C 73 65 0D      end..    else.
020C50:  0A 20 20 20 6D 6F 6E 6F 6D 65 3A 3D 2D 31 3B 0D    .   monome:=-1;.
020C60:  0A 20 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64    . end;....proced
020C70:  75 72 65 20 20 20 70 6F 6C 79 6E 6F 6D 65 28 76    ure   polynome(v
020C80:  61 72 20 66 3A 66 6F 6E 63 74 69 6F 6E 29 3B 0D    ar f:fonction);.
020C90:  0A 76 61 72 0D 0A 75 2C 76 3A 66 6F 6E 63 74 69    .var..u,v:foncti
020CA0:  6F 6E 3B 0D 0A 62 65 67 69 6E 0D 0A 20 69 66 20    on;..begin.. if 
020CB0:  66 3C 3E 6E 69 6C 20 74 68 65 6E 0D 0A 20 62 65    f<>nil then.. be
020CC0:  67 69 6E 0D 0A 20 69 66 20 28 28 66 5E 2E 76 61    gin.. if ((f^.va
020CD0:  6C 65 75 72 3D 27 2B 27 29 20 6F 72 20 28 66 5E    leur='+') or (f^
020CE0:  2E 76 61 6C 65 75 72 3D 27 2D 27 29 29 20 74 68    .valeur='-')) th
020CF0:  65 6E 0D 0A 20 62 65 67 69 6E 0D 0A 20 72 65 64    en.. begin.. red
020D00:  75 69 72 65 28 66 29 3B 69 66 20 66 5E 2E 64 3C    uire(f);if f^.d<
020D10:  3E 6E 69 6C 20 74 68 65 6E 20 6F 72 64 72 65 28    >nil then ordre(
020D20:  66 5E 2E 64 29 3B 69 66 20 66 5E 2E 67 3C 3E 6E    f^.d);if f^.g<>n
020D30:  69 6C 20 74 68 65 6E 20 6F 72 64 72 65 28 66 5E    il then ordre(f^
020D40:  2E 67 29 3B 0D 0A 20 69 66 20 66 5E 2E 76 61 6C    .g);.. if f^.val
020D50:  65 75 72 3D 27 2D 27 20 74 68 65 6E 20 62 65 67    eur='-' then beg
020D60:  69 6E 20 66 5E 2E 76 61 6C 65 75 72 3A 3D 27 2B    in f^.valeur:='+
020D70:  27 3B 66 5E 2E 6E 61 74 75 72 65 3A 3D 27 70 6C    ';f^.nature:='pl
020D80:  75 73 27 3B 0D 0A 20 20 20 20 20 20 20 20 20 20    us';..          
020D90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020DA0:  20 20 20 66 5E 2E 64 3A 3D 6F 70 70 6F 73 65 28       f^.d:=oppose(
020DB0:  66 5E 2E 64 29 3B 65 6E 64 3B 0D 0A 20 69 66 20    f^.d);end;.. if 
020DC0:  66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 2D 27    f^.d^.valeur='-'
020DD0:  20 74 68 65 6E 20 62 65 67 69 6E 20 66 5E 2E 64     then begin f^.d
020DE0:  5E 2E 64 3A 3D 6F 70 70 6F 73 65 28 66 5E 2E 64    ^.d:=oppose(f^.d
020DF0:  5E 2E 64 29 3B 66 5E 2E 64 5E 2E 76 61 6C 65 75    ^.d);f^.d^.valeu
020E00:  72 3A 3D 27 2B 27 3B 0D 0A 20 20 20 20 20 20 20    r:='+';..       
020E10:  20 20 20 20 20 20 20 20 20 20 66 5E 2E 64 5E 2E              f^.d^.
020E20:  6E 61 74 75 72 65 3A 3D 27 70 6C 75 73 27 3B 20    nature:='plus'; 
020E30:  65 6E 64 3B 0D 0A 20 20 69 66 20 66 5E 2E 67 5E    end;..  if f^.g^
020E40:  2E 76 61 6C 65 75 72 3D 27 2D 27 20 74 68 65 6E    .valeur='-' then
020E50:  20 62 65 67 69 6E 0D 0A 20 20 20 20 66 5E 2E 67     begin..    f^.g
020E60:  5E 2E 64 3A 3D 6F 70 70 6F 73 65 28 66 5E 2E 67    ^.d:=oppose(f^.g
020E70:  5E 2E 64 29 3B 66 5E 2E 67 5E 2E 6E 61 74 75 72    ^.d);f^.g^.natur
020E80:  65 3A 3D 27 70 6C 75 73 27 3B 66 5E 2E 67 5E 2E    e:='plus';f^.g^.
020E90:  76 61 6C 65 75 72 3A 3D 27 2B 27 3B 20 65 6E 64    valeur:='+'; end
020EA0:  3B 0D 0A 20 69 66 20 28 28 28 66 5E 2E 64 5E 2E    ;.. if (((f^.d^.
020EB0:  76 61 6C 65 75 72 3D 27 2B 27 29 20 6F 72 20 28    valeur='+') or (
020EC0:  66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 2D 27    f^.d^.valeur='-'
020ED0:  29 29 20 61 6E 64 0D 0A 20 28 28 66 5E 2E 67 5E    )) and.. ((f^.g^
020EE0:  2E 76 61 6C 65 75 72 3D 27 2B 27 29 20 6F 72 20    .valeur='+') or 
020EF0:  28 66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D 27 2D    (f^.g^.valeur='-
020F00:  27 29 29 29 20 74 68 65 6E 0D 0A 20 20 62 65 67    '))) then..  beg
020F10:  69 6E 0D 0A 20 20 6E 65 77 28 75 29 3B 75 5E 2E    in..  new(u);u^.
020F20:  6E 61 74 75 72 65 3A 3D 66 5E 2E 6E 61 74 75 72    nature:=f^.natur
020F30:  65 3B 75 5E 2E 76 61 6C 65 75 72 3A 3D 66 5E 2E    e;u^.valeur:=f^.
020F40:  76 61 6C 65 75 72 3B 75 5E 2E 67 3A 3D 66 5E 2E    valeur;u^.g:=f^.
020F50:  67 3B 75 5E 2E 64 3A 3D 66 5E 2E 64 5E 2E 67 3B    g;u^.d:=f^.d^.g;
020F60:  0D 0A 20 20 66 5E 2E 67 3A 3D 75 3B 66 5E 2E 64    ..  f^.g:=u;f^.d
020F70:  3A 3D 66 5E 2E 64 5E 2E 64 3B 72 65 73 75 6C 74    :=f^.d^.d;result
020F80:  3A 3D 31 3B 70 6F 6C 79 6E 6F 6D 65 28 66 5E 2E    :=1;polynome(f^.
020F90:  67 29 3B 0D 0A 20 20 65 6E 64 0D 0A 20 20 65 6C    g);..  end..  el
020FA0:  73 65 0D 0A 20 20 69 66 20 28 28 66 5E 2E 67 5E    se..  if ((f^.g^
020FB0:  2E 76 61 6C 65 75 72 3D 27 2B 27 29 20 6F 72 20    .valeur='+') or 
020FC0:  28 66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D 27 2D    (f^.g^.valeur='-
020FD0:  27 29 29 20 74 68 65 6E 0D 0A 20 20 62 65 67 69    ')) then..  begi
020FE0:  6E 0D 0A 20 20 20 69 66 20 28 28 6D 6F 6E 6F 6D    n..   if ((monom
020FF0:  65 28 66 5E 2E 64 29 3E 3D 30 29 20 61 6E 64 20    e(f^.d)>=0) and 
021000:  28 6D 6F 6E 6F 6D 65 28 66 5E 2E 64 29 3D 6D 6F    (monome(f^.d)=mo
021010:  6E 6F 6D 65 28 66 5E 2E 67 5E 2E 64 29 29 29 20    nome(f^.g^.d))) 
021020:  74 68 65 6E 0D 0A 20 20 20 62 65 67 69 6E 0D 0A    then..   begin..
021030:  20 20 20 20 75 3A 3D 66 5E 2E 64 3B 66 5E 2E 64        u:=f^.d;f^.d
021040:  3A 3D 66 5E 2E 67 5E 2E 67 3B 66 5E 2E 67 5E 2E    :=f^.g^.g;f^.g^.
021050:  67 3A 3D 75 3B 75 3A 3D 66 5E 2E 67 3B 66 5E 2E    g:=u;u:=f^.g;f^.
021060:  67 3A 3D 66 5E 2E 64 3B 66 5E 2E 64 3A 3D 75 3B    g:=f^.d;f^.d:=u;
021070:  0D 0A 20 20 20 20 72 65 64 75 69 72 65 28 66 5E    ..    reduire(f^
021080:  2E 64 29 3B 72 65 73 75 6C 74 3A 3D 31 3B 0D 0A    .d);result:=1;..
021090:  20 20 20 65 6E 64 0D 0A 20 20 65 6E 64 0D 0A 20       end..  end.. 
0210A0:  20 65 6C 73 65 0D 0A 20 20 69 66 20 28 28 28 66     else..  if (((f
0210B0:  5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 2B 27 29    ^.d^.valeur='+')
0210C0:  20 6F 72 20 28 66 5E 2E 64 5E 2E 76 61 6C 65 75     or (f^.d^.valeu
0210D0:  72 3D 27 2D 27 29 29 61 6E 64 28 6D 6F 6E 6F 6D    r='-'))and(monom
0210E0:  65 28 66 5E 2E 67 29 3E 3D 30 29 61 6E 64 0D 0A    e(f^.g)>=0)and..
0210F0:  20 20 28 6D 6F 6E 6F 6D 65 28 66 5E 2E 67 29 3D      (monome(f^.g)=
021100:  6D 6F 6E 6F 6D 65 28 66 5E 2E 64 5E 2E 67 29 29    monome(f^.d^.g))
021110:  29 20 74 68 65 6E 0D 0A 20 20 62 65 67 69 6E 0D    ) then..  begin.
021120:  0A 20 20 20 75 3A 3D 66 5E 2E 64 3B 66 5E 2E 64    .   u:=f^.d;f^.d
021130:  3A 3D 66 5E 2E 67 3B 66 5E 2E 67 3A 3D 75 3B 6F    :=f^.g;f^.g:=u;o
021140:  72 64 72 65 28 66 5E 2E 67 29 3B 72 65 73 75 6C    rdre(f^.g);resul
021150:  74 3A 3D 31 3B 70 6F 6C 79 6E 6F 6D 65 28 66 29    t:=1;polynome(f)
021160:  3B 0D 0A 20 20 65 6E 64 0D 0A 20 20 65 6C 73 65    ;..  end..  else
021170:  0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 69 66 20    ..  begin..  if 
021180:  66 5E 2E 64 3C 3E 6E 69 6C 20 74 68 65 6E 20 70    f^.d<>nil then p
021190:  6F 6C 79 6E 6F 6D 65 28 66 5E 2E 64 29 3B 0D 0A    olynome(f^.d);..
0211A0:  20 20 69 66 20 66 5E 2E 67 3C 3E 6E 69 6C 20 74      if f^.g<>nil t
0211B0:  68 65 6E 20 70 6F 6C 79 6E 6F 6D 65 28 66 5E 2E    hen polynome(f^.
0211C0:  67 29 3B 0D 0A 20 20 65 6E 64 3B 0D 0A 20 20 65    g);..  end;..  e
0211D0:  6E 64 3B 0D 0A 20 20 69 66 20 66 5E 2E 64 3C 3E    nd;..  if f^.d<>
0211E0:  6E 69 6C 20 74 68 65 6E 20 70 6F 6C 79 6E 6F 6D    nil then polynom
0211F0:  65 28 66 5E 2E 64 29 3B 0D 0A 20 20 69 66 20 66    e(f^.d);..  if f
021200:  5E 2E 67 3C 3E 6E 69 6C 20 74 68 65 6E 20 70 6F    ^.g<>nil then po
021210:  6C 79 6E 6F 6D 65 28 66 5E 2E 67 29 3B 0D 0A 65    lynome(f^.g);..e
021220:  6E 64 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F    nd;..end;....pro
021230:  63 65 64 75 72 65 20 61 6C 67 65 62 72 69 71 75    cedure algebriqu
021240:  65 28 76 61 72 20 66 3A 66 6F 6E 63 74 69 6F 6E    e(var f:fonction
021250:  29 3B 0D 0A 62 65 67 69 6E 0D 0A 72 65 70 65 61    );..begin..repea
021260:  74 0D 0A 72 65 73 75 6C 74 3A 3D 30 3B 73 69 6D    t..result:=0;sim
021270:  70 6C 69 66 28 66 29 3B 0D 0A 75 6E 74 69 6C 20    plif(f);..until 
021280:  72 65 73 75 6C 74 3D 30 3B 0D 0A 72 65 70 65 61    result=0;..repea
021290:  74 0D 0A 72 65 73 75 6C 74 3A 3D 30 3B 64 65 76    t..result:=0;dev
0212A0:  65 6C 6F 70 28 66 29 3B 0D 0A 75 6E 74 69 6C 20    elop(f);..until 
0212B0:  72 65 73 75 6C 74 3D 30 3B 0D 0A 72 65 70 65 61    result=0;..repea
0212C0:  74 0D 0A 72 65 73 75 6C 74 3A 3D 30 3B 0D 0A 70    t..result:=0;..p
0212D0:  72 6F 64 75 69 74 28 66 29 3B 0D 0A 75 6E 74 69    roduit(f);..unti
0212E0:  6C 20 72 65 73 75 6C 74 3D 30 3B 0D 0A 72 65 70    l result=0;..rep
0212F0:  65 61 74 0D 0A 72 65 73 75 6C 74 3A 3D 30 3B 6F    eat..result:=0;o
021300:  72 64 72 65 28 66 29 3B 70 6F 6C 79 6E 6F 6D 65    rdre(f);polynome
021310:  28 66 29 3B 0D 0A 75 6E 74 69 6C 20 72 65 73 75    (f);..until resu
021320:  6C 74 3D 30 3B 0D 0A 72 65 70 65 61 74 0D 0A 72    lt=0;..repeat..r
021330:  65 73 75 6C 74 3A 3D 30 3B 0D 0A 73 69 6D 70 6C    esult:=0;..simpl
021340:  69 66 28 66 29 3B 0D 0A 75 6E 74 69 6C 20 72 65    if(f);..until re
021350:  73 75 6C 74 3D 30 3B 0D 0A 65 6E 64 3B 0D 0A 0D    sult=0;..end;...
021360:  0A 70 72 6F 63 65 64 75 72 65 20 20 62 69 6E 6F    .procedure  bino
021370:  6D 65 28 76 61 72 20 66 3A 66 6F 6E 63 74 69 6F    me(var f:fonctio
021380:  6E 29 3B 0D 0A 76 61 72 20 75 2C 76 2C 77 3A 66    n);..var u,v,w:f
021390:  6F 6E 63 74 69 6F 6E 3B 0D 0A 63 6F 65 66 66 3A    onction;..coeff:
0213A0:  72 65 61 6C 3B 0D 0A 72 65 73 75 6C 74 61 74 3A    real;..resultat:
0213B0:  69 6E 74 65 67 65 72 3B 0D 0A 62 65 67 69 6E 0D    integer;..begin.
0213C0:  0A 69 66 20 28 28 66 5E 2E 76 61 6C 65 75 72 3D    .if ((f^.valeur=
0213D0:  27 5E 27 29 61 6E 64 28 28 66 5E 2E 67 5E 2E 76    '^')and((f^.g^.v
0213E0:  61 6C 65 75 72 3D 27 2B 27 29 6F 72 28 66 5E 2E    aleur='+')or(f^.
0213F0:  67 5E 2E 76 61 6C 65 75 72 3D 27 2D 27 29 29 61    g^.valeur='-'))a
021400:  6E 64 0D 0A 28 66 5E 2E 64 5E 2E 6E 61 74 75 72    nd..(f^.d^.natur
021410:  65 3D 27 6E 6F 6D 62 72 65 27 29 29 20 74 68 65    e='nombre')) the
021420:  6E 0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 20 76    n..  begin..   v
021430:  61 6C 28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 2C    al(f^.d^.valeur,
021440:  63 6F 65 66 66 2C 72 65 73 75 6C 74 61 74 29 3B    coeff,resultat);
021450:  0D 0A 20 20 20 69 66 20 28 28 66 72 61 63 28 63    ..   if ((frac(c
021460:  6F 65 66 66 29 3D 30 29 20 61 6E 64 20 28 63 6F    oeff)=0) and (co
021470:  65 66 66 3E 3D 32 29 29 20 74 68 65 6E 0D 0A 20    eff>=2)) then.. 
021480:  20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20         begin..    
021490:  20 20 69 66 20 63 6F 65 66 66 3D 32 20 74 68 65      if coeff=2 the
0214A0:  6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20    n begin..       
0214B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66                   f
0214C0:  5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75 6C 74 69    ^.nature:='multi
0214D0:  27 3B 66 5E 2E 76 61 6C 65 75 72 3A 3D 27 2A 27    ';f^.valeur:='*'
0214E0:  3B 66 5E 2E 64 3A 3D 66 5E 2E 67 3B 0D 0A 20 20    ;f^.d:=f^.g;..  
0214F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021500:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
021510:  1C 00 00 00 02 09 4E E5 1C 00 41 02 00 00 00 02    ......N...A.....
021520:  1C 00 42 02 00 00 00 02 1C 00 43 02 00 00 00 02    ..B.......C.....
021530:  1C 00 44 02 00 00 00 02 1C 00 45 02 00 00 00 02    ..D.......E.....
021540:  1C 00 46 02 00 00 00 02 1C 00 47 02 00 00 00 02    ..F.......G.....
021550:  1C 00 48 02 00 00 00 02 1C 00 49 02 00 00 00 02    ..H.......I.....
021560:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021570:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021580:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021590:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0215A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0215B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0215C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0215D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0215E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0215F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021600:  20 20 20 20 61 6C 67 65 62 72 69 71 75 65 28 66        algebrique(f
021610:  29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    );..            
021620:  20 20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20              end.. 
021630:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021640:  20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20         else..     
021650:  20 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A             begin..
021660:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 6E 65                  ne
021670:  77 28 75 29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D    w(u);u^.nature:=
021680:  27 70 75 69 73 73 27 3B 75 5E 2E 76 61 6C 65 75    'puiss';u^.valeu
021690:  72 3A 3D 27 5E 27 3B 75 5E 2E 67 3A 3D 66 5E 2E    r:='^';u^.g:=f^.
0216A0:  67 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    g;..            
0216B0:  20 20 6E 65 77 28 76 29 3B 76 5E 2E 6E 61 74 75      new(v);v^.natu
0216C0:  72 65 3A 3D 27 6E 6F 6D 62 72 65 27 3B 63 6F 65    re:='nombre';coe
0216D0:  66 66 3A 3D 63 6F 65 66 66 2D 31 3B 0D 0A 20 20    ff:=coeff-1;..  
0216E0:  20 20 20 20 20 20 20 20 20 20 20 20 73 74 72 28                str(
0216F0:  72 6F 75 6E 64 28 63 6F 65 66 66 29 2C 76 5E 2E    round(coeff),v^.
021700:  76 61 6C 65 75 72 29 3B 0D 0A 20 20 20 20 20 20    valeur);..      
021710:  20 20 20 20 20 20 20 20 76 5E 2E 64 3A 3D 6E 69            v^.d:=ni
021720:  6C 3B 76 5E 2E 67 3A 3D 6E 69 6C 3B 75 5E 2E 64    l;v^.g:=nil;u^.d
021730:  3A 3D 76 3B 66 5E 2E 64 3A 3D 66 5E 2E 67 3B 66    :=v;f^.d:=f^.g;f
021740:  5E 2E 67 3A 3D 75 3B 0D 0A 20 20 20 20 20 20 20    ^.g:=u;..       
021750:  20 20 20 20 20 20 20 62 69 6E 6F 6D 65 28 66 5E           binome(f^
021760:  2E 67 29 3B 66 5E 2E 6E 61 74 75 72 65 3A 3D 27    .g);f^.nature:='
021770:  6D 75 6C 74 69 27 3B 66 5E 2E 76 61 6C 65 75 72    multi';f^.valeur
021780:  3A 3D 27 2A 27 3B 0D 0A 20 20 20 20 20 20 20 20    :='*';..        
021790:  20 20 20 20 20 20 61 6C 67 65 62 72 69 71 75 65          algebrique
0217A0:  28 66 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20    (f);..          
0217B0:  20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20 20        end;..      
0217C0:  20 20 65 6E 64 3B 0D 0A 20 20 20 20 20 65 6E 64      end;..     end
0217D0:  0D 0A 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20    ..     else..   
0217E0:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 69 66      begin..     if
0217F0:  20 66 5E 2E 64 3C 3E 6E 69 6C 20 74 68 65 6E 20     f^.d<>nil then 
021800:  62 69 6E 6F 6D 65 28 66 5E 2E 64 29 3B 0D 0A 20    binome(f^.d);.. 
021810:  20 20 20 20 69 66 20 66 5E 2E 67 3C 3E 6E 69 6C        if f^.g<>nil
021820:  20 74 68 65 6E 20 62 69 6E 6F 6D 65 28 66 5E 2E     then binome(f^.
021830:  67 29 3B 0D 0A 20 20 20 20 20 65 6E 64 3B 0D 0A    g);..     end;..
021840:  20 20 65 6E 64 3B 0D 0A 0D 0A 1A 1A 1A 1A 1A 1A      end;..........
021850:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
021860:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
021870:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
021880:  28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 2D    (f^.d^.valeur='-
021890:  27 29 29 0D 0A 20 74 68 65 6E 20 62 65 67 69 6E    ')).. then begin
0218A0:  0D 0A 20 20 6F 72 64 72 65 28 66 5E 2E 64 29 3B    ..  ordre(f^.d);
0218B0:  0D 0A 20 20 69 66 20 28 28 6D 6F 6E 6F 6D 65 28    ..  if ((monome(
0218C0:  66 5E 2E 67 29 3E 3D 30 29 61 6E 64 20 28 6D 6F    f^.g)>=0)and (mo
0218D0:  6E 6F 6D 65 28 66 5E 2E 67 29 3C 6D 6F 6E 6F 6D    nome(f^.g)<monom
0218E0:  65 28 66 5E 2E 64 5E 2E 67 29 29 29 20 74 68 65    e(f^.d^.g))) the
0218F0:  6E 0D 0A 20 20 20 62 65 67 69 6E 0D 0A 20 20 20    n..   begin..   
021900:  69 66 20 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D    if f^.d^.valeur=
021910:  27 2D 27 20 74 68 65 6E 20 62 65 67 69 6E 20 66    '-' then begin f
021920:  5E 2E 64 5E 2E 6E 61 74 75 72 65 3A 3D 27 70 6C    ^.d^.nature:='pl
021930:  75 73 27 3B 66 5E 2E 64 5E 2E 76 61 6C 65 75 72    us';f^.d^.valeur
021940:  3A 3D 27 2B 27 3B 0D 0A 20 20 20 20 20 20 20 20    :='+';..        
021950:  20 20 20 20 20 20 20 20 20 20 20 20 66 5E 2E 64                f^.d
021960:  5E 2E 64 3A 3D 6F 70 70 6F 73 65 28 66 5E 2E 64    ^.d:=oppose(f^.d
021970:  5E 2E 64 29 3B 20 65 6E 64 3B 0D 0A 20 20 20 75    ^.d); end;..   u
021980:  3A 3D 66 5E 2E 67 3B 66 5E 2E 67 3A 3D 66 5E 2E    :=f^.g;f^.g:=f^.
021990:  64 5E 2E 67 3B 66 5E 2E 64 5E 2E 67 3A 3D 75 3B    d^.g;f^.d^.g:=u;
0219A0:  72 65 64 75 69 72 65 28 66 5E 2E 64 29 3B 0D 0A    reduire(f^.d);..
0219B0:  20 20 20 75 3A 3D 66 5E 2E 64 3B 66 5E 2E 64 3A       u:=f^.d;f^.d:
0219C0:  3D 66 5E 2E 67 3B 66 5E 2E 67 3A 3D 75 3B 72 65    =f^.g;f^.g:=u;re
0219D0:  73 75 6C 74 3A 3D 31 3B 0D 0A 20 20 20 65 6E 64    sult:=1;..   end
0219E0:  3B 0D 0A 20 20 20 65 6E 64 0D 0A 20 20 20 65 6C    ;..   end..   el
0219F0:  73 65 0D 0A 20 20 69 66 20 28 28 28 66 5E 2E 76    se..  if (((f^.v
021A00:  20 20 20 20 20 79 70 3A 3D 72 6F 75 6E 64 28 72         yp:=round(r
021A10:  65 73 75 6C 74 61 74 2A 73 69 6E 28 78 29 2A 75    esultat*sin(x)*u
021A20:  79 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    y);..           
021A30:  69 66 20 70 72 65 63 65 64 65 3D 66 61 6C 73 65    if precede=false
021A40:  20 74 68 65 6E 20 70 6C 6F 74 28 78 70 2C 79 70     then plot(xp,yp
021A50:  29 20 65 6C 73 65 20 64 72 61 77 28 78 70 2C 79    ) else draw(xp,y
021A60:  70 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    p);..           
021A70:  70 72 65 63 65 64 65 3A 3D 74 72 75 65 0D 0A 20    precede:=true.. 
021A80:  20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20            end..   
021A90:  20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20          else..    
021AA0:  20 20 20 20 20 70 72 65 63 65 64 65 3A 3D 66 61         precede:=fa
021AB0:  6C 73 65 3B 0D 0A 20 20 20 20 20 20 20 78 3A 3D    lse;..       x:=
021AC0:  78 2B 70 61 73 3B 0D 0A 20 20 20 20 65 6E 64 3B    x+pas;..    end;
021AD0:  0D 0A 20 20 20 65 6E 64 3B 0D 0A 20 20 65 6E 64    ..   end;..  end
021AE0:  3B 0D 0A 20 20 65 6E 64 3B 0D 0A 20 20 67 6F 74    ;..  end;..  got
021AF0:  6F 78 79 28 31 2C 32 34 29 3B 77 72 69 74 65 28    oxy(1,24);write(
021B00:  27 3C 31 3E 20 49 6D 70 72 69 6D 65 72 20 3C 32    '<1> Imprimer <2
021B10:  3E 20 52 65 76 6F 69 72 20 3C 33 3E 20 52 65 74    > Revoir <3> Ret
021B20:  6F 75 72 20 61 75 20 6D 65 6E 75 27 29 3B 0D 0A    our au menu');..
021B30:  20 20 72 65 70 65 61 74 0D 0A 20 20 72 65 61 64      repeat..  read
021B40:  28 6B 62 64 2C 63 61 72 29 3B 0D 0A 20 20 75 6E    (kbd,car);..  un
021B50:  74 69 6C 20 28 28 63 61 72 3E 27 30 27 29 20 61    til ((car>'0') a
021B60:  6E 64 20 28 63 61 72 3C 27 34 27 29 29 3B 0D 0A    nd (car<'4'));..
021B70:  20 20 76 61 6C 28 63 61 72 2C 63 68 6F 69 78 62      val(car,choixb
021B80:  69 73 2C 72 65 73 75 6C 74 29 3B 0D 0A 20 20 69    is,result);..  i
021B90:  66 20 63 68 6F 69 78 62 69 73 3D 31 20 74 68 65    f choixbis=1 the
021BA0:  6E 0D 0A 20 20 20 62 65 67 69 6E 0D 0A 20 20 20    n..   begin..   
021BB0:  67 6F 74 6F 78 79 28 31 2C 32 34 29 3B 77 72 69    gotoxy(1,24);wri
021BC0:  74 65 28 27 20 20 20 20 20 20 20 20 20 20 20 20    te('            
021BD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021BE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27                   '
021BF0:  29 3B 0D 0A 20 20 20 6F 72 69 67 69 6E 28 30 2C    );..   origin(0,
021C00:  30 29 3B 76 69 64 61 67 65 3B 0D 0A 20 20 20 65    0);vidage;..   e
021C10:  6E 64 3B 0D 0A 20 20 69 66 20 63 68 6F 69 78 62    nd;..  if choixb
021C20:  69 73 3D 32 20 74 68 65 6E 0D 0A 20 20 67 72 61    is=2 then..  gra
021C30:  70 68 65 28 31 29 3B 0D 0A 65 6E 64 3B 1A 1A 1A    phe(1);..end;...
021C40:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
021C50:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
021C60:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
021C70:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
021C80:  00 00 60 FF FF 0F 00 00 00 00 00 00 00 00 00 00    ..`.............
021C90:  00 00 00 00 00 00 00 00 00 C3 B2 C1 66 C1 66 C1    ............f.f.
021CA0:  4C BE 4C BE 00 07 00 70 FC C8 0A C9 C8 C6 5C C7    L.L....p......\.
021CB0:  7E 03 A2 B9 85 7F B9 C9 45 00 49 FF 00 07 00 6E    ~.......E.I....n
021CC0:  17 02 35 00 7F 08 25 01 3F 01 41 01 C3 FA C0 31    ..5...%.?.A....1
021CD0:  AD EB BC 00 0C 85 7F 41 B9 00 FF 00 00 00 00 00    .......A........
021CE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021CF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021D00:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021D10:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021D20:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021D30:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021D40:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021D50:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021D60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021D70:  00 24 00 03 07 00 AA 00 3F 00 C0 00 10 00 02 00    .$......?.......
021D80:  41 09 2A 52 E5 02 04 07 FF 00 00 00 05 05 05 05    A.*R............
021D90:  05 05 05 05 05 05 05 05 05 05 05 05 05 05 05 05    ................
021DA0:  05 05 05 05 05 05 FF FF FF 00 00 00 00 FE 00 00    ................
021DB0:  6F 24 00 03 07 00 AA 00 3F 00 C0 00 10 00 02 00    o$......?.......
021DC0:  41 09 2A 52 E5 02 04 00 00 00 20 DD A5 CF B3 FF    A.*R...... .....
021DD0:  00 E7 24 02 00 00 00 00 08 05 21 2F 00 65 2E 01    ..$.......!/.e..
021DE0:  E5 CD 8D 06 E5 21 DF ED CD 2C 05 F7 40 E5 09 C0    .....!...,..@...
021DF0:  07 00 00 FE BF 0D 00 CE 9D 78 AE D8 AD F1 AD 01    .........x......
021E00:  0D 0A 66 75 6E 63 74 69 6F 6E 20 20 20 6D 65 6E    ..function   men
021E10:  75 3A 69 6E 74 65 67 65 72 3B 0D 0A 0D 0A 62 65    u:integer;....be
021E20:  67 69 6E 0D 0A 63 6C 72 73 63 72 3B 0D 0A 77 72    gin..clrscr;..wr
021E30:  69 74 65 6C 6E 3B 77 72 69 74 65 6C 6E 28 27 20    iteln;writeln(' 
021E40:  20 20 20 20 20 4D 20 45 20 4E 20 55 20 27 29 3B         M E N U ');
021E50:  0D 0A 77 72 69 74 65 6C 6E 3B 77 72 69 74 65 6C    ..writeln;writel
021E60:  6E 28 27 20 20 3C 31 3E 20 45 6E 74 72 65 65 20    n('  <1> Entree 
021E70:  64 65 20 6C 61 20 66 6F 6E 63 74 69 6F 6E 27 29    de la fonction')
021E80:  3B 0D 0A 77 72 69 74 65 6C 6E 3B 77 72 69 74 65    ;..writeln;write
021E90:  6C 6E 28 27 20 20 3C 32 3E 20 44 65 76 65 6C 6F    ln('  <2> Develo
021EA0:  70 70 65 72 20 64 65 73 20 70 72 6F 64 75 69 74    pper des produit
021EB0:  73 27 29 3B 0D 0A 77 72 69 74 65 6C 6E 3B 77 72    s');..writeln;wr
021EC0:  69 74 65 6C 6E 28 27 20 20 3C 33 3E 20 44 65 76    iteln('  <3> Dev
021ED0:  65 6C 6F 70 70 65 72 20 64 65 73 20 70 75 69 73    elopper des puis
021EE0:  73 61 6E 63 65 73 20 65 6E 74 69 65 72 65 73 27    sances entieres'
021EF0:  29 3B 0D 0A 77 72 69 74 65 6C 6E 3B 77 72 69 74    );..writeln;writ
021F00:  65 6C 6E 28 27 20 20 3C 34 3E 20 43 61 6C 63 75    eln('  <4> Calcu
021F10:  6C 20 64 65 20 76 61 6C 65 75 72 73 20 64 65 20    l de valeurs de 
021F20:  66 28 78 29 27 29 3B 0D 0A 77 72 69 74 65 6C 6E    f(x)');..writeln
021F30:  3B 77 72 69 74 65 6C 6E 28 27 20 20 3C 35 3E 20    ;writeln('  <5> 
021F40:  44 65 72 69 76 65 65 73 20 64 65 20 6C 61 20 66    Derivees de la f
021F50:  6F 6E 63 74 69 6F 6E 27 29 3B 0D 0A 77 72 69 74    onction');..writ
021F60:  65 6C 6E 3B 77 72 69 74 65 6C 6E 28 27 20 20 3C    eln;writeln('  <
021F70:  36 3E 20 44 65 76 65 6C 6F 70 70 65 6D 65 6E 74    6> Developpement
021F80:  73 20 6C 69 6D 69 74 65 73 27 29 3B 0D 0A 77 72    s limites');..wr
021F90:  69 74 65 6C 6E 3B 77 72 69 74 65 6C 6E 28 27 20    iteln;writeln(' 
021FA0:  20 3C 37 3E 20 46 69 6E 20 64 75 20 70 72 6F 67     <7> Fin du prog
021FB0:  72 61 6D 6D 65 27 29 3B 0D 0A 77 72 69 74 65 6C    ramme');..writel
021FC0:  6E 3B 77 72 69 74 65 6C 6E 28 27 20 20 20 20 56    n;writeln('    V
021FD0:  4F 54 52 45 20 43 48 4F 49 58 3F 20 27 29 3B 0D    OTRE CHOIX? ');.
021FE0:  0A 72 65 70 65 61 74 0D 0A 72 65 61 64 28 6B 62    .repeat..read(kb
021FF0:  64 2C 63 61 72 29 3B 0D 0A 75 6E 74 69 6C 20 28    d,car);..until (
022000:  28 63 61 72 3E 27 30 27 29 20 61 6E 64 20 28 63    (car>'0') and (c
022010:  61 72 3C 27 38 27 29 29 3B 0D 0A 76 61 6C 28 63    ar<'8'));..val(c
022020:  61 72 2C 63 68 6F 69 78 2C 72 65 73 75 6C 74 29    ar,choix,result)
022030:  3B 0D 0A 6D 65 6E 75 3A 3D 63 68 6F 69 78 3B 0D    ;..menu:=choix;.
022040:  0A 65 6E 64 3B 0D 0A 0D 0A 66 75 6E 63 74 69 6F    .end;....functio
022050:  6E 20 20 20 6E 75 6D 66 6F 6E 63 3A 69 6E 74 65    n   numfonc:inte
022060:  67 65 72 3B 0D 0A 76 61 72 20 6A 3A 69 6E 74 65    ger;..var j:inte
022070:  67 65 72 3B 0D 0A 0D 0A 62 65 67 69 6E 0D 0A 63    ger;....begin..c
022080:  61 72 3A 3D 27 20 27 3B 0D 0A 72 65 70 65 61 74    ar:=' ';..repeat
022090:  0D 0A 20 20 20 20 20 20 20 72 65 61 64 28 6B 62    ..       read(kb
0220A0:  64 2C 63 61 72 29 3B 0D 0A 20 20 20 20 20 20 20    d,car);..       
0220B0:  75 6E 74 69 6C 20 28 28 63 61 72 3E 27 30 27 29    until ((car>'0')
0220C0:  20 61 6E 64 20 28 63 61 72 3C 27 3A 27 29 29 3B     and (car<':'));
0220D0:  0D 0A 20 20 20 20 20 20 20 77 72 69 74 65 6C 6E    ..       writeln
0220E0:  28 63 61 72 29 3B 0D 0A 20 20 20 20 20 20 20 76    (car);..       v
0220F0:  61 6C 28 63 61 72 2C 6A 2C 72 65 73 75 6C 74 29    al(car,j,result)
022100:  3B 0D 0A 6E 75 6D 66 6F 6E 63 3A 3D 6A 3B 0D 0A    ;..numfonc:=j;..
022110:  65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 72    end;....procedur
022120:  65 20 20 64 65 76 6C 69 6D 3B 0D 0A 6C 61 62 65    e  devlim;..labe
022130:  6C 20 66 69 6E 64 65 76 6C 69 6D 3B 0D 0A 76 61    l findevlim;..va
022140:  72 20 7A 3A 69 6E 74 65 67 65 72 3B 61 3A 72 65    r z:integer;a:re
022150:  61 6C 3B 0D 0A 20 20 20 20 63 6F 65 66 31 2C 63    al;..    coef1,c
022160:  6F 65 66 32 3A 72 65 61 6C 3B 0D 0A 0D 0A 62 65    oef2:real;....be
022170:  67 69 6E 0D 0A 63 6C 72 73 63 72 3B 77 72 69 74    gin..clrscr;writ
022180:  65 28 27 4E 2E 20 64 65 20 6C 61 20 66 6F 6E 63    e('N. de la fonc
022190:  74 69 6F 6E 20 28 31 20 61 20 39 29 3F 27 29 3B    tion (1 a 9)?');
0221A0:  0D 0A 69 3A 3D 6E 75 6D 66 6F 6E 63 3B 0D 0A 69    ..i:=numfonc;..i
0221B0:  66 20 66 5B 69 5D 3D 6E 69 6C 20 74 68 65 6E 20    f f[i]=nil then 
0221C0:  6C 69 72 66 6F 6E 63 74 69 6F 6E 28 66 5B 69 5D    lirfonction(f[i]
0221D0:  29 3B 0D 0A 77 72 69 74 65 28 27 44 65 76 65 6C    );..write('Devel
0221E0:  6F 70 70 65 6D 65 6E 74 20 61 75 20 76 6F 69 73    oppement au vois
0221F0:  69 6E 61 67 65 20 64 65 20 61 3D 27 29 3B 72 65    inage de a=');re
022200:  7B 24 41 2D 7D 0D 0A 70 72 6F 67 72 61 6D 20 20    {$A-}..program  
022210:  20 20 20 63 6F 75 72 62 65 3B 0D 0A 74 79 70 65       courbe;..type
022220:  0D 0A 20 66 6F 6E 63 74 69 6F 6E 3D 5E 73 6F 6D    .. fonction=^som
022230:  6D 65 74 3B 0D 0A 20 73 6F 6D 6D 65 74 3D 72 65    met;.. sommet=re
022240:  63 6F 72 64 0D 0A 20 20 20 20 20 20 20 20 20 20    cord..          
022250:  20 20 20 20 6E 61 74 75 72 65 3A 73 74 72 69 6E        nature:strin
022260:  67 5B 36 5D 3B 0D 0A 20 20 20 20 20 20 20 20 20    g[6];..         
022270:  20 20 20 20 20 76 61 6C 65 75 72 3A 73 74 72 69         valeur:stri
022280:  6E 67 5B 31 30 5D 3B 0D 0A 20 20 20 20 20 20 20    ng[10];..       
022290:  20 20 20 20 20 20 20 64 3A 20 66 6F 6E 63 74 69           d: foncti
0222A0:  6F 6E 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    on;..           
0222B0:  20 20 20 67 3A 20 66 6F 6E 63 74 69 6F 6E 3B 0D       g: fonction;.
0222C0:  0A 20 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20    .        end;.. 
0222D0:  73 74 72 32 30 30 3D 73 74 72 69 6E 67 5B 32 35    str200=string[25
0222E0:  30 5D 3B 0D 0A 20 73 74 72 31 30 3D 73 74 72 69    0];.. str10=stri
0222F0:  6E 67 5B 31 30 5D 3B 0D 0A 63 6F 6E 73 74 0D 0A    ng[10];..const..
022300:  20 66 69 6C 74 72 65 3A 73 65 74 20 6F 66 20 63     filtre:set of c
022310:  68 61 72 3D 5B 27 2B 27 2C 27 2A 27 2C 27 2D 27    har=['+','*','-'
022320:  2C 27 2F 27 2C 27 5E 27 2C 27 2E 27 2C 27 28 27    ,'/','^','.','('
022330:  2C 27 29 27 2C 27 61 27 2E 2E 27 7A 27 2C 27 30    ,')','a'..'z','0
022340:  27 2E 2E 27 39 27 5D 3B 0D 0A 0D 0A 76 61 72 0D    '..'9'];....var.
022350:  0A 20 66 3A 61 72 72 61 79 5B 30 2E 2E 31 30 5D    . f:array[0..10]
022360:  20 6F 66 20 66 6F 6E 63 74 69 6F 6E 3B 0D 0A 20     of fonction;.. 
022370:  63 61 72 3A 63 68 61 72 3B 0D 0A 20 69 64 66 3A    car:char;.. idf:
022380:  73 74 72 69 6E 67 5B 31 30 5D 3B 0D 0A 20 69 2C    string[10];.. i,
022390:  6A 2C 72 65 73 75 6C 74 3A 69 6E 74 65 67 65 72    j,result:integer
0223A0:  3B 0D 0A 20 69 6E 64 69 63 65 2C 63 68 6F 69 78    ;.. indice,choix
0223B0:  3A 69 6E 74 65 67 65 72 3B 0D 0A 20 70 3A 61 72    :integer;.. p:ar
0223C0:  72 61 79 5B 31 2E 2E 33 2C 30 2E 2E 31 30 5D 20    ray[1..3,0..10] 
0223D0:  6F 66 20 72 65 61 6C 3B 0D 0A 20 6D 3A 61 72 72    of real;.. m:arr
0223E0:  61 79 5B 30 2E 2E 31 30 5D 20 6F 66 20 69 6E 74    ay[0..10] of int
0223F0:  65 67 65 72 3B 0D 0A 20 64 65 66 69 6E 69 3A 62    eger;.. defini:b
022400:  6F 6F 6C 65 61 6E 3B 0D 0A 20 78 2C 72 65 73 75    oolean;.. x,resu
022410:  6C 74 61 74 3A 72 65 61 6C 3B 0D 0A 0D 0A 7B 24    ltat:real;....{$
022420:  49 20 6C 69 72 65 66 6F 6E 63 2E 70 61 73 7D 0D    I lirefonc.pas}.
022430:  0A 7B 24 49 20 63 61 6C 63 75 6C 66 2E 70 61 73    .{$I calculf.pas
022440:  7D 0D 0A 7B 24 49 20 65 63 72 69 66 2E 70 61 73    }..{$I ecrif.pas
022450:  7D 0D 0A 7B 24 49 20 67 72 61 66 69 6B 33 2E 69    }..{$I grafik3.i
022460:  6E 63 7D 0D 0A 7B 24 49 20 67 72 61 70 68 65 66    nc}..{$I graphef
022470:  2E 70 61 73 7D 0D 0A 0D 0A 62 65 67 69 6E 0D 0A    .pas}....begin..
022480:  66 6F 72 20 69 3A 3D 30 20 74 6F 20 31 30 20 64    for i:=0 to 10 d
022490:  6F 20 62 65 67 69 6E 20 66 5B 69 5D 3A 3D 6E 69    o begin f[i]:=ni
0224A0:  6C 3B 6D 5B 69 5D 3A 3D 30 3B 20 65 6E 64 3B 0D    l;m[i]:=0; end;.
0224B0:  0A 62 6F 72 64 65 72 28 31 30 2C 31 30 29 3B 0D    .border(10,10);.
0224C0:  0A 62 6F 75 63 6C 65 3B 0D 0A 65 6E 64 2E 1A 1A    .boucle;..end...
0224D0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0224E0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0224F0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
022500:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022510:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022520:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022530:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022540:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022550:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022560:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022570:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022580:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022590:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0225A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0225B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0225C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0225D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0225E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0225F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022600:  61 64 6C 6E 28 61 29 3B 0D 0A 77 72 69 74 65 20    adln(a);..write 
022610:  28 27 44 65 76 65 6C 6F 70 70 65 6D 65 6E 74 20    ('Developpement 
022620:  61 20 71 75 65 6C 20 6F 72 64 72 65 20 28 31 20    a quel ordre (1 
022630:  61 20 35 29 3F 27 29 3B 0D 0A 72 65 70 65 61 74    a 5)?');..repeat
022640:  0D 0A 72 65 61 64 28 6B 62 64 2C 63 61 72 29 3B    ..read(kbd,car);
022650:  0D 0A 75 6E 74 69 6C 20 28 28 63 61 72 3E 27 30    ..until ((car>'0
022660:  27 29 20 61 6E 64 20 28 63 61 72 3C 27 36 27 29    ') and (car<'6')
022670:  29 3B 0D 0A 77 72 69 74 65 6C 6E 28 63 61 72 29    );..writeln(car)
022680:  3B 0D 0A 76 61 6C 28 63 61 72 2C 6A 2C 72 65 73    ;..val(car,j,res
022690:  75 6C 74 29 3B 0D 0A 77 72 69 74 65 6C 6E 28 27    ult);..writeln('
0226A0:  66 27 2C 69 2C 27 28 78 29 3D 27 2C 74 61 70 65    f',i,'(x)=',tape
0226B0:  66 6F 6E 63 74 69 6F 6E 28 66 5B 69 5D 2C 27 78    fonction(f[i],'x
0226C0:  27 29 29 3B 0D 0A 77 72 69 74 65 6C 6E 28 27 44    '));..writeln('D
0226D0:  65 76 65 6C 6F 70 70 65 6D 65 6E 74 20 6C 69 6D    eveloppement lim
0226E0:  69 74 65 20 61 75 20 76 6F 69 73 69 6E 61 67 65    ite au voisinage
0226F0:  20 64 65 20 61 3D 27 2C 61 29 3B 0D 0A 64 65 66     de a=',a);..def
022700:  69 6E 69 3A 3D 74 72 75 65 3B 72 65 73 75 6C 74    ini:=true;result
022710:  61 74 3A 3D 63 61 6C 63 75 6C 28 66 5B 69 5D 2C    at:=calcul(f[i],
022720:  61 29 3B 66 5B 30 5D 3A 3D 66 5B 69 5D 3B 63 6F    a);f[0]:=f[i];co
022730:  65 66 32 3A 3D 31 3B 0D 0A 69 66 20 64 65 66 69    ef2:=1;..if defi
022740:  6E 69 3D 74 72 75 65 20 74 68 65 6E 20 62 65 67    ni=true then beg
022750:  69 6E 0D 0A 20 20 20 20 69 66 20 72 65 73 75 6C    in..    if resul
022760:  74 61 74 3C 3E 30 20 74 68 65 6E 0D 0A 20 20 20    tat<>0 then..   
022770:  20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20          begin..   
022780:  20 20 20 20 20 20 20 20 20 20 20 69 66 20 72 65               if re
022790:  73 75 6C 74 61 74 3E 30 20 74 68 65 6E 20 77 72    sultat>0 then wr
0227A0:  69 74 65 28 27 2B 27 29 3B 0D 0A 20 20 20 20 20    ite('+');..     
0227B0:  20 20 20 20 20 20 20 20 20 69 66 20 66 72 61 63             if frac
0227C0:  28 72 65 73 75 6C 74 61 74 29 3D 30 20 74 68 65    (resultat)=0 the
0227D0:  6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    n..             
0227E0:  20 77 72 69 74 65 28 72 6F 75 6E 64 28 72 65 73     write(round(res
0227F0:  75 6C 74 61 74 29 29 20 65 6C 73 65 20 77 72 69    ultat)) else wri
022800:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
022810:  1D 00 00 00 02 09 4E E5 1D 00 41 02 00 00 00 02    ......N...A.....
022820:  1D 00 42 02 00 00 00 02 1D 00 43 02 00 00 00 02    ..B.......C.....
022830:  1D 00 44 02 00 00 00 02 1D 00 45 02 00 00 00 02    ..D.......E.....
022840:  1D 00 46 02 00 00 00 02 1D 00 47 02 00 00 00 02    ..F.......G.....
022850:  1D 00 48 02 00 00 00 02 1D 00 49 02 00 00 00 02    ..H.......I.....
022860:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022870:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022880:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022890:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0228A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0228B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0228C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0228D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0228E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0228F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022900:  74 65 28 72 65 73 75 6C 74 61 74 3A 38 3A 33 29    te(resultat:8:3)
022910:  3B 0D 0A 20 20 20 20 20 20 20 20 20 20 65 6E 64    ;..          end
022920:  3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    ;..             
022930:  20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20 20 20     end..          
022940:  20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20        else..      
022950:  20 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20            begin.. 
022960:  20 20 20 20 20 20 20 20 20 20 20 20 20 77 72 69                 wri
022970:  74 65 6C 6E 28 27 4C 61 20 66 6F 6E 63 74 69 6F    teln('La fonctio
022980:  6E 20 6E 27 27 65 73 74 20 70 61 73 20 64 65 66    n n''est pas def
022990:  69 6E 69 65 20 65 6E 20 27 2C 61 29 3B 0D 0A 20    inie en ',a);.. 
0229A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 67 6F 74                 got
0229B0:  6F 20 66 69 6E 64 65 76 6C 69 6D 3B 0D 0A 20 20    o findevlim;..  
0229C0:  20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 3B                end;
0229D0:  0D 0A 66 6F 72 20 7A 3A 3D 31 20 74 6F 20 6A 20    ..for z:=1 to j 
0229E0:  64 6F 0D 0A 20 20 20 20 20 20 20 62 65 67 69 6E    do..       begin
0229F0:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 66 5B 30    ..           f[0
022A00:  5D 3A 3D 64 65 72 69 76 65 28 66 5B 30 5D 29 3B    ]:=derive(f[0]);
022A10:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 72 65 70    ..           rep
022A20:  65 61 74 20 72 65 73 75 6C 74 3A 3D 30 3B 73 69    eat result:=0;si
022A30:  6D 70 6C 69 66 28 66 5B 30 5D 29 3B 20 75 6E 74    mplif(f[0]); unt
022A40:  69 6C 20 72 65 73 75 6C 74 3D 30 3B 0D 0A 20 20    il result=0;..  
022A50:  20 20 20 20 20 20 20 20 20 63 6F 65 66 32 3A 3D             coef2:=
022A60:  63 6F 65 66 32 2A 7A 3B 0D 0A 20 20 20 20 20 20    coef2*z;..      
022A70:  20 20 20 20 20 64 65 66 69 6E 69 3A 3D 74 72 75         defini:=tru
022A80:  65 3B 72 65 73 75 6C 74 61 74 3A 3D 63 61 6C 63    e;resultat:=calc
022A90:  75 6C 28 66 5B 30 5D 2C 61 29 3B 0D 0A 20 20 20    ul(f[0],a);..   
022AA0:  20 20 20 20 20 20 20 20 69 66 20 64 65 66 69 6E            if defin
022AB0:  69 3D 74 72 75 65 20 74 68 65 6E 20 62 65 67 69    i=true then begi
022AC0:  6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 69 66    n..           if
022AD0:  20 72 65 73 75 6C 74 61 74 3C 3E 30 20 74 68 65     resultat<>0 the
022AE0:  6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 62    n..            b
022AF0:  65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20    egin..          
022B00:  20 20 20 20 20 20 63 6F 65 66 31 3A 3D 72 65 73          coef1:=res
022B10:  75 6C 74 61 74 2F 63 6F 65 66 32 3B 0D 0A 20 20    ultat/coef2;..  
022B20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66                  if
022B30:  20 72 65 73 75 6C 74 61 74 3E 3D 30 20 74 68 65     resultat>=0 the
022B40:  6E 20 77 72 69 74 65 28 27 2B 27 29 3B 0D 0A 20    n write('+');.. 
022B50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69                   i
022B60:  66 20 66 72 61 63 28 63 6F 65 66 31 29 3D 30 20    f frac(coef1)=0 
022B70:  74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20 20 20    then..          
022B80:  20 20 20 20 20 20 77 72 69 74 65 28 72 6F 75 6E          write(roun
022B90:  64 28 63 6F 65 66 31 29 29 20 65 6C 73 65 0D 0A    d(coef1)) else..
022BA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20                 if 
022BB0:  66 72 61 63 28 72 65 73 75 6C 74 61 74 29 3D 30    frac(resultat)=0
022BC0:  20 74 68 65 6E 20 77 72 69 74 65 28 72 6F 75 6E     then write(roun
022BD0:  64 28 72 65 73 75 6C 74 61 74 29 2C 27 2F 27 2C    d(resultat),'/',
022BE0:  72 6F 75 6E 64 28 63 6F 65 66 32 29 29 0D 0A 20    round(coef2)).. 
022BF0:  20 20 20 20 20 20 20 20 65 6C 73 65 20 20 77 72            else  wr
022C00:  69 74 65 28 72 65 73 75 6C 74 61 74 3A 38 3A 33    ite(resultat:8:3
022C10:  2C 27 2F 27 2C 72 6F 75 6E 64 28 63 6F 65 66 32    ,'/',round(coef2
022C20:  29 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    ));..           
022C30:  20 20 69 66 20 61 3D 30 20 74 68 65 6E 20 77 72      if a=0 then wr
022C40:  69 74 65 28 27 78 27 29 20 65 6C 73 65 20 77 72    ite('x') else wr
022C50:  69 74 65 28 27 28 78 2D 61 29 27 29 3B 0D 0A 20    ite('(x-a)');.. 
022C60:  20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 7A                if z
022C70:  3E 31 20 74 68 65 6E 20 20 77 72 69 74 65 28 27    >1 then  write('
022C80:  5E 27 2C 7A 29 3B 0D 0A 20 20 20 20 20 20 20 20    ^',z);..        
022C90:  20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20         end;..     
022CA0:  20 20 20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A               end..
022CB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022CC0:  65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20    else..          
022CD0:  20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20          begin..   
022CE0:  20 20 20 20 20 20 20 20 20 20 20 77 72 69 74 65               write
022CF0:  6C 6E 3B 77 72 69 74 65 6C 6E 28 27 4C 61 20 64    ln;writeln('La d
022D00:  65 72 69 76 65 65 27 2C 7A 2C 27 69 65 6D 65 20    erivee',z,'ieme 
022D10:  6E 27 27 65 73 74 20 70 61 73 20 64 65 66 69 6E    n''est pas defin
022D20:  69 65 20 65 6E 20 27 2C 61 29 3B 0D 0A 20 20 20    ie en ',a);..   
022D30:  20 20 20 20 20 20 20 20 20 20 20 67 6F 74 6F 20               goto 
022D40:  66 69 6E 64 65 76 6C 69 6D 3B 0D 0A 20 20 20 20    findevlim;..    
022D50:  20 20 20 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A              end;..
022D60:  20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 77 72 69           end;..wri
022D70:  74 65 6C 6E 3B 0D 0A 66 69 6E 64 65 76 6C 69 6D    teln;..findevlim
022D80:  3A 3B 0D 0A 74 65 6D 70 6F 3B 0D 0A 65 6E 64 3B    :;..tempo;..end;
022D90:  0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 62 6F    ....procedure bo
022DA0:  75 63 6C 65 3B 0D 0A 76 61 72 20 7A 3A 69 6E 74    ucle;..var z:int
022DB0:  65 67 65 72 3B 0D 0A 62 65 67 69 6E 0D 0A 72 65    eger;..begin..re
022DC0:  70 65 61 74 0D 0A 63 68 6F 69 78 3A 3D 6D 65 6E    peat..choix:=men
022DD0:  75 3B 0D 0A 63 61 73 65 20 63 68 6F 69 78 20 6F    u;..case choix o
022DE0:  66 0D 0A 20 31 3A 20 20 20 20 62 65 67 69 6E 0D    f.. 1:    begin.
022DF0:  0A 20 20 20 20 20 20 20 77 72 69 74 65 28 27 4E    .       write('N
022E00:  6F 20 64 65 20 6C 61 20 66 6F 6E 63 74 69 6F 6E    o de la fonction
022E10:  20 28 31 20 61 20 39 29 3F 27 29 3B 0D 0A 20 20     (1 a 9)?');..  
022E20:  20 20 20 20 20 69 3A 3D 6E 75 6D 66 6F 6E 63 3B         i:=numfonc;
022E30:  0D 0A 20 20 20 20 20 20 20 63 6C 72 73 63 72 3B    ..       clrscr;
022E40:  63 61 72 3A 3D 27 20 27 3B 0D 0A 20 20 20 20 20    car:=' ';..     
022E50:  20 20 6C 69 72 66 6F 6E 63 74 69 6F 6E 28 66 5B      lirfonction(f[
022E60:  69 5D 29 3B 0D 0A 20 20 20 20 20 20 20 72 65 70    i]);..       rep
022E70:  65 61 74 0D 0A 20 20 20 20 20 20 20 72 65 73 75    eat..       resu
022E80:  6C 74 3A 3D 30 3B 73 69 6D 70 6C 69 66 28 66 5B    lt:=0;simplif(f[
022E90:  69 5D 29 3B 0D 0A 20 20 20 20 20 20 20 75 6E 74    i]);..       unt
022EA0:  69 6C 20 72 65 73 75 6C 74 3D 30 3B 0D 0A 20 20    il result=0;..  
022EB0:  20 20 20 20 20 74 65 6D 70 6F 3B 0D 0A 20 20 20         tempo;..   
022EC0:  20 20 20 20 65 6E 64 3B 0D 0A 20 32 3A 20 20 20        end;.. 2:   
022ED0:  20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 63     begin..       c
022EE0:  6C 72 73 63 72 3B 77 72 69 74 65 28 27 4E 6F 20    lrscr;write('No 
022EF0:  64 65 20 6C 61 20 66 6F 6E 63 74 69 6F 6E 20 28    de la fonction (
022F00:  31 20 61 20 39 29 3F 27 29 3B 0D 0A 20 20 20 20    1 a 9)?');..    
022F10:  20 20 20 69 3A 3D 6E 75 6D 66 6F 6E 63 3B 0D 0A       i:=numfonc;..
022F20:  20 20 20 20 20 20 20 69 66 20 66 5B 69 5D 3D 6E           if f[i]=n
022F30:  69 6C 20 74 68 65 6E 20 6C 69 72 66 6F 6E 63 74    il then lirfonct
022F40:  69 6F 6E 28 66 5B 69 5D 29 3B 0D 0A 20 20 20 20    ion(f[i]);..    
022F50:  20 20 20 77 72 69 74 65 6C 6E 28 27 66 27 2C 69       writeln('f',i
022F60:  2C 27 28 78 29 3D 27 2C 74 61 70 65 66 6F 6E 63    ,'(x)=',tapefonc
022F70:  74 69 6F 6E 28 66 5B 69 5D 2C 27 78 27 29 29 3B    tion(f[i],'x'));
022F80:  0D 0A 20 20 20 20 20 20 20 61 6C 67 65 62 72 69    ..       algebri
022F90:  71 75 65 28 66 5B 69 5D 29 3B 0D 0A 20 20 20 20    que(f[i]);..    
022FA0:  20 20 20 77 72 69 74 65 6C 6E 28 27 66 27 2C 69       writeln('f',i
022FB0:  2C 27 28 78 29 3D 27 2C 74 61 70 65 66 6F 6E 63    ,'(x)=',tapefonc
022FC0:  74 69 6F 6E 28 66 5B 69 5D 2C 27 78 27 29 29 3B    tion(f[i],'x'));
022FD0:  0D 0A 20 20 20 20 20 20 20 74 65 6D 70 6F 3B 0D    ..       tempo;.
022FE0:  0A 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 33    .       end;.. 3
022FF0:  3A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20    :    begin..    
023000:  20 20 20 63 6C 72 73 63 72 3B 77 72 69 74 65 28       clrscr;write(
023010:  27 4E 6F 20 64 65 20 6C 61 20 66 6F 6E 63 74 69    'No de la foncti
023020:  6F 6E 20 28 31 20 61 20 39 29 3F 27 29 3B 0D 0A    on (1 a 9)?');..
023030:  20 20 20 20 20 20 20 69 3A 3D 6E 75 6D 66 6F 6E           i:=numfon
023040:  63 3B 0D 0A 20 20 20 20 20 20 20 69 66 20 66 5B    c;..       if f[
023050:  69 5D 3D 6E 69 6C 20 74 68 65 6E 20 6C 69 72 66    i]=nil then lirf
023060:  6F 6E 63 74 69 6F 6E 28 66 5B 69 5D 29 3B 0D 0A    onction(f[i]);..
023070:  20 20 20 20 20 20 20 77 72 69 74 65 6C 6E 28 27           writeln('
023080:  66 27 2C 69 2C 27 28 78 29 3D 27 2C 74 61 70 65    f',i,'(x)=',tape
023090:  66 6F 6E 63 74 69 6F 6E 28 66 5B 69 5D 2C 27 78    fonction(f[i],'x
0230A0:  27 29 29 3B 0D 0A 20 20 20 20 20 20 20 62 69 6E    '));..       bin
0230B0:  6F 6D 65 28 66 5B 69 5D 29 3B 0D 0A 20 20 20 20    ome(f[i]);..    
0230C0:  20 20 20 77 72 69 74 65 6C 6E 28 27 66 27 2C 69       writeln('f',i
0230D0:  2C 27 28 78 29 3D 27 2C 74 61 70 65 66 6F 6E 63    ,'(x)=',tapefonc
0230E0:  74 69 6F 6E 28 66 5B 69 5D 2C 27 78 27 29 29 3B    tion(f[i],'x'));
0230F0:  0D 0A 20 20 20 20 20 20 20 74 65 6D 70 6F 3B 0D    ..       tempo;.
023100:  0A 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 34    .       end;.. 4
023110:  3A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20    :    begin..    
023120:  20 20 20 63 6C 72 73 63 72 3B 77 72 69 74 65 28       clrscr;write(
023130:  27 4E 6F 20 64 65 20 6C 61 20 66 6F 6E 63 74 69    'No de la foncti
023140:  6F 6E 20 28 31 20 61 20 39 29 3F 27 29 3B 0D 0A    on (1 a 9)?');..
023150:  20 20 20 20 20 20 20 69 3A 3D 6E 75 6D 66 6F 6E           i:=numfon
023160:  63 3B 0D 0A 20 20 20 20 20 20 20 69 66 20 66 5B    c;..       if f[
023170:  69 5D 3D 6E 69 6C 20 74 68 65 6E 20 6C 69 72 66    i]=nil then lirf
023180:  6F 6E 63 74 69 6F 6E 28 66 5B 69 5D 29 3B 0D 0A    onction(f[i]);..
023190:  20 20 20 20 20 20 20 69 66 20 6D 5B 69 5D 3E 30           if m[i]>0
0231A0:  20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 62 65     then..       be
0231B0:  67 69 6E 0D 0A 20 20 20 20 20 20 20 66 6F 72 20    gin..       for 
0231C0:  7A 3A 3D 31 20 74 6F 20 6D 5B 69 5D 20 64 6F 0D    z:=1 to m[i] do.
0231D0:  0A 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20    .       begin.. 
0231E0:  20 20 20 20 20 20 77 72 69 74 65 28 27 56 61 6C          write('Val
0231F0:  65 75 72 20 64 75 20 70 61 72 61 6D 65 74 72 65    eur du parametre
023200:  20 6E 2E 27 29 3B 77 72 69 74 65 28 7A 29 3B 77     n.');write(z);w
023210:  72 69 74 65 28 27 20 3D 27 29 3B 72 65 61 64 6C    rite(' =');readl
023220:  6E 28 70 5B 7A 2C 69 5D 29 3B 0D 0A 20 20 20 20    n(p[z,i]);..    
023230:  20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20 20 20       end;..       
023240:  65 6E 64 3B 0D 0A 20 20 20 20 20 20 20 63 61 6C    end;..       cal
023250:  63 75 6C 66 6F 6E 63 74 69 6F 6E 28 66 5B 69 5D    culfonction(f[i]
023260:  29 3B 0D 0A 20 20 20 20 20 20 20 65 6E 64 3B 0D    );..       end;.
023270:  0A 20 35 3A 20 20 20 20 62 65 67 69 6E 0D 0A 20    . 5:    begin.. 
023280:  20 20 20 20 20 20 63 6C 72 73 63 72 3B 77 72 69          clrscr;wri
023290:  74 65 28 27 4E 6F 20 64 65 20 6C 61 20 66 6F 6E    te('No de la fon
0232A0:  63 74 69 6F 6E 20 28 31 20 61 20 39 29 3F 27 29    ction (1 a 9)?')
0232B0:  3B 0D 0A 20 20 20 20 20 20 20 69 3A 3D 6E 75 6D    ;..       i:=num
0232C0:  66 6F 6E 63 3B 0D 0A 20 20 20 20 20 20 20 69 66    fonc;..       if
0232D0:  20 66 5B 69 5D 3D 6E 69 6C 20 74 68 65 6E 20 6C     f[i]=nil then l
0232E0:  69 72 66 6F 6E 63 74 69 6F 6E 28 66 5B 69 5D 29    irfonction(f[i])
0232F0:  3B 0D 0A 20 20 20 20 20 20 20 77 72 69 74 65 6C    ;..       writel
023300:  6E 28 27 66 27 2C 69 2C 27 28 78 29 3D 27 2C 74    n('f',i,'(x)=',t
023310:  61 70 65 66 6F 6E 63 74 69 6F 6E 28 66 5B 69 5D    apefonction(f[i]
023320:  2C 27 78 27 29 29 3B 0D 0A 20 20 20 20 20 20 20    ,'x'));..       
023330:  77 72 69 74 65 28 27 4E 6F 20 64 65 20 6C 61 20    write('No de la 
023340:  64 65 72 69 76 65 65 20 28 31 20 61 20 39 20 65    derivee (1 a 9 e
023350:  74 20 64 69 66 66 65 72 65 6E 74 20 64 75 20 6E    t different du n
023360:  6F 20 66 6F 6E 63 74 69 6F 6E 29 3F 27 29 3B 0D    o fonction)?');.
023370:  0A 20 20 20 20 20 20 20 6A 3A 3D 6E 75 6D 66 6F    .       j:=numfo
023380:  6E 63 3B 0D 0A 20 20 20 20 20 69 66 20 69 3C 3E    nc;..     if i<>
023390:  6A 20 74 68 65 6E 0D 0A 20 20 20 20 20 62 65 67    j then..     beg
0233A0:  69 6E 0D 0A 20 20 20 20 20 20 20 64 65 66 69 6E    in..       defin
0233B0:  69 3A 3D 74 72 75 65 3B 0D 0A 20 20 20 20 20 20    i:=true;..      
0233C0:  20 66 5B 6A 5D 3A 3D 64 65 72 69 76 65 28 66 5B     f[j]:=derive(f[
0233D0:  69 5D 29 3B 6D 5B 6A 5D 3A 3D 6D 5B 69 5D 3B 0D    i]);m[j]:=m[i];.
0233E0:  0A 20 20 20 20 20 20 20 69 66 20 64 65 66 69 6E    .       if defin
0233F0:  69 3D 74 72 75 65 20 74 68 65 6E 0D 0A 20 20 20    i=true then..   
023400:  20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20         begin..    
023410:  20 20 20 20 20 61 6C 67 65 62 72 69 71 75 65 28         algebrique(
023420:  66 5B 6A 5D 29 3B 0D 0A 20 20 20 20 20 20 20 20    f[j]);..        
023430:  20 77 72 69 74 65 6C 6E 28 27 44 65 72 69 76 65     writeln('Derive
023440:  65 20 64 65 20 66 27 2C 69 2C 27 28 78 29 3D 27    e de f',i,'(x)='
023450:  2C 74 61 70 65 66 6F 6E 63 74 69 6F 6E 28 66 5B    ,tapefonction(f[
023460:  6A 5D 2C 27 78 27 29 29 3B 0D 0A 20 20 20 20 20    j],'x'));..     
023470:  20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20       end..        
023480:  65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 77 72    else..        wr
023490:  69 74 65 6C 6E 28 27 4C 61 20 64 65 72 69 76 65    iteln('La derive
0234A0:  65 20 6E 27 27 65 73 74 20 70 61 73 20 64 65 66    e n''est pas def
0234B0:  69 6E 69 65 20 28 49 4E 54 20 6F 75 20 41 42 53    inie (INT ou ABS
0234C0:  2E 2E 29 27 29 3B 0D 0A 20 20 20 20 20 20 20 74    ..)');..       t
0234D0:  65 6D 70 6F 3B 0D 0A 20 20 20 20 20 65 6E 64 0D    empo;..     end.
0234E0:  0A 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20    .     else..    
0234F0:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20      begin..       
023500:  77 72 69 74 65 6C 6E 3B 0D 0A 20 20 20 20 20 20    writeln;..      
023510:  20 77 72 69 74 65 6C 6E 28 27 4D 65 6D 65 20 6E     writeln('Meme n
023520:  75 6D 65 72 6F 20 70 6F 75 72 20 66 20 65 74 20    umero pour f et 
023530:  66 27 27 2E 20 52 65 63 6F 6D 6D 65 6E 63 65 7A    f''. Recommencez
023540:  20 21 21 21 27 29 3B 0D 0A 20 20 20 20 20 20 20     !!!');..       
023550:  74 65 6D 70 6F 3B 0D 0A 20 20 20 20 20 20 65 6E    tempo;..      en
023560:  64 3B 0D 0A 20 20 20 20 20 65 6E 64 3B 0D 0A 36    d;..     end;..6
023570:  3A 20 20 20 20 64 65 76 6C 69 6D 3B 0D 0A 0D 0A    :    devlim;....
023580:  65 6E 64 3B 0D 0A 75 6E 74 69 6C 20 63 68 6F 69    end;..until choi
023590:  78 3D 37 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 1A 1A    x=7;..end;......
0235A0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0235B0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0235C0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0235D0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0235E0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0235F0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
023600:  77 72 69 74 65 6C 6E 3B 0D 0A 20 20 20 77 72 69    writeln;..   wri
023610:  74 65 6C 6E 28 27 32 2D 43 6F 75 72 62 65 20 78    teln('2-Courbe x
023620:  3D 66 28 74 29 3B 79 3D 66 28 74 29 27 29 3B 77    =f(t);y=f(t)');w
023630:  72 69 74 65 6C 6E 3B 0D 0A 20 20 20 77 72 69 74    riteln;..   writ
023640:  65 6C 6E 28 27 33 2D 43 6F 75 72 62 65 20 70 6F    eln('3-Courbe po
023650:  6C 61 69 72 65 20 72 3D 66 28 74 29 27 29 3B 77    laire r=f(t)');w
023660:  72 69 74 65 6C 6E 3B 0D 0A 20 20 20 77 72 69 74    riteln;..   writ
023670:  65 28 27 56 6F 74 72 65 20 63 68 6F 69 78 3F 20    e('Votre choix? 
023680:  27 29 3B 0D 0A 20 20 20 72 65 70 65 61 74 0D 0A    ');..   repeat..
023690:  20 20 20 72 65 61 64 28 6B 62 64 2C 63 61 72 29       read(kbd,car)
0236A0:  3B 0D 0A 20 20 20 75 6E 74 69 6C 20 28 28 63 61    ;..   until ((ca
0236B0:  72 3E 27 30 27 29 20 61 6E 64 20 28 63 61 72 3C    r>'0') and (car<
0236C0:  27 34 27 29 29 3B 0D 0A 20 20 20 77 72 69 74 65    '4'));..   write
0236D0:  6C 6E 3B 0D 0A 20 20 20 76 61 6C 28 63 61 72 2C    ln;..   val(car,
0236E0:  63 68 6F 69 78 2C 72 65 73 75 6C 74 29 3B 0D 0A    choix,result);..
0236F0:  20 20 20 77 72 69 74 65 6C 6E 3B 0D 0A 20 20 65       writeln;..  e
023700:  65 6E 20 65 78 70 6F 73 61 6E 74 3A 3D 31 20 65    en exposant:=1 e
023710:  6C 73 65 0D 0A 69 66 20 6C 6C 3E 30 20 74 68 65    lse..if ll>0 the
023720:  6E 20 62 65 67 69 6E 20 6C 3A 3D 6C 2D 31 3B 65    n begin l:=l-1;e
023730:  78 70 6F 73 61 6E 74 3A 3D 6B 2A 65 78 70 6F 73    xposant:=k*expos
023740:  61 6E 74 28 6B 2C 6C 29 20 65 6E 64 20 65 6C 73    ant(k,l) end els
023750:  65 0D 0A 69 66 20 6C 6C 3C 30 20 74 68 65 6E 20    e..if ll<0 then 
023760:  62 65 67 69 6E 20 6C 3A 3D 6C 2B 31 3B 65 78 70    begin l:=l+1;exp
023770:  6F 73 61 6E 74 3A 3D 28 31 2F 6B 29 2A 65 78 70    osant:=(1/k)*exp
023780:  6F 73 61 6E 74 28 6B 2C 6C 29 20 65 6E 64 3B 0D    osant(k,l) end;.
023790:  0A 65 6E 64 3B 0D 0A 0D 0A 0D 0A 70 72 6F 63 65    .end;......proce
0237A0:  64 75 72 65 20 20 20 20 63 61 6C 63 75 6C 66 6F    dure    calculfo
0237B0:  6E 63 74 69 6F 6E 28 66 3A 66 6F 6E 63 74 69 6F    nction(f:fonctio
0237C0:  6E 29 3B 0D 0A 76 61 72 0D 0A 63 68 78 2C 63 68    n);..var..chx,ch
0237D0:  79 3A 73 74 72 31 30 3B 0D 0A 62 65 67 69 6E 0D    y:str10;..begin.
0237E0:  0A 20 63 6C 72 73 63 72 3B 0D 0A 20 72 65 70 65    . clrscr;.. repe
0237F0:  61 74 0D 0A 20 77 72 69 74 65 28 27 76 61 6C 65    at.. write('vale
023800:  75 72 20 64 65 20 78 20 3F 27 29 3B 0D 0A 20 72    ur de x ?');.. r
023810:  65 61 64 6C 6E 28 78 29 3B 0D 0A 20 64 65 66 69    eadln(x);.. defi
023820:  6E 69 3A 3D 74 72 75 65 3B 72 65 73 75 6C 74 61    ni:=true;resulta
023830:  74 3A 3D 63 61 6C 63 75 6C 28 66 2C 78 29 3B 0D    t:=calcul(f,x);.
023840:  0A 20 69 66 20 66 72 61 63 28 78 29 3D 30 20 74    . if frac(x)=0 t
023850:  68 65 6E 20 73 74 72 28 72 6F 75 6E 64 28 78 29    hen str(round(x)
023860:  2C 63 68 78 29 20 65 6C 73 65 20 73 74 72 28 78    ,chx) else str(x
023870:  3A 38 3A 33 2C 63 68 78 29 3B 0D 0A 20 69 66 20    :8:3,chx);.. if 
023880:  64 65 66 69 6E 69 3D 74 72 75 65 20 74 68 65 6E    defini=true then
023890:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
0238A0:  20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20          begin..   
0238B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0238C0:  20 77 72 69 74 65 28 27 66 27 2C 69 2C 27 28 27     write('f',i,'('
0238D0:  2C 63 68 78 2C 27 29 3D 27 29 3B 0D 0A 20 20 20    ,chx,')=');..   
0238E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0238F0:  20 69 66 20 66 72 61 63 28 72 65 73 75 6C 74 61     if frac(resulta
023900:  74 29 3D 30 20 74 68 65 6E 20 73 74 72 28 72 6F    t)=0 then str(ro
023910:  75 6E 64 28 72 65 73 75 6C 74 61 74 29 2C 63 68    und(resultat),ch
023920:  79 29 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20    y) else..       
023930:  20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 72                 str
023940:  28 72 65 73 75 6C 74 61 74 3A 38 3A 33 2C 63 68    (resultat:8:3,ch
023950:  79 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    y);..           
023960:  20 20 20 20 20 20 20 20 20 77 72 69 74 65 6C 6E             writeln
023970:  28 63 68 79 29 3B 0D 0A 20 20 20 20 20 20 20 20    (chy);..        
023980:  20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 0D                end.
023990:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
0239A0:  20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20         else..     
0239B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62                   b
0239C0:  65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20    egin..          
0239D0:  20 20 20 20 20 20 20 20 20 20 77 72 69 74 65 6C              writel
0239E0:  6E 28 27 66 27 2C 69 2C 27 28 27 2C 63 68 78 2C    n('f',i,'(',chx,
0239F0:  27 29 20 6E 27 27 65 73 74 20 70 61 73 20 64 65    ') n''est pas de
023A00:  66 69 6E 69 65 27 29 3B 0D 0A 20 20 20 20 20 20    finie');..      
023A10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6E                  en
023A20:  64 3B 0D 0A 20 77 72 69 74 65 6C 6E 28 27 3C 31    d;.. writeln('<1
023A30:  3E 20 55 6E 20 61 75 74 72 65 20 78 3F 20 3C 32    > Un autre x? <2
023A40:  3E 20 52 65 74 6F 75 72 20 61 75 20 6D 65 6E 75    > Retour au menu
023A50:  20 27 29 3B 0D 0A 20 20 20 72 65 70 65 61 74 0D     ');..   repeat.
023A60:  0A 20 20 20 72 65 61 64 28 6B 62 64 2C 63 61 72    .   read(kbd,car
023A70:  29 3B 0D 0A 20 20 20 75 6E 74 69 6C 20 28 28 63    );..   until ((c
023A80:  61 72 3D 27 31 27 29 20 6F 72 20 28 63 61 72 3D    ar='1') or (car=
023A90:  27 32 27 29 29 3B 0D 0A 20 20 20 76 61 6C 28 63    '2'));..   val(c
023AA0:  61 72 2C 63 68 6F 69 78 2C 72 65 73 75 6C 74 29    ar,choix,result)
023AB0:  3B 0D 0A 20 77 72 69 74 65 6C 6E 3B 0D 0A 20 75    ;.. writeln;.. u
023AC0:  6E 74 69 6C 20 63 68 6F 69 78 3D 32 0D 0A 65 6E    ntil choix=2..en
023AD0:  64 3B 0D 0A 0D 0D 0D 0D 1A 1A 1A 1A 1A 1A 1A 1A    d;..............
023AE0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
023AF0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
023B00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
023B10:  1E 00 00 00 02 09 4E E5 1E 00 41 02 00 00 00 02    ......N...A.....
023B20:  1E 00 42 02 00 00 00 02 1E 00 43 02 00 00 00 02    ..B.......C.....
023B30:  1E 00 44 02 00 00 00 02 1E 00 45 02 00 00 00 02    ..D.......E.....
023B40:  1E 00 46 02 00 00 00 02 1E 00 47 02 00 00 00 02    ..F.......G.....
023B50:  1E 00 48 02 00 00 00 02 1E 00 49 02 00 00 00 02    ..H.......I.....
023B60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023B70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023B80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023B90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023BA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023BB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023BC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023BD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023BE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023BF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023C00:  2A 4A ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB 11    *J.^#V.....^#V..
023C10:  12 00 19 E5 2A 4A ED 5E 23 56 EB 11 14 00 19 5E    ....*J.^#V.....^
023C20:  23 56 EB 11 12 00 19 E5 CD 50 2D EB E1 73 23 72    #V.......P-..s#r
023C30:  2A 4A ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB E5    *J.^#V.....^#V..
023C40:  CD 4D 05 04 70 6C 75 73 06 06 CD 01 06 2A 4A ED    .M..plus.....*J.
023C50:  5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 07 00 19    ^#V.....^#V.....
023C60:  E5 21 2B 00 65 2E 01 E5 06 0A CD 01 06 2A 4A ED    .!+.e........*J.
023C70:  5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 07 00 19    ^#V.....^#V.....
023C80:  CD 3A 05 21 2B 00 65 2E 01 E5 CD 8D 06 E5 2A 4A    .:.!+.e.......*J
023C90:  ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 11 07 00    .^#V.....^#V....
023CA0:  19 CD 3A 05 21 2D 00 65 2E 01 E5 CD 8D 06 D1 7D    ..:.!-.e.......}
023CB0:  B3 6F E5 2A 4A ED 5E 23 56 EB 11 14 00 19 5E 23    .o.*J.^#V.....^#
023CC0:  56 EB 11 07 00 19 CD 3A 05 21 2B 00 65 2E 01 E5    V......:.!+.e...
023CD0:  CD 8D 06 E5 2A 4A ED 5E 23 56 EB 11 14 00 19 5E    ....*J.^#V.....^
023CE0:  23 56 EB 11 07 00 19 CD 3A 05 21 2D 00 65 2E 01    #V......:.!-.e..
023CF0:  E5 CD 8D 06 D1 7D B3 6F D1 7D A3 6F CB 45 CA CC    .....}.o.}£o.E..
023D00:  72 21 40 ED E5 21 16 00 CD E5 1C 2A 4A ED 5E 23    r!@..!.....*J.^#
023D10:  56 EB CD 3A 05 06 06 2A 40 ED CD E2 05 2A 40 ED    V..:...*@....*@.
023D20:  11 07 00 19 E5 2A 4A ED 5E 23 56 EB 11 07 00 19    .....*J.^#V.....
023D30:  CD 3A 05 06 0A CD 01 06 2A 40 ED 11 14 00 19 E5    .:......*@......
023D40:  2A 4A ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB EB    *J.^#V.....^#V..
023D50:  E1 73 23 72 2A 40 ED 11 12 00 19 E5 2A 4A ED 5E    .s#r*@......*J.^
023D60:  23 56 EB 11 12 00 19 5E 23 56 EB 11 14 00 19 5E    #V.....^#V.....^
023D70:  23 56 EB EB E1 73 23 72 2A 4A ED 5E 23 56 EB 11    #V...s#r*J.^#V..
023D80:  14 00 19 E5 2A 40 ED EB E1 73 23 72 2A 4A ED 5E    ....*@...s#r*J.^
023D90:  23 56 EB 11 12 00 19 E5 2A 4A ED 5E 23 56 EB 11    #V......*J.^#V..
023DA0:  12 00 19 5E 23 56 EB 11 12 00 19 5E 23 56 EB EB    ...^#V.....^#V..
023DB0:  E1 73 23 72 21 01 00 22 94 F2 2A 4A ED 5E 23 56    .s#r!.."..*J.^#V
023DC0:  EB 11 14 00 19 E5 CD 23 6F C3 7F 75 2A 4A ED 5E    .......#o..u*J.^
023DD0:  23 56 EB 11 14 00 19 5E 23 56 EB 11 07 00 19 CD    #V.....^#V......
023DE0:  3A 05 21 2B 00 65 2E 01 E5 CD 8D 06 E5 2A 4A ED    :.!+.e.......*J.
023DF0:  5E 23 56 EB 11 14 00 19 5E 23 56 EB 11 07 00 19    ^#V.....^#V.....
023E00:  CD 3A 05 21 2D 00 65 2E 01 E5 CD 8D 06 D1 7D B3    .:.!-.e.......}.
023E10:  6F CB 45 CA 22 74 2A 4A ED 5E 23 56 EB 11 12 00    o.E."t*J.^#V....
023E20:  19 5E 23 56 EB E5 CD 99 4C E5 21 00 00 D1 CD A5    .^#V....L.!.....
023E30:  06 E5 2A 4A ED 5E 23 56 EB 11 12 00 19 5E 23 56    ..*J.^#V.....^#V
023E40:  EB E5 CD 99 4C E5 2A 4A ED 5E 23 56 EB 11 14 00    ....L.*J.^#V....
023E50:  19 5E 23 56 EB 11 12 00 19 5E 23 56 EB E5 CD 99    .^#V.....^#V....
023E60:  4C D1 CD 7F 06 D1 7D A3 6F CB 45 CA 1F 74 2A 4A    L.....}£o.E..t*J
023E70:  ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB 22 40 ED    .^#V.....^#V."@.
023E80:  2A 4A ED 5E 23 56 EB 11 12 00 19 E5 2A 4A ED 5E    *J.^#V......*J.^
023E90:  23 56 EB 11 14 00 19 5E 23 56 EB 11 14 00 19 5E    #V.....^#V.....^
023EA0:  23 56 EB EB E1 73 23 72 2A 4A ED 5E 23 56 EB 11    #V...s#r*J.^#V..
023EB0:  14 00 19 5E 23 56 EB 11 14 00 19 E5 2A 40 ED EB    ...^#V......*@..
023EC0:  E1 73 23 72 2A 4A ED 5E 23 56 EB 11 14 00 19 5E    .s#r*J.^#V.....^
023ED0:  23 56 EB 22 40 ED 2A 4A ED 5E 23 56 EB 11 14 00    #V."@.*J.^#V....
023EE0:  19 E5 2A 4A ED 5E 23 56 EB 11 12 00 19 5E 23 56    ..*J.^#V.....^#V
023EF0:  EB EB E1 73 23 72 2A 4A ED 5E 23 56 EB 11 12 00    ...s#r*J.^#V....
023F00:  19 E5 2A 40 ED EB E1 73 23 72 2A 4A ED 5E 23 56    ..*@...s#r*J.^#V
023F10:  EB 11 12 00 19 E5 CD 88 51 21 01 00 22 94 F2 C3    ........Q!.."...
023F20:  7F 75 2A 4A ED 5E 23 56 EB 11 12 00 19 5E 23 56    .u*J.^#V.....^#V
023F30:  EB 11 07 00 19 CD 3A 05 21 2B 00 65 2E 01 E5 CD    ......:.!+.e....
023F40:  8D 06 E5 2A 4A ED 5E 23 56 EB 11 12 00 19 5E 23    ...*J.^#V.....^#
023F50:  56 EB 11 07 00 19 CD 3A 05 21 2D 00 65 2E 01 E5    V......:.!-.e...
023F60:  CD 8D 06 D1 7D B3 6F E5 2A 4A ED 5E 23 56 EB 11    ....}.o.*J.^#V..
023F70:  14 00 19 5E 23 56 EB E5 CD 99 4C E5 21 00 00 D1    ...^#V....L.!...
023F80:  CD A5 06 D1 7D A3 6F E5 2A 4A ED 5E 23 56 EB 11    ....}£o.*J.^#V..
023F90:  14 00 19 5E 23 56 EB E5 CD 99 4C E5 2A 4A ED 5E    ...^#V....L.*J.^
023FA0:  23 56 EB 11 12 00 19 5E 23 56 EB 11 14 00 19 5E    #V.....^#V.....^
023FB0:  23 56 EB E5 CD 99 4C D1 CD 7F 06 D1 7D A3 6F CB    #V....L.....}£o.
023FC0:  45 CA 29 75 2A 4A ED 5E 23 56 EB 11 12 00 19 5E    E.)u*J.^#V.....^
023FD0:  23 56 EB 22 40 ED 2A 4A ED 5E 23 56 EB 11 12 00    #V."@.*J.^#V....
023FE0:  19 E5 2A 4A ED 5E 23 56 EB 11 14 00 19 5E 23 56    ..*J.^#V.....^#V
023FF0:  EB EB E1 73 23 72 2A 4A ED 5E 23 56 EB 11 14 00    ...s#r*J.^#V....
024000:  19 E5 2A 40 ED EB E1 73 23 72 2A 4A ED 5E 23 56    ..*@...s#r*J.^#V
024010:  EB 11 14 00 19 E5 CD 96 4C 21 01 00 22 94 F2 2A    ........L!.."..*
024020:  4A ED E5 CD 23 6F C3 7F 75 2A 4A ED 5E 23 56 EB    J...#o..u*J.^#V.
024030:  11 12 00 19 5E 23 56 EB E5 21 00 00 D1 CD 92 06    ....^#V..!......
024040:  CB 45 CA 54 75 2A 4A ED 5E 23 56 EB 11 12 00 19    .E.Tu*J.^#V.....
024050:  E5 CD 23 6F 2A 4A ED 5E 23 56 EB 11 14 00 19 5E    ..#o*J.^#V.....^
024060:  23 56 EB E5 21 00 00 D1 CD 92 06 CB 45 CA 7F 75    #V..!.......E..u
024070:  2A 4A ED 5E 23 56 EB 11 14 00 19 E5 CD 23 6F 2A    *J.^#V.......#o*
024080:  4A ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB E5 21    J.^#V.....^#V..!
024090:  00 00 D1 CD 92 06 CB 45 CA AA 75 2A 4A ED 5E 23    .......E..u*J.^#
0240A0:  56 EB 11 12 00 19 E5 CD 23 6F 2A 4A ED 5E 23 56    V.......#o*J.^#V
0240B0:  EB 11 14 00 19 5E 23 56 EB E5 21 00 00 D1 CD 92    .....^#V..!.....
0240C0:  06 CB 45 CA D5 75 2A 4A ED 5E 23 56 EB 11 14 00    ..E..u*J.^#V....
0240D0:  19 E5 CD 23 6F 01 0E 00 11 3E ED C3 22 05 01 0A    ...#o....>.."...
0240E0:  00 21 34 ED CD 08 05 FD E1 E1 22 3C ED FD E5 21    .!4......."<...!
0240F0:  00 00 22 94 F2 2A 3C ED E5 CD 56 2D 2A 94 F2 E5    .."..*<...V-*...
024100:  21 00 00 D1 CD 7F 06 CB 45 CA EF 75 21 00 00 22    !.......E..u!.."
024110:  94 F2 2A 3C ED E5 CD 9C 4C 2A 94 F2 E5 21 00 00    ..*<....L*...!..
024120:  D1 CD 7F 06 CB 45 CA 0C 76 21 00 00 22 94 F2 2A    .....E..v!.."..*
024130:  3C ED E5 CD C7 57 2A 94 F2 E5 21 00 00 D1 CD 7F    <....W*...!.....
024140:  06 CB 45 CA 29 76 21 00 00 22 94 F2 2A 3C ED E5    ..E.)v!.."..*<..
024150:  CD 96 4C 2A 3C ED E5 CD 23 6F 2A 94 F2 E5 21 00    ..L*<...#o*...!.
024160:  00 D1 CD 7F 06 CB 45 CA 46 76 21 00 00 22 94 F2    ......E.Fv!.."..
024170:  2A 3C ED E5 CD 56 2D 2A 94 F2 E5 21 00 00 D1 CD    *<...V-*...!....
024180:  7F 06 CB 45 CA 6A 76 01 0A 00 11 34 ED C3 22 05    ...E.jv....4..".
024190:  01 18 00 21 1C ED CD 08 05 FD E1 E1 22 32 ED FD    ...!........"2..
0241A0:  E5 2A 32 ED 5E 23 56 EB 11 07 00 19 CD 3A 05 21    .*2.^#V......:.!
0241B0:  5E 00 65 2E 01 E5 CD 8D 06 E5 2A 32 ED 5E 23 56    ^.e.......*2.^#V
0241C0:  EB 11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A 05    .....^#V......:.
0241D0:  21 2B 00 65 2E 01 E5 CD 8D 06 E5 2A 32 ED 5E 23    !+.e.......*2.^#
0241E0:  56 EB 11 14 00 19 5E 23 56 EB 11 07 00 19 CD 3A    V.....^#V......:
0241F0:  05 21 2D 00 65 2E 01 E5 CD 8D 06 D1 7D B3 6F D1    .!-.e.......}.o.
024200:  7D A3 6F E5 2A 32 ED 5E 23 56 EB 11 12 00 19 5E    }£o.*2.^#V.....^
024210:  23 56 EB CD 3A 05 CD 4D 05 06 6E 6F 6D 62 72 65    #V..:..M..nombre
024220:  CD 8D 06 D1 7D A3 6F CB 45 CA 41 79 2A 32 ED 5E    ....}£o.E.Ay*2.^
024230:  23 56 EB 11 12 00 19 5E 23 56 EB 11 07 00 19 CD    #V.....^#V......
024240:  3A 05 21 1E ED E5 21 1C ED CD F3 1E 21 1E ED CD    :.!...!.....!...
024250:  2C 05 CD 34 0C C5 D5 E5 21 00 00 CD 08 10 D9 E1    ,..4....!.......
024260:  D1 C1 CD 88 06 E5 21 1E ED CD 2C 05 C5 D5 E5 21    ......!...,....!
024270:  02 00 CD 08 10 D9 E1 D1 C1 CD AE 06 D1 7D A3 6F    .............}£o
024280:  CB 45 CA 3E 79 21 1E ED CD 2C 05 C5 D5 E5 21 02    .E.>y!...,....!.
024290:  00 CD 08 10 D9 E1 D1 C1 CD 88 06 CB 45 CA F8 77    ............E..w
0242A0:  2A 32 ED 5E 23 56 EB E5 CD 4D 05 05 6D 75 6C 74    *2.^#V...M..mult
0242B0:  69 06 06 CD 01 06 2A 32 ED 5E 23 56 EB 11 07 00    i.....*2.^#V....
0242C0:  19 E5 21 2A 00 65 2E 01 E5 06 0A CD 01 06 2A 32    ..!*.e........*2
0242D0:  ED 5E 23 56 EB 11 12 00 19 E5 2A 32 ED 5E 23 56    .^#V......*2.^#V
0242E0:  EB 11 14 00 19 5E 23 56 EB EB E1 73 23 72 2A 32    .....^#V...s#r*2
0242F0:  ED E5 CD DE 75 C3 3E 79 21 28 ED E5 21 16 00 CD    ....u.>y!(..!...
024300:  E5 1C CD 4D 05 05 70 75 69 73 73 06 06 2A 28 ED    ...M..puiss..*(.
024310:  CD E2 05 2A 28 ED 11 07 00 19 E5 21 5E 00 65 2E    ...*(......!^.e.
024320:  01 E5 06 0A CD 01 06 2A 28 ED 11 14 00 19 E5 2A    .......*(......*
024330:  32 ED 5E 23 56 EB 11 14 00 19 5E 23 56 EB EB E1    2.^#V.....^#V...
024340:  73 23 72 21 26 ED E5 21 16 00 CD E5 1C CD 4D 05    s#r!&..!......M.
024350:  06 6E 6F 6D 62 72 65 06 06 2A 26 ED CD E2 05 21    .nombre..*&....!
024360:  1E ED CD 2C 05 C5 D5 E5 21 01 00 CD 08 10 D9 E1    ...,....!.......
024370:  D1 C1 CD F2 09 D9 21 1E ED CD D1 05 21 1E ED CD    ......!.....!...
024380:  2C 05 CD D0 0F E5 21 00 00 E5 2A 26 ED 11 07 00    ,.....!...*&....
024390:  19 06 0A CD BE 1E 2A 26 ED 11 12 00 19 E5 21 00    ......*&......!.
0243A0:  00 EB E1 73 23 72 2A 26 ED 11 14 00 19 E5 21 00    ...s#r*&......!.
0243B0:  00 EB E1 73 23 72 2A 28 ED 11 12 00 19 E5 2A 26    ...s#r*(......*&
0243C0:  ED EB E1 73 23 72 2A 32 ED 5E 23 56 EB 11 12 00    ...s#r*2.^#V....
0243D0:  19 E5 2A 32 ED 5E 23 56 EB 11 14 00 19 5E 23 56    ..*2.^#V.....^#V
0243E0:  EB EB E1 73 23 72 2A 32 ED 5E 23 56 EB 11 14 00    ...s#r*2.^#V....
0243F0:  19 E5 2A 28 ED EB E1 73 23 72 2A 32 ED 5E 23 56    ..*(...s#r*2.^#V
024400:  EB 11 14 00 19 E5 CD 90 76 2A 32 ED 5E 23 56 EB    ........v*2.^#V.
024410:  E5 CD 4D 05 05 6D 75 6C 74 69 06 06 CD 01 06 2A    ..M..multi.....*
024420:  32 ED 5E 23 56 EB 11 07 00 19 E5 21 2A 00 65 2E    2.^#V......!*.e.
024430:  01 E5 06 0A CD 01 06 2A 32 ED E5 CD DE 75 C3 97    .......*2....u..
024440:  79 2A 32 ED 5E 23 56 EB 11 12 00 19 5E 23 56 EB    y*2.^#V.....^#V.
024450:  E5 21 00 00 D1 CD 92 06 CB 45 CA 6C 79 2A 32 ED    .!.......E.ly*2.
024460:  5E 23 56 EB 11 12 00 19 E5 CD 90 76 2A 32 ED 5E    ^#V........v*2.^
024470:  23 56 EB 11 14 00 19 5E 23 56 EB E5 21 00 00 D1    #V.....^#V..!...
024480:  CD 92 06 CB 45 CA 97 79 2A 32 ED 5E 23 56 EB 11    ....E..y*2.^#V..
024490:  14 00 19 E5 CD 90 76 01 18 00 11 1C ED C3 22 05    ......v.......".
0244A0:  01 22 00 21 FA EC CD 08 05 FD E1 E1 22 18 ED FD    .".!........"...
0244B0:  E5 21 0E ED E5 21 16 00 CD E5 1C 2A 0E ED 22 1A    .!...!.....*..".
0244C0:  ED 2A 18 ED E5 21 00 00 D1 CD 7F 06 CB 45 CA E4    .*...!.......E..
0244D0:  79 21 0E ED E5 21 16 00 CD 7A 1D 21 00 00 22 1A    y!...!...z.!..".
0244E0:  ED C3 B3 92 2A 18 ED CD 3A 05 CD 4D 05 06 6E 6F    ....*...:..M..no
0244F0:  6D 62 72 65 CD 8D 06 E5 2A 18 ED CD 3A 05 CD 4D    mbre....*...:..M
024500:  05 05 70 61 72 61 6D CD 8D 06 D1 7D B3 6F CB 45    ..param....}.o.E
024510:  CA 5C 7A CD 4D 05 06 6E 6F 6D 62 72 65 06 06 2A    .\z.M..nombre..*
024520:  0E ED CD E2 05 2A 0E ED 11 07 00 19 E5 21 30 00    .....*.......!0.
024530:  65 2E 01 E5 06 0A CD 01 06 2A 0E ED 11 12 00 19    e........*......
024540:  E5 21 00 00 EB E1 73 23 72 2A 0E ED 11 14 00 19    .!....s#r*......
024550:  E5 21 00 00 EB E1 73 23 72 C3 B3 92 2A 18 ED CD    .!....s#r...*...
024560:  3A 05 CD 4D 05 06 76 61 72 69 61 62 CD 8D 06 CB    :..M..variab....
024570:  45 CA BD 7A CD 4D 05 06 6E 6F 6D 62 72 65 06 06    E..z.M..nombre..
024580:  2A 0E ED CD E2 05 2A 0E ED 11 07 00 19 E5 21 31    *.....*.......!1
024590:  00 65 2E 01 E5 06 0A CD 01 06 2A 0E ED 11 12 00    .e........*.....
0245A0:  19 E5 21 00 00 EB E1 73 23 72 2A 0E ED 11 14 00    ..!....s#r*.....
0245B0:  19 E5 21 00 00 EB E1 73 23 72 C3 B3 92 2A 18 ED    ..!....s#r...*..
0245C0:  CD 3A 05 CD 4D 05 04 70 6C 75 73 CD 8D 06 E5 2A    .:..M..plus....*
0245D0:  18 ED CD 3A 05 CD 4D 05 05 6D 6F 69 6E 73 CD 8D    ...:..M..moins..
0245E0:  06 D1 7D B3 6F CB 45 CA 4A 7B 2A 18 ED CD 3A 05    ..}.o.E.J{*...:.
0245F0:  06 06 2A 0E ED CD E2 05 2A 0E ED 11 07 00 19 E5    ..*.....*.......
024600:  2A 18 ED 11 07 00 19 CD 3A 05 06 0A CD 01 06 2A    *.......:......*
024610:  0E ED 11 12 00 19 E5 2A 18 ED 11 12 00 19 5E 23    .......*......^#
024620:  56 EB E5 CD A0 79 EB E1 73 23 72 2A 0E ED 11 14    V....y..s#r*....
024630:  00 19 E5 2A 18 ED 11 14 00 19 5E 23 56 EB E5 CD    ...*......^#V...
024640:  A0 79 EB E1 73 23 72 C3 B3 92 2A 18 ED CD 3A 05    .y..s#r...*...:.
024650:  CD 4D 05 05 6D 75 6C 74 69 CD 8D 06 CB 45 CA 98    .M..multi....E..
024660:  7C CD 4D 05 04 70 6C 75 73 06 06 2A 0E ED CD E2    |.M..plus..*....
024670:  05 2A 0E ED 11 07 00 19 E5 21 2B 00 65 2E 01 E5    .*.......!+.e...
024680:  06 0A CD 01 06 2A 0E ED 11 14 00 19 E5 21 16 00    .....*.......!..
024690:  CD E5 1C 2A 0E ED 11 14 00 19 5E 23 56 EB E5 CD    ...*......^#V...
0246A0:  4D 05 05 6D 75 6C 74 69 06 06 CD 01 06 2A 0E ED    M..multi.....*..
0246B0:  11 14 00 19 5E 23 56 EB 11 07 00 19 E5 21 2A 00    ....^#V......!*.
0246C0:  65 2E 01 E5 06 0A CD 01 06 2A 0E ED 11 14 00 19    e........*......
0246D0:  5E 23 56 EB 11 12 00 19 E5 2A 18 ED 11 12 00 19    ^#V......*......
0246E0:  5E 23 56 EB EB E1 73 23 72 2A 0E ED 11 12 00 19    ^#V...s#r*......
0246F0:  E5 21 16 00 CD E5 1C 2A 0E ED 11 12 00 19 5E 23    .!.....*......^#
024700:  56 EB E5 CD 4D 05 05 6D 75 6C 74 69 06 06 CD 01    V...M..multi....
024710:  06 2A 0E ED 11 12 00 19 5E 23 56 EB 11 07 00 19    .*......^#V.....
024720:  E5 21 2A 00 65 2E 01 E5 06 0A CD 01 06 2A 0E ED    .!*.e........*..
024730:  11 12 00 19 5E 23 56 EB 11 14 00 19 E5 2A 18 ED    ....^#V......*..
024740:  11 14 00 19 5E 23 56 EB EB E1 73 23 72 2A 0E ED    ....^#V...s#r*..
024750:  11 12 00 19 5E 23 56 EB 11 12 00 19 E5 2A 18 ED    ....^#V......*..
024760:  11 12 00 19 5E 23 56 EB E5 CD A0 79 EB E1 73 23    ....^#V....y..s#
024770:  72 2A 0E ED 11 14 00 19 5E 23 56 EB 11 14 00 19    r*......^#V.....
024780:  E5 2A 18 ED 11 14 00 19 5E 23 56 EB E5 CD A0 79    .*......^#V....y
024790:  EB E1 73 23 72 C3 B3 92 2A 18 ED CD 3A 05 CD 4D    ..s#r...*...:..M
0247A0:  05 06 64 69 76 69 73 65 CD 8D 06 CB 45 CA B5 7E    ..divise....E..~
0247B0:  21 06 ED E5 21 16 00 CD E5 1C 21 04 ED E5 21 16    !...!.....!...!.
0247C0:  00 CD E5 1C 21 02 ED E5 21 16 00 CD E5 1C 21 08    ....!...!.....!.
0247D0:  ED E5 21 16 00 CD E5 1C 21 0C ED E5 21 16 00 CD    ..!.....!...!...
0247E0:  E5 1C CD 4D 05 05 6D 6F 69 6E 73 06 06 2A 06 ED    ...M..moins..*..
0247F0:  CD E2 05 2A 06 ED 11 07 00 19 E5 21 2D 00 65 2E    ...*.......!-.e.
024800:  01 E5 06 0A CD 01 06 2A 06 ED 11 14 00 19 E5 2A    .......*.......*
024810:  02 ED EB E1 73 23 72 2A 06 ED 11 12 00 19 E5 2A    ....s#r*.......*
024820:  08 ED EB E1 73 23 72 CD 4D 05 05 70 75 69 73 73    ....s#r.M..puiss
024830:  06 06 2A 04 ED CD E2 05 2A 04 ED 11 07 00 19 E5    ..*.....*.......
024840:  21 5E 00 65 2E 01 E5 06 0A CD 01 06 2A 04 ED 11    !^.e........*...
024850:  14 00 19 E5 2A 18 ED 11 12 00 19 5E 23 56 EB EB    ....*......^#V..
024860:  E1 73 23 72 2A 04 ED 11 12 00 19 E5 2A 0C ED EB    .s#r*.......*...
024870:  E1 73 23 72 CD 4D 05 06 6E 6F 6D 62 72 65 06 06    .s#r.M..nombre..
024880:  2A 0C ED CD E2 05 2A 0C ED 11 07 00 19 E5 21 32    *.....*.......!2
024890:  00 65 2E 01 E5 06 0A CD 01 06 2A 0C ED 11 12 00    .e........*.....
0248A0:  19 E5 21 00 00 EB E1 73 23 72 2A 0C ED 11 14 00    ..!....s#r*.....
0248B0:  19 E5 21 00 00 EB E1 73 23 72 CD 4D 05 05 6D 75    ..!....s#r.M..mu
0248C0:  6C 74 69 06 06 2A 02 ED CD E2 05 2A 02 ED 11 07    lti..*.....*....
0248D0:  00 19 E5 21 2A 00 65 2E 01 E5 06 0A CD 01 06 2A    ...!*.e........*
0248E0:  02 ED 11 12 00 19 E5 2A 18 ED 11 12 00 19 5E 23    .......*......^#
0248F0:  56 EB EB E1 73 23 72 2A 02 ED 11 14 00 19 E5 2A    V...s#r*.......*
024900:  18 ED 11 14 00 19 5E 23 56 EB E5 CD A0 79 EB E1    ......^#V....y..
024910:  73 23 72 CD 4D 05 05 6D 75 6C 74 69 06 06 2A 08    s#r.M..multi..*.
024920:  ED CD E2 05 2A 08 ED 11 07 00 19 E5 21 2A 00 65    ....*.......!*.e
024930:  2E 01 E5 06 0A CD 01 06 2A 08 ED 11 12 00 19 E5    ........*.......
024940:  2A 18 ED 11 12 00 19 5E 23 56 EB E5 CD A0 79 EB    *......^#V....y.
024950:  E1 73 23 72 2A 08 ED 11 14 00 19 E5 2A 18 ED 11    .s#r*.......*...
024960:  14 00 19 5E 23 56 EB EB E1 73 23 72 CD 4D 05 06    ...^#V...s#r.M..
024970:  64 69 76 69 73 65 06 06 2A 0E ED CD E2 05 2A 0E    divise..*.....*.
024980:  ED 11 07 00 19 E5 21 2F 00 65 2E 01 E5 06 0A CD    ......!/.e......
024990:  01 06 2A 0E ED 11 14 00 19 E5 2A 06 ED EB E1 73    ..*.......*....s
0249A0:  23 72 2A 0E ED 11 12 00 19 E5 2A 04 ED EB E1 73    #r*.......*....s
0249B0:  23 72 C3 B3 92 2A 18 ED CD 3A 05 CD 4D 05 05 70    #r...*...:..M..p
0249C0:  75 69 73 73 CD 8D 06 CB 45 CA F9 82 2A 18 ED 11    uiss....E...*...
0249D0:  12 00 19 5E 23 56 EB CD 3A 05 CD 4D 05 06 6E 6F    ...^#V..:..M..no
0249E0:  6D 62 72 65 CD 8D 06 CB 45 CA F7 80 21 06 ED E5    mbre....E...!...
0249F0:  21 16 00 CD E5 1C 21 04 ED E5 21 16 00 CD E5 1C    !.....!...!.....
024A00:  21 02 ED E5 21 16 00 CD E5 1C 2A 18 ED 11 12 00    !...!.....*.....
024A10:  19 5E 23 56 EB 11 07 00 19 CD 3A 05 21 FA EC E5    .^#V......:.!...
024A20:  21 94 F2 CD F3 1E 2A 18 ED 11 12 00 19 5E 23 56    !.....*......^#V
024A30:  EB 22 0C ED 2A 04 ED 11 14 00 19 E5 2A 18 ED 11    ."..*.......*...
024A40:  14 00 19 5E 23 56 EB EB E1 73 23 72 CD 4D 05 05    ...^#V...s#r.M..
024A50:  6D 75 6C 74 69 06 06 2A 06 ED CD E2 05 2A 06 ED    multi..*.....*..
024A60:  11 07 00 19 E5 21 2A 00 65 2E 01 E5 06 0A CD 01    .....!*.e.......
024A70:  06 2A 06 ED 11 14 00 19 E5 2A 0C ED EB E1 73 23    .*.......*....s#
024A80:  72 2A 06 ED 11 12 00 19 E5 2A 18 ED 11 14 00 19    r*.......*......
024A90:  5E 23 56 EB E5 CD A0 79 EB E1 73 23 72 CD 4D 05    ^#V....y..s#r.M.
024AA0:  05 70 75 69 73 73 06 06 2A 04 ED CD E2 05 2A 04    .puiss..*.....*.
024AB0:  ED 11 07 00 19 E5 21 5E 00 65 2E 01 E5 06 0A CD    ......!^.e......
024AC0:  01 06 2A 04 ED 11 12 00 19 E5 2A 02 ED EB E1 73    ..*.......*....s
024AD0:  23 72 CD 4D 05 06 6E 6F 6D 62 72 65 06 06 2A 02    #r.M..nombre..*.
024AE0:  ED CD E2 05 2A 02 ED 11 14 00 19 E5 21 00 00 EB    ....*.......!...
024AF0:  E1 73 23 72 2A 02 ED 11 12 00 19 E5 21 00 00 EB    .s#r*.......!...
024B00:  E1 73 23 72 21 FA EC CD 2C 05 C5 D5 E5 21 01 00    .s#r!...,....!..
024B10:  CD 08 10 D9 E1 D1 C1 CD F2 09 D9 21 FA EC CD D1    ...........!....
024B20:  05 21 FA EC CD 2C 05 CD 34 0C C5 D5 E5 21 00 00    .!...,..4....!..
024B30:  CD 08 10 D9 E1 D1 C1 CD 88 06 CB 45 CA 5C 80 21    ...........E.\.!
024B40:  FA EC CD 2C 05 CD D0 0F E5 21 00 00 E5 2A 02 ED    ...,.....!...*..
024B50:  11 07 00 19 06 0A CD BE 1E C3 AF 80 21 FA EC CD    ............!...
024B60:  2C 05 C5 D5 E5 21 08 00 E5 21 03 00 E5 2A 02 ED    ,....!...!...*..
024B70:  11 07 00 19 06 0A CD BD 1E 21 20 00 65 2E 01 E5    .........! .e...
024B80:  2A 02 ED 11 07 00 19 CD 3A 05 CD B2 08 E5 21 00    *.......:.....!.
024B90:  00 D1 CD 92 06 CB 45 CA AF 80 2A 02 ED 11 07 00    ......E...*.....
024BA0:  19 E5 21 01 00 E5 21 01 00 CD F3 08 C3 79 80 CD    ..!...!......y..
024BB0:  4D 05 05 6D 75 6C 74 69 06 06 2A 0E ED CD E2 05    M..multi..*.....
024BC0:  2A 0E ED 11 07 00 19 E5 21 2A 00 65 2E 01 E5 06    *.......!*.e....
024BD0:  0A CD 01 06 2A 0E ED 11 14 00 19 E5 2A 06 ED EB    ....*.......*...
024BE0:  E1 73 23 72 2A 0E ED 11 12 00 19 E5 2A 04 ED EB    .s#r*.......*...
024BF0:  E1 73 23 72 C3 F6 82 21 06 ED E5 21 16 00 CD E5    .s#r...!...!....
024C00:  1C CD 4D 05 05 69 64 66 63 74 06 06 2A 06 ED CD    ..M..idfct..*...
024C10:  E2 05 2A 06 ED 11 07 00 19 E5 CD 4D 05 02 6C 6E    ..*........M..ln
024C20:  06 0A CD 01 06 2A 06 ED 11 14 00 19 E5 21 00 00    .....*.......!..
024C30:  EB E1 73 23 72 2A 06 ED 11 12 00 19 E5 2A 18 ED    ..s#r*.......*..
024C40:  11 14 00 19 5E 23 56 EB EB E1 73 23 72 21 04 ED    ....^#V...s#r!..
024C50:  E5 21 16 00 CD E5 1C CD 4D 05 05 6D 75 6C 74 69    .!......M..multi
024C60:  06 06 2A 04 ED CD E2 05 2A 04 ED 11 07 00 19 E5    ..*.....*.......
024C70:  21 2A 00 65 2E 01 E5 06 0A CD 01 06 2A 04 ED 11    !*.e........*...
024C80:  14 00 19 E5 2A 18 ED 11 12 00 19 5E 23 56 EB E5    ....*......^#V..
024C90:  CD A0 79 EB E1 73 23 72 2A 04 ED 11 12 00 19 E5    ..y..s#r*.......
024CA0:  2A 06 ED EB E1 73 23 72 21 02 ED E5 21 16 00 CD    *....s#r!...!...
024CB0:  E5 1C CD 4D 05 05 6D 75 6C 74 69 06 06 2A 02 ED    ...M..multi..*..
024CC0:  CD E2 05 2A 02 ED 11 07 00 19 E5 21 2A 00 65 2E    ...*.......!*.e.
024CD0:  01 E5 06 0A CD 01 06 2A 02 ED 11 14 00 19 E5 2A    .......*.......*
024CE0:  18 ED 11 14 00 19 5E 23 56 EB E5 CD A0 79 EB E1    ......^#V....y..
024CF0:  73 23 72 2A 02 ED 11 12 00 19 E5 2A 18 ED 11 12    s#r*.......*....
024D00:  00 19 5E 23 56 EB EB E1 73 23 72 21 0C ED E5 21    ..^#V...s#r!...!
024D10:  16 00 CD E5 1C CD 4D 05 06 64 69 76 69 73 65 06    ......M..divise.
024D20:  06 2A 0C ED CD E2 05 2A 0C ED 11 07 00 19 E5 21    .*.....*.......!
024D30:  2F 00 65 2E 01 E5 06 0A CD 01 06 2A 0C ED 11 14    /.e........*....
024D40:  00 19 E5 2A 02 ED EB E1 73 23 72 2A 0C ED 11 12    ...*....s#r*....
024D50:  00 19 E5 2A 18 ED 11 14 00 19 5E 23 56 EB EB E1    ...*......^#V...
024D60:  73 23 72 21 0A ED E5 21 16 00 CD E5 1C CD 4D 05    s#r!...!......M.
024D70:  04 70 6C 75 73 06 06 2A 0A ED CD E2 05 2A 0A ED    .plus..*.....*..
024D80:  11 07 00 19 E5 21 2B 00 65 2E 01 E5 06 0A CD 01    .....!+.e.......
024D90:  06 2A 0A ED 11 14 00 19 E5 2A 04 ED EB E1 73 23    .*.......*....s#
024DA0:  72 2A 0A ED 11 12 00 19 E5 2A 0C ED EB E1 73 23    r*.......*....s#
024DB0:  72 CD 4D 05 05 6D 75 6C 74 69 06 06 2A 0E ED CD    r.M..multi..*...
024DC0:  E2 05 2A 0E ED 11 07 00 19 E5 21 2A 00 65 2E 01    ..*.......!*.e..
024DD0:  E5 06 0A CD 01 06 2A 0E ED 11 14 00 19 E5 2A 0A    ......*.......*.
024DE0:  ED EB E1 73 23 72 2A 0E ED 11 12 00 19 E5 2A 18    ...s#r*.......*.
024DF0:  ED EB E1 73 23 72 C3 B3 92 2A 18 ED CD 3A 05 CD    ...s#r...*...:..
024E00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
024E10:  1F 00 00 00 02 09 4E E5 1F 00 41 02 00 00 00 02    ......N...A.....
024E20:  1F 00 42 02 00 00 00 02 1F 00 43 02 00 00 00 02    ..B.......C.....
024E30:  1F 00 44 02 00 00 00 02 1F 00 45 02 00 00 00 02    ..D.......E.....
024E40:  1F 00 46 02 00 00 00 02 1F 00 47 02 00 00 00 02    ..F.......G.....
024E50:  1F 00 48 02 00 00 00 02 1F 00 49 02 00 00 00 02    ..H.......I.....
024E60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024E70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024E80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024E90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024EA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024EB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024EC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024ED0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024EE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024EF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024F00:  4D 05 05 69 64 66 63 74 CD 8D 06 CB 45 CA B3 92    M..idfct....E...
024F10:  2A 18 ED 11 07 00 19 CD 3A 05 CD 4D 05 03 73 69    *.......:..M..si
024F20:  6E CD 8D 06 CB 45 CA D4 83 21 06 ED E5 21 16 00    n....E...!...!..
024F30:  CD E5 1C CD 4D 05 05 69 64 66 63 74 06 06 2A 06    ....M..idfct..*.
024F40:  ED CD E2 05 2A 06 ED 11 07 00 19 E5 CD 4D 05 03    ....*........M..
024F50:  63 6F 73 06 0A CD 01 06 2A 06 ED 11 14 00 19 E5    cos.....*.......
024F60:  21 00 00 EB E1 73 23 72 2A 06 ED 11 12 00 19 E5    !....s#r*.......
024F70:  2A 18 ED 11 12 00 19 5E 23 56 EB EB E1 73 23 72    *......^#V...s#r
024F80:  CD 4D 05 05 6D 75 6C 74 69 06 06 2A 0E ED CD E2    .M..multi..*....
024F90:  05 2A 0E ED 11 07 00 19 E5 21 2A 00 65 2E 01 E5    .*.......!*.e...
024FA0:  06 0A CD 01 06 2A 0E ED 11 14 00 19 E5 2A 18 ED    .....*.......*..
024FB0:  11 12 00 19 5E 23 56 EB E5 CD A0 79 EB E1 73 23    ....^#V....y..s#
024FC0:  72 2A 0E ED 11 12 00 19 E5 2A 06 ED EB E1 73 23    r*.......*....s#
024FD0:  72 C3 B3 92 2A 18 ED 11 07 00 19 CD 3A 05 CD 4D    r...*.......:..M
024FE0:  05 03 63 6F 73 CD 8D 06 CB 45 CA 4B 85 21 04 ED    ..cos....E.K.!..
024FF0:  E5 21 16 00 CD E5 1C CD 4D 05 05 69 64 66 63 74    .!......M..idfct
025000:  06 06 2A 04 ED CD E2 05 2A 04 ED 11 07 00 19 E5    ..*.....*.......
025010:  CD 4D 05 03 73 69 6E 06 0A CD 01 06 2A 04 ED 11    .M..sin.....*...
025020:  14 00 19 E5 21 00 00 EB E1 73 23 72 2A 04 ED 11    ....!....s#r*...
025030:  12 00 19 E5 2A 18 ED 11 12 00 19 5E 23 56 EB EB    ....*......^#V..
025040:  E1 73 23 72 21 06 ED E5 21 16 00 CD E5 1C CD 4D    .s#r!...!......M
025050:  05 05 6D 75 6C 74 69 06 06 2A 06 ED CD E2 05 2A    ..multi..*.....*
025060:  06 ED 11 07 00 19 E5 21 2A 00 65 2E 01 E5 06 0A    .......!*.e.....
025070:  CD 01 06 2A 06 ED 11 14 00 19 E5 21 16 00 CD E5    ...*.......!....
025080:  1C 2A 06 ED 11 14 00 19 5E 23 56 EB E5 CD 4D 05    .*......^#V...M.
025090:  06 6E 6F 6D 62 72 65 06 06 CD 01 06 2A 06 ED 11    .nombre.....*...
0250A0:  14 00 19 5E 23 56 EB 11 07 00 19 E5 CD 4D 05 02    ...^#V.......M..
0250B0:  2D 31 06 0A CD 01 06 2A 06 ED 11 14 00 19 5E 23    -1.....*......^#
0250C0:  56 EB 11 12 00 19 E5 21 00 00 EB E1 73 23 72 2A    V......!....s#r*
0250D0:  06 ED 11 14 00 19 5E 23 56 EB 11 14 00 19 E5 21    ......^#V......!
0250E0:  00 00 EB E1 73 23 72 2A 06 ED 11 12 00 19 E5 2A    ....s#r*.......*
0250F0:  04 ED EB E1 73 23 72 CD 4D 05 05 6D 75 6C 74 69    ....s#r.M..multi
025100:  06 06 2A 0E ED CD E2 05 2A 0E ED 11 07 00 19 E5    ..*.....*.......
025110:  21 2A 00 65 2E 01 E5 06 0A CD 01 06 2A 0E ED 11    !*.e........*...
025120:  14 00 19 E5 2A 18 ED 11 12 00 19 5E 23 56 EB E5    ....*......^#V..
025130:  CD A0 79 EB E1 73 23 72 2A 0E ED 11 12 00 19 E5    ..y..s#r*.......
025140:  2A 06 ED EB E1 73 23 72 C3 B3 92 2A 18 ED 11 07    *....s#r...*....
025150:  00 19 CD 3A 05 CD 4D 05 04 74 61 6E 67 CD 8D 06    ...:..M..tang...
025160:  CB 45 CA B0 86 21 08 ED E5 21 16 00 CD E5 1C CD    .E...!...!......
025170:  4D 05 06 6E 6F 6D 62 72 65 06 06 2A 08 ED CD E2    M..nombre..*....
025180:  05 2A 08 ED 11 07 00 19 E5 21 32 00 65 2E 01 E5    .*.......!2.e...
025190:  06 0A CD 01 06 2A 08 ED 11 12 00 19 E5 21 00 00    .....*.......!..
0251A0:  EB E1 73 23 72 2A 08 ED 11 14 00 19 E5 21 00 00    ..s#r*.......!..
0251B0:  EB E1 73 23 72 21 02 ED E5 21 16 00 CD E5 1C CD    ..s#r!...!......
0251C0:  4D 05 05 69 64 66 63 74 06 06 2A 02 ED CD E2 05    M..idfct..*.....
0251D0:  2A 02 ED 11 07 00 19 E5 CD 4D 05 03 63 6F 73 06    *........M..cos.
0251E0:  0A CD 01 06 2A 02 ED 11 14 00 19 E5 21 00 00 EB    ....*.......!...
0251F0:  E1 73 23 72 2A 02 ED 11 12 00 19 E5 2A 18 ED 11    .s#r*.......*...
025200:  12 00 19 5E 23 56 EB EB E1 73 23 72 21 04 ED E5    ...^#V...s#r!...
025210:  21 16 00 CD E5 1C CD 4D 05 05 70 75 69 73 73 06    !......M..puiss.
025220:  06 2A 04 ED CD E2 05 2A 04 ED 11 07 00 19 E5 21    .*.....*.......!
025230:  5E 00 65 2E 01 E5 06 0A CD 01 06 2A 04 ED 11 14    ^.e........*....
025240:  00 19 E5 2A 02 ED EB E1 73 23 72 2A 04 ED 11 12    ...*....s#r*....
025250:  00 19 E5 2A 08 ED EB E1 73 23 72 CD 4D 05 06 64    ...*....s#r.M..d
025260:  69 76 69 73 65 06 06 2A 0E ED CD E2 05 2A 0E ED    ivise..*.....*..
025270:  11 07 00 19 E5 21 2F 00 65 2E 01 E5 06 0A CD 01    .....!/.e.......
025280:  06 2A 0E ED 11 12 00 19 E5 2A 04 ED EB E1 73 23    .*.......*....s#
025290:  72 2A 0E ED 11 14 00 19 E5 2A 18 ED 11 12 00 19    r*.......*......
0252A0:  5E 23 56 EB E5 CD A0 79 EB E1 73 23 72 C3 B3 92    ^#V....y..s#r...
0252B0:  2A 18 ED 11 07 00 19 CD 3A 05 CD 4D 05 02 6C 6E    *.......:..M..ln
0252C0:  CD 8D 06 CB 45 CA 25 87 CD 4D 05 06 64 69 76 69    ....E.%..M..divi
0252D0:  73 65 06 06 2A 0E ED CD E2 05 2A 0E ED 11 07 00    se..*.....*.....
0252E0:  19 E5 21 2F 00 65 2E 01 E5 06 0A CD 01 06 2A 0E    ..!/.e........*.
0252F0:  ED 11 12 00 19 E5 2A 18 ED 11 12 00 19 5E 23 56    ......*......^#V
025300:  EB EB E1 73 23 72 2A 0E ED 11 14 00 19 E5 2A 18    ...s#r*.......*.
025310:  ED 11 12 00 19 5E 23 56 EB E5 CD A0 79 EB E1 73    .....^#V....y..s
025320:  23 72 C3 B3 92 2A 18 ED 11 07 00 19 CD 3A 05 CD    #r...*.......:..
025330:  4D 05 03 65 78 70 CD 8D 06 CB 45 CA E9 87 21 06    M..exp....E...!.
025340:  ED E5 21 16 00 CD E5 1C CD 4D 05 05 69 64 66 63    ..!......M..idfc
025350:  74 06 06 2A 06 ED CD E2 05 2A 06 ED 11 07 00 19    t..*.....*......
025360:  E5 CD 4D 05 03 65 78 70 06 0A CD 01 06 2A 06 ED    ..M..exp.....*..
025370:  11 14 00 19 E5 21 00 00 EB E1 73 23 72 2A 06 ED    .....!....s#r*..
025380:  11 12 00 19 E5 2A 18 ED 11 12 00 19 5E 23 56 EB    .....*......^#V.
025390:  EB E1 73 23 72 CD 4D 05 05 6D 75 6C 74 69 06 06    ..s#r.M..multi..
0253A0:  2A 0E ED CD E2 05 2A 0E ED 11 07 00 19 E5 21 2A    *.....*.......!*
0253B0:  00 65 2E 01 E5 06 0A CD 01 06 2A 0E ED 11 14 00    .e........*.....
0253C0:  19 E5 2A 18 ED 11 12 00 19 5E 23 56 EB E5 CD A0    ..*......^#V....
0253D0:  79 EB E1 73 23 72 2A 0E ED 11 12 00 19 E5 2A 06    y..s#r*.......*.
0253E0:  ED EB E1 73 23 72 C3 B3 92 2A 18 ED 11 07 00 19    ...s#r...*......
0253F0:  CD 3A 05 CD 4D 05 04 73 71 72 74 CD 8D 06 CB 45    .:..M..sqrt....E
025400:  CA 01 89 21 06 ED E5 21 16 00 CD E5 1C 21 04 ED    ...!...!.....!..
025410:  E5 21 16 00 CD E5 1C 21 02 ED E5 21 16 00 CD E5    .!.....!...!....
025420:  1C CD 4D 05 06 6E 6F 6D 62 72 65 06 06 2A 02 ED    ..M..nombre..*..
025430:  CD E2 05 2A 02 ED 11 07 00 19 E5 21 32 00 65 2E    ...*.......!2.e.
025440:  01 E5 06 0A CD 01 06 2A 02 ED 11 14 00 19 E5 21    .......*.......!
025450:  00 00 EB E1 73 23 72 2A 02 ED 11 12 00 19 E5 21    ....s#r*.......!
025460:  00 00 EB E1 73 23 72 CD 4D 05 05 6D 75 6C 74 69    ....s#r.M..multi
025470:  06 06 2A 04 ED CD E2 05 2A 04 ED 11 07 00 19 E5    ..*.....*.......
025480:  21 2A 00 65 2E 01 E5 06 0A CD 01 06 2A 04 ED 11    !*.e........*...
025490:  14 00 19 E5 2A 02 ED EB E1 73 23 72 2A 04 ED 11    ....*....s#r*...
0254A0:  12 00 19 E5 2A 18 ED EB E1 73 23 72 CD 4D 05 06    ....*....s#r.M..
0254B0:  64 69 76 69 73 65 06 06 2A 0E ED CD E2 05 2A 0E    divise..*.....*.
0254C0:  ED 11 07 00 19 E5 21 2F 00 65 2E 01 E5 06 0A CD    ......!/.e......
0254D0:  01 06 2A 0E ED 11 14 00 19 E5 2A 18 ED 11 12 00    ..*.......*.....
0254E0:  19 5E 23 56 EB E5 CD A0 79 EB E1 73 23 72 2A 0E    .^#V....y..s#r*.
0254F0:  ED 11 12 00 19 E5 2A 04 ED EB E1 73 23 72 C3 B3    ......*....s#r..
025500:  92 2A 18 ED 11 07 00 19 CD 3A 05 CD 4D 05 02 73    .*.......:..M..s
025510:  68 CD 8D 06 CB 45 CA C3 89 21 06 ED E5 21 16 00    h....E...!...!..
025520:  CD E5 1C CD 4D 05 05 69 64 66 63 74 06 06 2A 06    ....M..idfct..*.
025530:  ED CD E2 05 2A 06 ED 11 07 00 19 E5 CD 4D 05 02    ....*........M..
025540:  63 68 06 0A CD 01 06 2A 06 ED 11 14 00 19 E5 21    ch.....*.......!
025550:  00 00 EB E1 73 23 72 2A 06 ED 11 12 00 19 E5 2A    ....s#r*.......*
025560:  18 ED 11 12 00 19 5E 23 56 EB EB E1 73 23 72 CD    ......^#V...s#r.
025570:  4D 05 05 6D 75 6C 74 69 06 06 2A 0E ED CD E2 05    M..multi..*.....
025580:  2A 0E ED 11 07 00 19 E5 21 2A 00 65 2E 01 E5 06    *.......!*.e....
025590:  0A CD 01 06 2A 0E ED 11 14 00 19 E5 2A 18 ED 11    ....*.......*...
0255A0:  12 00 19 5E 23 56 EB E5 CD A0 79 EB E1 73 23 72    ...^#V....y..s#r
0255B0:  2A 0E ED 11 12 00 19 E5 2A 06 ED EB E1 73 23 72    *.......*....s#r
0255C0:  C3 B3 92 2A 18 ED 11 07 00 19 CD 3A 05 CD 4D 05    ...*.......:..M.
0255D0:  02 63 68 CD 8D 06 CB 45 CA 85 8A 21 06 ED E5 21    .ch....E...!...!
0255E0:  16 00 CD E5 1C CD 4D 05 05 69 64 66 63 74 06 06    ......M..idfct..
0255F0:  2A 06 ED CD E2 05 2A 06 ED 11 07 00 19 E5 CD 4D    *.....*........M
025600:  05 02 73 68 06 0A CD 01 06 2A 06 ED 11 14 00 19    ..sh.....*......
025610:  E5 21 00 00 EB E1 73 23 72 2A 06 ED 11 12 00 19    .!....s#r*......
025620:  E5 2A 18 ED 11 12 00 19 5E 23 56 EB EB E1 73 23    .*......^#V...s#
025630:  72 CD 4D 05 05 6D 75 6C 74 69 06 06 2A 0E ED CD    r.M..multi..*...
025640:  E2 05 2A 0E ED 11 07 00 19 E5 21 2A 00 65 2E 01    ..*.......!*.e..
025650:  E5 06 0A CD 01 06 2A 0E ED 11 14 00 19 E5 2A 18    ......*.......*.
025660:  ED 11 12 00 19 5E 23 56 EB E5 CD A0 79 EB E1 73    .....^#V....y..s
025670:  23 72 2A 0E ED 11 12 00 19 E5 2A 06 ED EB E1 73    #r*.......*....s
025680:  23 72 C3 B3 92 2A 18 ED 11 07 00 19 CD 3A 05 CD    #r...*.......:..
025690:  4D 05 02 74 68 CD 8D 06 CB 45 CA 2F 8C 21 04 ED    M..th....E./.!..
0256A0:  E5 21 16 00 CD E5 1C CD 4D 05 06 6E 6F 6D 62 72    .!......M..nombr
0256B0:  65 06 06 2A 04 ED CD E2 05 2A 04 ED 11 07 00 19    e..*.....*......
0256C0:  E5 21 32 00 65 2E 01 E5 06 0A CD 01 06 2A 04 ED    .!2.e........*..
0256D0:  11 12 00 19 E5 21 00 00 EB E1 73 23 72 2A 04 ED    .....!....s#r*..
0256E0:  11 14 00 19 E5 21 00 00 EB E1 73 23 72 21 06 ED    .....!....s#r!..
0256F0:  E5 21 16 00 CD E5 1C CD 4D 05 05 70 75 69 73 73    .!......M..puiss
025700:  06 06 2A 06 ED CD E2 05 2A 06 ED 11 07 00 19 E5    ..*.....*.......
025710:  21 5E 00 65 2E 01 E5 06 0A CD 01 06 2A 06 ED 11    !^.e........*...
025720:  12 00 19 E5 2A 04 ED EB E1 73 23 72 2A 06 ED 11    ....*....s#r*...
025730:  14 00 19 E5 2A 18 ED EB E1 73 23 72 21 02 ED E5    ....*....s#r!...
025740:  21 16 00 CD E5 1C CD 4D 05 06 6E 6F 6D 62 72 65    !......M..nombre
025750:  06 06 2A 02 ED CD E2 05 2A 02 ED 11 07 00 19 E5    ..*.....*.......
025760:  21 31 00 65 2E 01 E5 06 0A CD 01 06 2A 02 ED 11    !1.e........*...
025770:  12 00 19 E5 21 00 00 EB E1 73 23 72 2A 02 ED 11    ....!....s#r*...
025780:  14 00 19 E5 21 00 00 EB E1 73 23 72 21 08 ED E5    ....!....s#r!...
025790:  21 16 00 CD E5 1C CD 4D 05 05 6D 6F 69 6E 73 06    !......M..moins.
0257A0:  06 2A 08 ED CD E2 05 2A 08 ED 11 07 00 19 E5 21    .*.....*.......!
0257B0:  2D 00 65 2E 01 E5 06 0A CD 01 06 2A 08 ED 11 14    -.e........*....
0257C0:  00 19 E5 2A 02 ED EB E1 73 23 72 2A 08 ED 11 12    ...*....s#r*....
0257D0:  00 19 E5 2A 06 ED EB E1 73 23 72 CD 4D 05 05 6D    ...*....s#r.M..m
0257E0:  75 6C 74 69 06 06 2A 0E ED CD E2 05 2A 0E ED 11    ulti..*.....*...
0257F0:  07 00 19 E5 21 2A 00 65 2E 01 E5 06 0A CD 01 06    ....!*.e........
025800:  2A 0E ED 11 14 00 19 E5 2A 18 ED 11 12 00 19 5E    *.......*......^
025810:  23 56 EB E5 CD A0 79 EB E1 73 23 72 2A 0E ED 11    #V....y..s#r*...
025820:  12 00 19 E5 2A 08 ED EB E1 73 23 72 C3 B3 92 2A    ....*....s#r...*
025830:  18 ED 11 07 00 19 CD 3A 05 CD 4D 05 06 61 72 63    .......:..M..arc
025840:  74 61 6E CD 8D 06 CB 45 CA E5 8D 21 04 ED E5 21    tan....E...!...!
025850:  16 00 CD E5 1C CD 4D 05 06 6E 6F 6D 62 72 65 06    ......M..nombre.
025860:  06 2A 04 ED CD E2 05 2A 04 ED 11 07 00 19 E5 21    .*.....*.......!
025870:  32 00 65 2E 01 E5 06 0A CD 01 06 2A 04 ED 11 12    2.e........*....
025880:  00 19 E5 21 00 00 EB E1 73 23 72 2A 04 ED 11 14    ...!....s#r*....
025890:  00 19 E5 21 00 00 EB E1 73 23 72 21 06 ED E5 21    ...!....s#r!...!
0258A0:  16 00 CD E5 1C CD 4D 05 05 70 75 69 73 73 06 06    ......M..puiss..
0258B0:  2A 06 ED CD E2 05 2A 06 ED 11 07 00 19 E5 21 5E    *.....*.......!^
0258C0:  00 65 2E 01 E5 06 0A CD 01 06 2A 06 ED 11 12 00    .e........*.....
0258D0:  19 E5 2A 04 ED EB E1 73 23 72 2A 06 ED 11 14 00    ..*....s#r*.....
0258E0:  19 E5 2A 18 ED 11 12 00 19 5E 23 56 EB EB E1 73    ..*......^#V...s
0258F0:  23 72 21 02 ED E5 21 16 00 CD E5 1C CD 4D 05 06    #r!...!......M..
025900:  6E 6F 6D 62 72 65 06 06 2A 02 ED CD E2 05 2A 02    nombre..*.....*.
025910:  ED 11 07 00 19 E5 21 31 00 65 2E 01 E5 06 0A CD    ......!1.e......
025920:  01 06 2A 02 ED 11 12 00 19 E5 21 00 00 EB E1 73    ..*.......!....s
025930:  23 72 2A 02 ED 11 14 00 19 E5 21 00 00 EB E1 73    #r*.......!....s
025940:  23 72 21 08 ED E5 21 16 00 CD E5 1C CD 4D 05 04    #r!...!......M..
025950:  70 6C 75 73 06 06 2A 08 ED CD E2 05 2A 08 ED 11    plus..*.....*...
025960:  07 00 19 E5 21 2B 00 65 2E 01 E5 06 0A CD 01 06    ....!+.e........
025970:  2A 08 ED 11 14 00 19 E5 2A 02 ED EB E1 73 23 72    *.......*....s#r
025980:  2A 08 ED 11 12 00 19 E5 2A 06 ED EB E1 73 23 72    *.......*....s#r
025990:  CD 4D 05 06 64 69 76 69 73 65 06 06 2A 0E ED CD    .M..divise..*...
0259A0:  E2 05 2A 0E ED 11 07 00 19 E5 21 2F 00 65 2E 01    ..*.......!/.e..
0259B0:  E5 06 0A CD 01 06 2A 0E ED 11 14 00 19 E5 2A 18    ......*.......*.
0259C0:  ED 11 12 00 19 5E 23 56 EB E5 CD A0 79 EB E1 73    .....^#V....y..s
0259D0:  23 72 2A 0E ED 11 12 00 19 E5 2A 08 ED EB E1 73    #r*.......*....s
0259E0:  23 72 C3 B3 92 2A 18 ED 11 07 00 19 CD 3A 05 CD    #r...*.......:..
0259F0:  4D 05 06 61 72 63 73 69 6E CD 8D 06 CB 45 CA EC    M..arcsin....E..
025A00:  8F 21 04 ED E5 21 16 00 CD E5 1C CD 4D 05 06 6E    .!...!......M..n
025A10:  6F 6D 62 72 65 06 06 2A 04 ED CD E2 05 2A 04 ED    ombre..*.....*..
025A20:  11 07 00 19 E5 21 32 00 65 2E 01 E5 06 0A CD 01    .....!2.e.......
025A30:  06 2A 04 ED 11 12 00 19 E5 21 00 00 EB E1 73 23    .*.......!....s#
025A40:  72 2A 04 ED 11 14 00 19 E5 21 00 00 EB E1 73 23    r*.......!....s#
025A50:  72 21 06 ED E5 21 16 00 CD E5 1C CD 4D 05 05 70    r!...!......M..p
025A60:  75 69 73 73 06 06 2A 06 ED CD E2 05 2A 06 ED 11    uiss..*.....*...
025A70:  07 00 19 E5 21 5E 00 65 2E 01 E5 06 0A CD 01 06    ....!^.e........
025A80:  2A 06 ED 11 12 00 19 E5 2A 04 ED EB E1 73 23 72    *.......*....s#r
025A90:  2A 06 ED 11 14 00 19 E5 2A 18 ED 11 12 00 19 5E    *.......*......^
025AA0:  23 56 EB EB E1 73 23 72 21 02 ED E5 21 16 00 CD    #V...s#r!...!...
025AB0:  E5 1C CD 4D 05 06 6E 6F 6D 62 72 65 06 06 2A 02    ...M..nombre..*.
025AC0:  ED CD E2 05 2A 02 ED 11 07 00 19 E5 21 31 00 65    ....*.......!1.e
025AD0:  2E 01 E5 06 0A CD 01 06 2A 02 ED 11 12 00 19 E5    ........*.......
025AE0:  21 00 00 EB E1 73 23 72 2A 02 ED 11 14 00 19 E5    !....s#r*.......
025AF0:  21 00 00 EB E1 73 23 72 21 08 ED E5 21 16 00 CD    !....s#r!...!...
025B00:  E5 1C CD 4D 05 05 6D 6F 69 6E 73 06 06 2A 08 ED    ...M..moins..*..
025B10:  CD E2 05 2A 08 ED 11 07 00 19 E5 21 2D 00 65 2E    ...*.......!-.e.
025B20:  01 E5 06 0A CD 01 06 2A 08 ED 11 14 00 19 E5 2A    .......*.......*
025B30:  02 ED EB E1 73 23 72 2A 08 ED 11 12 00 19 E5 2A    ....s#r*.......*
025B40:  06 ED EB E1 73 23 72 21 0A ED E5 21 16 00 CD E5    ....s#r!...!....
025B50:  1C CD 4D 05 05 69 64 66 63 74 06 06 2A 0A ED CD    ..M..idfct..*...
025B60:  E2 05 2A 0A ED 11 07 00 19 E5 CD 4D 05 04 73 71    ..*........M..sq
025B70:  72 74 06 0A CD 01 06 2A 0A ED 11 14 00 19 E5 21    rt.....*.......!
025B80:  00 00 EB E1 73 23 72 2A 0A ED 11 12 00 19 E5 2A    ....s#r*.......*
025B90:  08 ED EB E1 73 23 72 CD 4D 05 06 64 69 76 69 73    ....s#r.M..divis
025BA0:  65 06 06 2A 0E ED CD E2 05 2A 0E ED 11 07 00 19    e..*.....*......
025BB0:  E5 21 2F 00 65 2E 01 E5 06 0A CD 01 06 2A 0E ED    .!/.e........*..
025BC0:  11 14 00 19 E5 2A 18 ED 11 12 00 19 5E 23 56 EB    .....*......^#V.
025BD0:  E5 CD A0 79 EB E1 73 23 72 2A 0E ED 11 12 00 19    ...y..s#r*......
025BE0:  E5 2A 0A ED EB E1 73 23 72 C3 B3 92 2A 18 ED 11    .*....s#r...*...
025BF0:  07 00 19 CD 3A 05 CD 4D 05 06 61 72 63 63 6F 73    ....:..M..arccos
025C00:  CD 8D 06 CB 45 CA A6 92 21 04 ED E5 21 16 00 CD    ....E...!...!...
025C10:  E5 1C CD 4D 05 06 6E 6F 6D 62 72 65 06 06 2A 04    ...M..nombre..*.
025C20:  ED CD E2 05 2A 04 ED 11 07 00 19 E5 21 32 00 65    ....*.......!2.e
025C30:  2E 01 E5 06 0A CD 01 06 2A 04 ED 11 12 00 19 E5    ........*.......
025C40:  21 00 00 EB E1 73 23 72 2A 04 ED 11 14 00 19 E5    !....s#r*.......
025C50:  21 00 00 EB E1 73 23 72 21 06 ED E5 21 16 00 CD    !....s#r!...!...
025C60:  E5 1C CD 4D 05 05 70 75 69 73 73 06 06 2A 06 ED    ...M..puiss..*..
025C70:  CD E2 05 2A 06 ED 11 07 00 19 E5 21 5E 00 65 2E    ...*.......!^.e.
025C80:  01 E5 06 0A CD 01 06 2A 06 ED 11 12 00 19 E5 2A    .......*.......*
025C90:  04 ED EB E1 73 23 72 2A 06 ED 11 14 00 19 E5 2A    ....s#r*.......*
025CA0:  18 ED 11 12 00 19 5E 23 56 EB EB E1 73 23 72 21    ......^#V...s#r!
025CB0:  02 ED E5 21 16 00 CD E5 1C CD 4D 05 06 6E 6F 6D    ...!......M..nom
025CC0:  62 72 65 06 06 2A 02 ED CD E2 05 2A 02 ED 11 07    bre..*.....*....
025CD0:  00 19 E5 21 31 00 65 2E 01 E5 06 0A CD 01 06 2A    ...!1.e........*
025CE0:  02 ED 11 12 00 19 E5 21 00 00 EB E1 73 23 72 2A    .......!....s#r*
025CF0:  02 ED 11 14 00 19 E5 21 00 00 EB E1 73 23 72 21    .......!....s#r!
025D00:  08 ED E5 21 16 00 CD E5 1C CD 4D 05 05 6D 6F 69    ...!......M..moi
025D10:  6E 73 06 06 2A 08 ED CD E2 05 2A 08 ED 11 07 00    ns..*.....*.....
025D20:  19 E5 21 2D 00 65 2E 01 E5 06 0A CD 01 06 2A 08    ..!-.e........*.
025D30:  ED 11 14 00 19 E5 2A 02 ED EB E1 73 23 72 2A 08    ......*....s#r*.
025D40:  ED 11 12 00 19 E5 2A 06 ED EB E1 73 23 72 21 0A    ......*....s#r!.
025D50:  ED E5 21 16 00 CD E5 1C CD 4D 05 05 69 64 66 63    ..!......M..idfc
025D60:  74 06 06 2A 0A ED CD E2 05 2A 0A ED 11 07 00 19    t..*.....*......
025D70:  E5 CD 4D 05 04 73 71 72 74 06 0A CD 01 06 2A 0A    ..M..sqrt.....*.
025D80:  ED 11 14 00 19 E5 21 00 00 EB E1 73 23 72 2A 0A    ......!....s#r*.
025D90:  ED 11 12 00 19 E5 2A 08 ED EB E1 73 23 72 21 0C    ......*....s#r!.
025DA0:  ED E5 21 16 00 CD E5 1C CD 4D 05 06 6E 6F 6D 62    ..!......M..nomb
025DB0:  72 65 06 06 2A 0C ED CD E2 05 2A 0C ED 11 07 00    re..*.....*.....
025DC0:  19 E5 CD 4D 05 02 2D 31 06 0A CD 01 06 2A 0C ED    ...M..-1.....*..
025DD0:  11 14 00 19 E5 21 00 00 EB E1 73 23 72 2A 0C ED    .....!....s#r*..
025DE0:  11 12 00 19 E5 21 00 00 EB E1 73 23 72 2A 0E ED    .....!....s#r*..
025DF0:  11 14 00 19 E5 21 16 00 CD E5 1C 2A 0E ED 11 14    .....!.....*....
025E00:  00 19 5E 23 56 EB E5 CD 4D 05 05 6D 75 6C 74 69    ..^#V...M..multi
025E10:  06 06 CD 01 06 2A 0E ED 11 14 00 19 5E 23 56 EB    .....*......^#V.
025E20:  11 07 00 19 E5 21 2A 00 65 2E 01 E5 06 0A CD 01    .....!*.e.......
025E30:  06 2A 0E ED 11 14 00 19 5E 23 56 EB 11 14 00 19    .*......^#V.....
025E40:  E5 2A 18 ED 11 12 00 19 5E 23 56 EB E5 CD A0 79    .*......^#V....y
025E50:  EB E1 73 23 72 2A 0E ED 11 14 00 19 5E 23 56 EB    ..s#r*......^#V.
025E60:  11 12 00 19 E5 2A 0C ED EB E1 73 23 72 CD 4D 05    .....*....s#r.M.
025E70:  06 64 69 76 69 73 65 06 06 2A 0E ED CD E2 05 2A    .divise..*.....*
025E80:  0E ED 11 07 00 19 E5 21 2F 00 65 2E 01 E5 06 0A    .......!/.e.....
025E90:  CD 01 06 2A 0E ED 11 12 00 19 E5 2A 0A ED EB E1    ...*.......*....
025EA0:  73 23 72 C3 B3 92 21 00 00 22 0E ED 21 00 00 7D    s#r...!.."..!..}
025EB0:  32 C7 F1 2A 1A ED D9 01 22 00 11 FA EC C3 22 05    2..*....".....".
025EC0:  01 0A 00 21 F0 EC CD 08 05 CD 3E 02 CD 9B 14 CD    ...!......>.....
025ED0:  CD 17 CD 1B 20 CD 9B 14 CD BA 17 0E 20 20 20 20    .... .......    
025EE0:  20 20 4D 20 45 20 4E 20 55 20 CD CD 17 CD 1B 20      M E N U ..... 
025EF0:  CD 9B 14 CD CD 17 CD 1B 20 CD 9B 14 CD BA 17 1B    ........ .......
025F00:  20 20 3C 31 3E 20 45 6E 74 72 65 65 20 64 65 20      <1> Entree de 
025F10:  6C 61 20 66 6F 6E 63 74 69 6F 6E CD CD 17 CD 1B    la fonction.....
025F20:  20 CD 9B 14 CD CD 17 CD 1B 20 CD 9B 14 CD BA 17     ........ ......
025F30:  1D 20 20 3C 32 3E 20 44 65 76 65 6C 6F 70 70 65    .  <2> Developpe
025F40:  72 20 64 65 73 20 70 72 6F 64 75 69 74 73 CD CD    r des produits..
025F50:  17 CD 1B 20 CD 9B 14 CD CD 17 CD 1B 20 CD 9B 14    ... ........ ...
025F60:  CD BA 17 28 20 20 3C 33 3E 20 44 65 76 65 6C 6F    ...(  <3> Develo
025F70:  70 70 65 72 20 64 65 73 20 70 75 69 73 73 61 6E    pper des puissan
025F80:  63 65 73 20 65 6E 74 69 65 72 65 73 CD CD 17 CD    ces entieres....
025F90:  1B 20 CD 9B 14 CD CD 17 CD 1B 20 CD 9B 14 CD BA    . ........ .....
025FA0:  17 1F 20 20 3C 34 3E 20 43 61 6C 63 75 6C 20 64    ..  <4> Calcul d
025FB0:  65 20 76 61 6C 65 75 72 73 20 64 65 20 66 28 78    e valeurs de f(x
025FC0:  29 CD CD 17 CD 1B 20 CD 9B 14 CD CD 17 CD 1B 20    )..... ........ 
025FD0:  CD 9B 14 CD BA 17 1D 20 20 3C 35 3E 20 44 65 72    .......  <5> Der
025FE0:  69 76 65 65 73 20 64 65 20 6C 61 20 66 6F 6E 63    ivees de la fonc
025FF0:  74 69 6F 6E CD CD 17 CD 1B 20 CD 9B 14 CD CD 17    tion..... ......
026000:  CD 1B 20 CD 9B 14 CD BA 17 1C 20 20 3C 36 3E 20    .. .......  <6> 
026010:  44 65 76 65 6C 6F 70 70 65 6D 65 6E 74 73 20 6C    Developpements l
026020:  69 6D 69 74 65 73 CD CD 17 CD 1B 20 CD 9B 14 CD    imites..... ....
026030:  CD 17 CD 1B 20 CD 9B 14 CD BA 17 16 20 20 3C 37    .... .......  <7
026040:  3E 20 46 69 6E 20 64 75 20 70 72 6F 67 72 61 6D    > Fin du program
026050:  6D 65 CD CD 17 CD 1B 20 CD 9B 14 CD CD 17 CD 1B    me..... ........
026060:  20 CD 9B 14 CD BA 17 11 20 20 20 20 56 4F 54 52     .......    VOTR
026070:  45 20 43 48 4F 49 58 3F 20 CD CD 17 CD 1B 20 21    E CHOIX? ..... !
026080:  BA 00 CD A9 14 21 A5 F2 CD 44 16 CD 1B 20 2A A5    .....!...D... *.
026090:  F2 26 00 E5 21 30 00 D1 CD CC 06 E5 2A A5 F2 26    .&..!0......*..&
0260A0:  00 E5 21 38 00 D1 CD E0 06 D1 7D A3 6F CB 45 CA    ..!8......}£o.E.
0260B0:  7F 94 2A A5 F2 26 00 65 2E 01 E5 21 90 F2 E5 21    ..*..&.e...!...!
0260C0:  94 F2 CD F4 1E 2A 90 F2 22 F8 EC 2A F8 EC D9 01    .....*.."..*....
0260D0:  0A 00 11 F0 EC C3 22 05 01 0C 00 21 E4 EC CD 08    ......"....!....
0260E0:  05 21 20 00 7D 32 A5 F2 21 BA 00 CD A9 14 21 A5    .! .}2..!.....!.
0260F0:  F2 CD 44 16 CD 1B 20 2A A5 F2 26 00 E5 21 30 00    ..D... *..&..!0.
026100:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
026110:  20 00 00 00 02 09 4E E5 20 00 41 02 00 00 00 02     .....N. .A.....
026120:  20 00 42 02 00 00 00 02 20 00 43 02 00 00 00 02     .B..... .C.....
026130:  20 00 44 02 00 00 00 02 20 00 45 02 00 00 00 02     .D..... .E.....
026140:  20 00 46 02 00 00 00 02 20 00 47 02 00 00 00 02     .F..... .G.....
026150:  20 00 48 02 00 00 00 02 20 00 49 02 00 00 00 02     .H..... .I.....
026160:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
026170:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
026180:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
026190:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0261A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0261B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0261C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0261D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0261E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0261F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
026200:  D1 CD CC 06 E5 2A A5 F2 26 00 E5 21 3A 00 D1 CD    .....*..&..!:...
026210:  E0 06 D1 7D A3 6F CB 45 CA E8 94 2A A5 F2 26 00    ...}£o.E...*..&.
026220:  CD 9B 14 CD 22 17 CD CD 17 CD 1B 20 2A A5 F2 26    ...."...... *..&
026230:  00 65 2E 01 E5 21 E4 EC E5 21 94 F2 CD F4 1E 2A    .e...!...!.....*
026240:  E4 EC 22 EE EC 2A EE EC D9 01 0C 00 11 E4 EC C3    .."..*..........
026250:  22 05 01 1C 00 21 C8 EC CD 08 05 CD 3E 02 CD 9B    "....!......>...
026260:  14 CD BA 17 1A 4E 2E 20 64 65 20 6C 61 20 66 6F    .....N. de la fo
026270:  6E 63 74 69 6F 6E 20 28 31 20 61 20 39 29 3F CD    nction (1 a 9)?.
026280:  1B 20 CD D8 94 22 98 F2 21 A6 F2 E5 2A 98 F2 2B    . ..."..!...*..+
026290:  29 D1 19 5E 23 56 EB E5 21 00 00 D1 CD 7F 06 CB    )..^#V..!.......
0262A0:  45 CA B3 95 21 A6 F2 E5 2A 98 F2 2B 29 D1 19 E5    E...!...*..+)...
0262B0:  CD 1F 21 CD 9B 14 CD BA 17 20 44 65 76 65 6C 6F    ..!...... Develo
0262C0:  70 70 65 6D 65 6E 74 20 61 75 20 76 6F 69 73 69    ppement au voisi
0262D0:  6E 61 67 65 20 64 65 20 61 3D CD 1B 20 21 D4 EC    nage de a=.. !..
0262E0:  CD CB 14 CD 72 16 CD 1B 20 CD 9B 14 CD BA 17 23    ....r... ......#
0262F0:  44 65 76 65 6C 6F 70 70 65 6D 65 6E 74 20 61 20    Developpement a 
026300:  71 75 65 6C 20 6F 72 64 72 65 20 28 31 20 61 20    quel ordre (1 a 
026310:  35 29 3F CD 1B 20 21 BA 00 CD A9 14 21 A5 F2 CD    5)?.. !.....!...
026320:  44 16 CD 1B 20 2A A5 F2 26 00 E5 21 30 00 D1 CD    D... *..&..!0...
026330:  CC 06 E5 2A A5 F2 26 00 E5 21 36 00 D1 CD E0 06    ...*..&..!6.....
026340:  D1 7D A3 6F CB 45 CA 16 96 2A A5 F2 26 00 CD 9B    .}£o.E...*..&...
026350:  14 CD 22 17 CD CD 17 CD 1B 20 2A A5 F2 26 00 65    .."...... *..&.e
026360:  2E 01 E5 21 96 F2 E5 21 94 F2 CD F4 1E CD 9B 14    ...!...!........
026370:  21 66 00 CD 22 17 2A 98 F2 E5 21 00 00 CD 26 17    !f..".*...!...&.
026380:  CD BA 17 04 28 78 29 3D 21 A6 F2 E5 2A 98 F2 2B    ....(x)=!...*..+
026390:  29 D1 19 5E 23 56 EB E5 21 78 00 E5 CD 53 2D 21    )..^#V..!x...S-!
0263A0:  00 00 CD AA 17 CD CD 17 CD 1B 20 CD 9B 14 CD BA    .......... .....
0263B0:  17 27 44 65 76 65 6C 6F 70 70 65 6D 65 6E 74 20    .'Developpement 
0263C0:  6C 69 6D 69 74 65 20 61 75 20 76 6F 69 73 69 6E    limite au voisin
0263D0:  61 67 65 20 64 65 20 61 3D 21 D4 EC CD 2C 05 C5    age de a=!...,..
0263E0:  D5 E5 21 12 00 E5 21 FF FF CD 79 17 CD CD 17 CD    ..!...!...y.....
0263F0:  1B 20 21 01 00 7D 32 C7 F1 21 A6 F2 E5 2A 98 F2    . !..}2..!...*..
026400:  2B 29 D1 19 5E 23 56 EB E5 21 D4 EC CD 2C 05 C5    +)..^#V..!...,..
026410:  D5 E5 CD 4D 2D D9 21 BB F1 CD D1 05 21 A6 F2 E5    ...M-.!.....!...
026420:  21 00 00 2B 29 D1 19 E5 21 A6 F2 E5 2A 98 F2 2B    !..+)...!...*..+
026430:  29 D1 19 5E 23 56 EB EB E1 73 23 72 21 01 00 CD    )..^#V...s#r!...
026440:  08 10 D9 21 C8 EC CD D1 05 2A C7 F1 26 00 E5 21    ...!.....*..&..!
026450:  01 00 D1 CD 7F 06 CB 45 CA F0 97 21 BB F1 CD 2C    .......E...!...,
026460:  05 C5 D5 E5 21 00 00 CD 08 10 D9 E1 D1 C1 CD 9B    ....!...........
026470:  06 CB 45 CA ED 97 21 BB F1 CD 2C 05 C5 D5 E5 21    ..E...!...,....!
026480:  00 00 CD 08 10 D9 E1 D1 C1 CD D6 06 CB 45 CA 9D    .............E..
026490:  97 CD 9B 14 21 2B 00 CD 22 17 CD 1B 20 21 BB F1    ....!+.."... !..
0264A0:  CD 2C 05 CD 34 0C C5 D5 E5 21 00 00 CD 08 10 D9    .,..4....!......
0264B0:  E1 D1 C1 CD 88 06 CB 45 CA D4 97 CD 9B 14 21 BB    .......E......!.
0264C0:  F1 CD 2C 05 CD D0 0F E5 21 00 00 CD 26 17 CD 1B    ..,.....!...&...
0264D0:  20 C3 ED 97 21 BB F1 CD 2C 05 CD 9B 14 C5 D5 E5     ...!...,.......
0264E0:  21 08 00 E5 21 03 00 CD 79 17 CD 1B 20 C3 34 98    !...!...y... .4.
0264F0:  CD 9B 14 CD BA 17 21 4C 61 20 66 6F 6E 63 74 69    ......!La foncti
026500:  6F 6E 20 6E 27 65 73 74 20 70 61 73 20 64 65 66    on n'est pas def
026510:  69 6E 69 65 20 65 6E 20 21 D4 EC CD 2C 05 C5 D5    inie en !...,...
026520:  E5 21 12 00 E5 21 FF FF CD 79 17 CD CD 17 CD 1B    .!...!...y......
026530:  20 C3 CE 9A 21 01 00 E5 2A 96 F2 D1 CD 66 06 7A     ...!...*....f.z
026540:  B3 CA C5 9A D5 22 DA EC 21 A6 F2 E5 21 00 00 2B    ....."..!...!..+
026550:  29 D1 19 E5 21 A6 F2 E5 21 00 00 2B 29 D1 19 5E    )...!...!..+)..^
026560:  23 56 EB E5 CD A0 79 EB E1 73 23 72 21 00 00 22    #V....y..s#r!.."
026570:  94 F2 21 A6 F2 E5 21 00 00 2B 29 D1 19 E5 CD 56    ..!...!..+)....V
026580:  2D 2A 94 F2 E5 21 00 00 D1 CD 7F 06 CB 45 CA 6C    -*...!.......E.l
026590:  98 21 C8 EC CD 2C 05 C5 D5 E5 2A DA EC CD 08 10    .!...,....*.....
0265A0:  D9 E1 D1 C1 CD FA 09 D9 21 C8 EC CD D1 05 21 01    ........!.....!.
0265B0:  00 7D 32 C7 F1 21 A6 F2 E5 21 00 00 2B 29 D1 19    .}2..!...!..+)..
0265C0:  5E 23 56 EB E5 21 D4 EC CD 2C 05 C5 D5 E5 CD 4D    ^#V..!...,.....M
0265D0:  2D D9 21 BB F1 CD D1 05 2A C7 F1 26 00 E5 21 01    -.!.....*..&..!.
0265E0:  00 D1 CD 7F 06 CB 45 CA 5E 9A 21 BB F1 CD 2C 05    ......E.^.!...,.
0265F0:  C5 D5 E5 21 00 00 CD 08 10 D9 E1 D1 C1 CD 9B 06    ...!............
026600:  CB 45 CA 5B 9A 21 BB F1 CD 2C 05 C5 D5 E5 21 C8    .E.[.!...,....!.
026610:  EC CD 2C 05 D9 E1 D1 C1 CD FF 09 D9 21 CE EC CD    ..,.........!...
026620:  D1 05 21 BB F1 CD 2C 05 C5 D5 E5 21 00 00 CD 08    ..!...,....!....
026630:  10 D9 E1 D1 C1 CD AE 06 CB 45 CA 49 99 CD 9B 14    .........E.I....
026640:  21 2B 00 CD 22 17 CD 1B 20 21 CE EC CD 2C 05 CD    !+.."... !...,..
026650:  34 0C C5 D5 E5 21 00 00 CD 08 10 D9 E1 D1 C1 CD    4....!..........
026660:  88 06 CB 45 CA 80 99 CD 9B 14 21 CE EC CD 2C 05    ...E......!...,.
026670:  CD D0 0F E5 21 00 00 CD 26 17 CD 1B 20 C3 FC 99    ....!...&... ...
026680:  21 BB F1 CD 2C 05 CD 34 0C C5 D5 E5 21 00 00 CD    !...,..4....!...
026690:  08 10 D9 E1 D1 C1 CD 88 06 CB 45 CA CD 99 CD 9B    ..........E.....
0266A0:  14 21 BB F1 CD 2C 05 CD D0 0F E5 21 00 00 CD 26    .!...,.....!...&
0266B0:  17 21 2F 00 CD 22 17 21 C8 EC CD 2C 05 CD D0 0F    .!/..".!...,....
0266C0:  E5 21 00 00 CD 26 17 CD 1B 20 C3 FC 99 21 BB F1    .!...&... ...!..
0266D0:  CD 2C 05 CD 9B 14 C5 D5 E5 21 08 00 E5 21 03 00    .,.......!...!..
0266E0:  CD 79 17 21 2F 00 CD 22 17 21 C8 EC CD 2C 05 CD    .y.!/..".!...,..
0266F0:  D0 0F E5 21 00 00 CD 26 17 CD 1B 20 21 D4 EC CD    ...!...&... !...
026700:  2C 05 C5 D5 E5 21 00 00 CD 08 10 D9 E1 D1 C1 CD    ,....!..........
026710:  88 06 CB 45 CA 26 9A CD 9B 14 21 78 00 CD 22 17    ...E.&....!x..".
026720:  CD 1B 20 C3 35 9A CD 9B 14 CD BA 17 05 28 78 2D    .. .5........(x-
026730:  61 29 CD 1B 20 2A DA EC E5 21 01 00 D1 CD CC 06    a).. *...!......
026740:  CB 45 CA 5B 9A CD 9B 14 21 5E 00 CD 22 17 2A DA    .E.[....!^..".*.
026750:  EC E5 21 00 00 CD 26 17 CD 1B 20 C3 BC 9A CD 9B    ..!...&... .....
026760:  14 CD CD 17 CD 1B 20 CD 9B 14 CD BA 17 0A 4C 61    ...... .......La
026770:  20 64 65 72 69 76 65 65 2A DA EC E5 21 00 00 CD     derivee*...!...
026780:  26 17 CD BA 17 1A 69 65 6D 65 20 6E 27 65 73 74    &.....ieme n'est
026790:  20 70 61 73 20 64 65 66 69 6E 69 65 20 65 6E 20     pas definie en 
0267A0:  21 D4 EC CD 2C 05 C5 D5 E5 21 12 00 E5 21 FF FF    !...,....!...!..
0267B0:  CD 79 17 CD CD 17 CD 1B 20 C3 D4 9A 2A DA EC 23    .y...... ...*..#
0267C0:  D1 1B C3 3F 98 CD 9B 14 CD CD 17 CD 1B 20 CD E8    ...?......... ..
0267D0:  2C C3 D8 9A E1 C3 CE 9A 01 1C 00 11 C8 EC C3 22    ,.............."
0267E0:  05 01 0A 00 21 BE EC CD 08 05 CD C0 92 22 90 F2    ....!........"..
0267F0:  2A 90 F2 11 01 00 B7 ED 52 C2 6A 9B CD 9B 14 CD    *.......R.j.....
026800:  BA 17 1A 4E 6F 20 64 65 20 6C 61 20 66 6F 6E 63    ...No de la fonc
026810:  74 69 6F 6E 20 28 31 20 61 20 39 29 3F CD 1B 20    tion (1 a 9)?.. 
026820:  CD D8 94 22 98 F2 CD 3E 02 21 20 00 7D 32 A5 F2    ..."...>.! .}2..
026830:  21 A6 F2 E5 2A 98 F2 2B 29 D1 19 E5 CD 1F 21 21    !...*..+).....!!
026840:  00 00 22 94 F2 21 A6 F2 E5 2A 98 F2 2B 29 D1 19    .."..!...*..+)..
026850:  E5 CD 56 2D 2A 94 F2 E5 21 00 00 D1 CD 7F 06 CB    ..V-*...!.......
026860:  45 CA 3F 9B CD E8 2C C3 B2 A0 19 11 02 00 B7 ED    E.?...,.........
026870:  52 C2 5D 9C CD 3E 02 CD 9B 14 CD BA 17 1A 4E 6F    R.]..>........No
026880:  20 64 65 20 6C 61 20 66 6F 6E 63 74 69 6F 6E 20     de la fonction 
026890:  28 31 20 61 20 39 29 3F CD 1B 20 CD D8 94 22 98    (1 a 9)?.. ...".
0268A0:  F2 21 A6 F2 E5 2A 98 F2 2B 29 D1 19 5E 23 56 EB    .!...*..+)..^#V.
0268B0:  E5 21 00 00 D1 CD 7F 06 CB 45 CA CC 9B 21 A6 F2    .!.......E...!..
0268C0:  E5 2A 98 F2 2B 29 D1 19 E5 CD 1F 21 CD 9B 14 21    .*..+).....!...!
0268D0:  66 00 CD 22 17 2A 98 F2 E5 21 00 00 CD 26 17 CD    f..".*...!...&..
0268E0:  BA 17 04 28 78 29 3D 21 A6 F2 E5 2A 98 F2 2B 29    ...(x)=!...*..+)
0268F0:  D1 19 5E 23 56 EB E5 21 78 00 E5 CD 53 2D 21 00    ..^#V..!x...S-!.
026900:  00 CD AA 17 CD CD 17 CD 1B 20 21 A6 F2 E5 2A 98    ......... !...*.
026910:  F2 2B 29 D1 19 E5 CD DE 75 CD 9B 14 21 66 00 CD    .+).....u...!f..
026920:  22 17 2A 98 F2 E5 21 00 00 CD 26 17 CD BA 17 04    ".*...!...&.....
026930:  28 78 29 3D 21 A6 F2 E5 2A 98 F2 2B 29 D1 19 5E    (x)=!...*..+)..^
026940:  23 56 EB E5 21 78 00 E5 CD 53 2D 21 00 00 CD AA    #V..!x...S-!....
026950:  17 CD CD 17 CD 1B 20 CD E8 2C C3 B2 A0 19 11 03    ...... ..,......
026960:  00 B7 ED 52 C2 50 9D CD 3E 02 CD 9B 14 CD BA 17    ...R.P..>.......
026970:  1A 4E 6F 20 64 65 20 6C 61 20 66 6F 6E 63 74 69    .No de la foncti
026980:  6F 6E 20 28 31 20 61 20 39 29 3F CD 1B 20 CD D8    on (1 a 9)?.. ..
026990:  94 22 98 F2 21 A6 F2 E5 2A 98 F2 2B 29 D1 19 5E    ."..!...*..+)..^
0269A0:  23 56 EB E5 21 00 00 D1 CD 7F 06 CB 45 CA BF 9C    #V..!.......E...
0269B0:  21 A6 F2 E5 2A 98 F2 2B 29 D1 19 E5 CD 1F 21 CD    !...*..+).....!.
0269C0:  9B 14 21 66 00 CD 22 17 2A 98 F2 E5 21 00 00 CD    ..!f..".*...!...
0269D0:  26 17 CD BA 17 04 28 78 29 3D 21 A6 F2 E5 2A 98    &.....(x)=!...*.
0269E0:  F2 2B 29 D1 19 5E 23 56 EB E5 21 78 00 E5 CD 53    .+)..^#V..!x...S
0269F0:  2D 21 00 00 CD AA 17 CD CD 17 CD 1B 20 21 A6 F2    -!.......... !..
026A00:  E5 2A 98 F2 2B 29 D1 19 E5 CD 90 76 CD 9B 14 21    .*..+).....v...!
026A10:  66 00 CD 22 17 2A 98 F2 E5 21 00 00 CD 26 17 CD    f..".*...!...&..
026A20:  BA 17 04 28 78 29 3D 21 A6 F2 E5 2A 98 F2 2B 29    ...(x)=!...*..+)
026A30:  D1 19 5E 23 56 EB E5 21 78 00 E5 CD 53 2D 21 00    ..^#V..!x...S-!.
026A40:  00 CD AA 17 CD CD 17 CD 1B 20 CD E8 2C C3 B2 A0    ......... ..,...
026A50:  19 11 04 00 B7 ED 52 C2 76 9E CD 3E 02 CD 9B 14    ......R.v..>....
026A60:  CD BA 17 1A 4E 6F 20 64 65 20 6C 61 20 66 6F 6E    ....No de la fon
026A70:  63 74 69 6F 6E 20 28 31 20 61 20 39 29 3F CD 1B    ction (1 a 9)?..
026A80:  20 CD D8 94 22 98 F2 21 A6 F2 E5 2A 98 F2 2B 29     ..."..!...*..+)
026A90:  D1 19 5E 23 56 EB E5 21 00 00 D1 CD 7F 06 CB 45    ..^#V..!.......E
026AA0:  CA B2 9D 21 A6 F2 E5 2A 98 F2 2B 29 D1 19 E5 CD    ...!...*..+)....
026AB0:  1F 21 21 C8 F1 E5 2A 98 F2 2B 29 D1 19 5E 23 56    .!!...*..+)..^#V
026AC0:  EB E5 21 00 00 D1 CD CC 06 CB 45 CA 60 9E 21 01    ..!.......E.`.!.
026AD0:  00 E5 21 C8 F1 E5 2A 98 F2 2B 29 D1 19 5E 23 56    ..!...*..+)..^#V
026AE0:  EB D1 CD 66 06 7A B3 CA 60 9E D5 22 BE EC CD 9B    ...f.z..`.."....
026AF0:  14 CD BA 17 16 56 61 6C 65 75 72 20 64 75 20 70    .....Valeur du p
026B00:  61 72 61 6D 65 74 72 65 20 6E 2E CD 1B 20 2A BE    arametre n... *.
026B10:  EC CD 9B 14 E5 21 00 00 CD 26 17 CD 1B 20 CD 9B    .....!...&... ..
026B20:  14 CD BA 17 02 20 3D CD 1B 20 21 DC F1 E5 2A BE    ..... =.. !...*.
026B30:  EC 2B 29 29 E5 29 E5 29 E5 29 D1 19 D1 19 D1 19    .+)).).).)......
026B40:  D1 19 E5 2A 98 F2 2B 29 5D 54 29 19 D1 19 CD CB    ...*..+)]T).....
026B50:  14 CD 72 16 CD 1B 20 2A BE EC 23 D1 1B C3 E5 9D    ..r... *..#.....
026B60:  21 A6 F2 E5 2A 98 F2 2B 29 D1 19 5E 23 56 EB E5    !...*..+)..^#V..
026B70:  CD 6F 4A C3 B2 A0 19 11 05 00 B7 ED 52 C2 A5 A0    .oJ.........R...
026B80:  CD 3E 02 CD 9B 14 CD BA 17 1A 4E 6F 20 64 65 20    .>........No de 
026B90:  6C 61 20 66 6F 6E 63 74 69 6F 6E 20 28 31 20 61    la fonction (1 a
026BA0:  20 39 29 3F CD 1B 20 CD D8 94 22 98 F2 21 A6 F2     9)?.. ..."..!..
026BB0:  E5 2A 98 F2 2B 29 D1 19 5E 23 56 EB E5 21 00 00    .*..+)..^#V..!..
026BC0:  D1 CD 7F 06 CB 45 CA D8 9E 21 A6 F2 E5 2A 98 F2    .....E...!...*..
026BD0:  2B 29 D1 19 E5 CD 1F 21 CD 9B 14 21 66 00 CD 22    +).....!...!f.."
026BE0:  17 2A 98 F2 E5 21 00 00 CD 26 17 CD BA 17 04 28    .*...!...&.....(
026BF0:  78 29 3D 21 A6 F2 E5 2A 98 F2 2B 29 D1 19 5E 23    x)=!...*..+)..^#
026C00:  56 EB E5 21 78 00 E5 CD 53 2D 21 00 00 CD AA 17    V..!x...S-!.....
026C10:  CD CD 17 CD 1B 20 CD 9B 14 CD BA 17 35 4E 6F 20    ..... ......5No 
026C20:  64 65 20 6C 61 20 64 65 72 69 76 65 65 20 28 31    de la derivee (1
026C30:  20 61 20 39 20 65 74 20 64 69 66 66 65 72 65 6E     a 9 et differen
026C40:  74 20 64 75 20 6E 6F 20 66 6F 6E 63 74 69 6F 6E    t du no fonction
026C50:  29 3F CD 1B 20 CD D8 94 22 96 F2 2A 98 F2 E5 2A    )?.. ..."..*...*
026C60:  96 F2 D1 CD 92 06 CB 45 CA 60 A0 21 01 00 7D 32    .......E.`.!..}2
026C70:  C7 F1 21 A6 F2 E5 2A 96 F2 2B 29 D1 19 E5 21 A6    ..!...*..+)...!.
026C80:  F2 E5 2A 98 F2 2B 29 D1 19 5E 23 56 EB E5 CD A0    ..*..+)..^#V....
026C90:  79 EB E1 73 23 72 21 C8 F1 E5 2A 96 F2 2B 29 D1    y..s#r!...*..+).
026CA0:  19 E5 21 C8 F1 E5 2A 98 F2 2B 29 D1 19 5E 23 56    ..!...*..+)..^#V
026CB0:  EB EB E1 73 23 72 2A C7 F1 26 00 E5 21 01 00 D1    ...s#r*..&..!...
026CC0:  CD 7F 06 CB 45 CA 22 A0 21 A6 F2 E5 2A 96 F2 2B    ....E.".!...*..+
026CD0:  29 D1 19 E5 CD DE 75 CD 9B 14 CD BA 17 0C 44 65    ).....u.......De
026CE0:  72 69 76 65 65 20 64 65 20 66 2A 98 F2 E5 21 00    rivee de f*...!.
026CF0:  00 CD 26 17 CD BA 17 04 28 78 29 3D 21 A6 F2 E5    ..&.....(x)=!...
026D00:  2A 96 F2 2B 29 D1 19 5E 23 56 EB E5 21 78 00 E5    *..+)..^#V..!x..
026D10:  CD 53 2D 21 00 00 CD AA 17 CD CD 17 CD 1B 20 C3    .S-!.......... .
026D20:  5A A0 CD 9B 14 CD BA 17 2B 4C 61 20 64 65 72 69    Z.......+La deri
026D30:  76 65 65 20 6E 27 65 73 74 20 70 61 73 20 64 65    vee n'est pas de
026D40:  66 69 6E 69 65 20 28 49 4E 54 20 6F 75 20 41 42    finie (INT ou AB
026D50:  53 2E 2E 29 CD CD 17 CD 1B 20 CD E8 2C C3 A2 A0    S..)..... ..,...
026D60:  CD 9B 14 CD CD 17 CD 1B 20 CD 9B 14 CD BA 17 29    ........ ......)
026D70:  4D 65 6D 65 20 6E 75 6D 65 72 6F 20 70 6F 75 72    Meme numero pour
026D80:  20 66 20 65 74 20 66 27 2E 20 52 65 63 6F 6D 6D     f et f'. Recomm
026D90:  65 6E 63 65 7A 20 21 21 21 CD CD 17 CD 1B 20 CD    encez !!!..... .
026DA0:  E8 2C C3 B2 A0 19 11 06 00 B7 ED 52 C2 B2 A0 CD    .,.........R....
026DB0:  52 95 2A 90 F2 E5 21 07 00 D1 CD 7F 06 CB 45 CA    R.*...!.......E.
026DC0:  EA 9A 01 0A 00 11 BE EC C3 22 05 21 01 00 E5 21    .........".!...!
026DD0:  0A 00 D1 CD 66 06 7A B3 CA 10 A1 D5 22 98 F2 21    ....f.z....."..!
026DE0:  A6 F2 E5 2A 98 F2 2B 29 D1 19 E5 21 00 00 EB E1    ...*..+)...!....
026DF0:  73 23 72 21 C8 F1 E5 2A 98 F2 2B 29 D1 19 E5 21    s#r!...*..+)...!
026E00:  00 00 EB E1 73 23 72 2A 98 F2 23 D1 1B C3 D6 A0    ....s#r*..#.....
026E10:  CD E1 9A C3 D4 20 21 21 21 CD CD 17 CD 1B 20 CD    ..... !!!..... .
026E20:  E8 2C C3 7E 9E 19 11 06 00 B7 ED 52 C2 06 00 CD    .,.~.......R....
026E30:  52 95 2A 90 F2 E5 21 07 00 D1 CD 7F 06 CB 45 CA    R.*...!.......E.
026E40:  EA 9A 01 0A 00 11 BE EC C3 22 05 21 01 00 E5 21    .........".!...!
026E50:  0A 00 D1 CD 66 06 7A B3 CA 00 00 D5 22 98 F2 21    ....f.z....."..!
026E60:  A6 F2 E5 2A 98 F2 2B 29 D1 19 E5 21 00 00 EB E1    ...*..+)...!....
026E70:  73 23 72 21 C8 F1 E5 2A 98 F2 2B 29 D1 19 E5 21    s#r!...*..+)...!
026E80:  27 70 75 69 73 73 27 3B 75 5E 2E 76 61 6C 65 75    'puiss';u^.valeu
026E90:  72 3A 3D 27 5E 27 3B 75 5E 2E 64 3A 3D 76 3B 75    r:='^';u^.d:=v;u
026EA0:  5E 2E 67 3A 3D 66 5E 2E 64 3B 0D 0A 20 20 20 20    ^.g:=f^.d;..    
026EB0:  20 20 20 20 20 6E 65 77 28 77 29 3B 77 5E 2E 6E         new(w);w^.n
026EC0:  61 74 75 72 65 3A 3D 27 6E 6F 6D 62 72 65 27 3B    ature:='nombre';
026ED0:  77 5E 2E 76 61 6C 65 75 72 3A 3D 27 31 27 3B 77    w^.valeur:='1';w
026EE0:  5E 2E 64 3A 3D 6E 69 6C 3B 77 5E 2E 67 3A 3D 6E    ^.d:=nil;w^.g:=n
026EF0:  69 6C 3B 0D 0A 20 20 20 20 20 20 20 20 20 6E 65    il;..         ne
026F00:  77 28 73 29 3B 73 5E 2E 6E 61 74 75 72 65 3A 3D    w(s);s^.nature:=
026F10:  27 6D 6F 69 6E 73 27 3B 73 5E 2E 76 61 6C 65 75    'moins';s^.valeu
026F20:  72 3A 3D 27 2D 27 3B 73 5E 2E 67 3A 3D 77 3B 73    r:='-';s^.g:=w;s
026F30:  5E 2E 64 3A 3D 75 3B 0D 0A 20 20 20 20 20 20 20    ^.d:=u;..       
026F40:  20 20 6E 65 77 28 72 29 3B 72 5E 2E 6E 61 74 75      new(r);r^.natu
026F50:  72 65 3A 3D 27 69 64 66 63 74 27 3B 72 5E 2E 76    re:='idfct';r^.v
026F60:  61 6C 65 75 72 3A 3D 27 73 71 72 74 27 3B 72 5E    aleur:='sqrt';r^
026F70:  2E 67 3A 3D 6E 69 6C 3B 72 5E 2E 64 3A 3D 73 3B    .g:=nil;r^.d:=s;
026F80:  0D 0A 20 20 20 20 20 20 20 20 20 70 5E 2E 6E 61    ..         p^.na
026F90:  74 75 72 65 3A 3D 27 64 69 76 69 73 65 27 3B 70    ture:='divise';p
026FA0:  5E 2E 76 61 6C 65 75 72 3A 3D 27 2F 27 3B 70 5E    ^.valeur:='/';p^
026FB0:  2E 67 3A 3D 64 65 72 69 76 65 28 66 5E 2E 64 29    .g:=derive(f^.d)
026FC0:  3B 70 5E 2E 64 3A 3D 72 3B 0D 0A 20 20 20 20 20    ;p^.d:=r;..     
026FD0:  20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20       end..        
026FE0:  65 6C 73 65 0D 0A 20 20 20 20 20 20 69 66 20 66    else..      if f
026FF0:  5E 2E 76 61 6C 65 75 72 3D 27 61 72 63 63 6F 73    ^.valeur='arccos
027000:  20 20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C           if f^.val
027010:  65 75 72 3D 27 73 71 72 74 27 20 74 68 65 6E 0D    eur='sqrt' then.
027020:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
027030:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027040:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027050:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20      begin..       
027060:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027070:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027080:  20 20 20 20 20 20 20 20 20 20 69 66 20 6E 62 72              if nbr
027090:  65 3C 30 20 74 68 65 6E 0D 0A 20 20 20 20 20 20    e<0 then..      
0270A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0270B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0270C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0270D0:  20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20        begin..     
0270E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0270F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027100:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027110:  20 20 20 20 20 64 65 66 69 6E 69 3A 3D 66 61 6C         defini:=fal
027120:  73 65 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    se;..           
027130:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027140:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027150:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 67                   g
027160:  6F 74 6F 20 66 69 6E 63 61 6C 63 75 6C 3B 0D 0A    oto fincalcul;..
027170:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027180:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027190:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0271A0:  20 20 20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20              end.. 
0271B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0271C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0271D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0271E0:  20 20 20 20 20 20 20 20 20 20 20 65 6C 73 65 0D               else.
0271F0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
027200:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027210:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027220:  20 20 63 61 6C 63 75 6C 3A 3D 73 71 72 74 28 6E      calcul:=sqrt(n
027230:  62 72 65 29 0D 0A 20 20 20 20 20 20 20 20 20 20    bre)..          
027240:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027250:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027260:  20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20           end..    
027270:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027280:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027290:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C                  el
0272A0:  73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    se..            
0272B0:  20 20 69 66 20 66 5E 2E 76 61 6C 65 75 72 3D 27      if f^.valeur='
0272C0:  73 68 27 20 74 68 65 6E 20 63 61 6C 63 75 6C 3A    sh' then calcul:
0272D0:  3D 30 2E 35 2A 28 65 78 70 28 6E 62 72 65 29 2D    =0.5*(exp(nbre)-
0272E0:  65 78 70 28 6E 62 72 65 2A 2D 31 29 29 0D 0A 20    exp(nbre*-1)).. 
0272F0:  20 20 20 20 20 20 65 6C 73 65 20 20 20 69 66 20          else   if 
027300:  66 5E 2E 76 61 6C 65 75 72 3D 27 63 68 27 20 74    f^.valeur='ch' t
027310:  68 65 6E 20 63 61 6C 63 75 6C 3A 3D 30 2E 35 2A    hen calcul:=0.5*
027320:  28 65 78 70 28 6E 62 72 65 29 2B 65 78 70 28 6E    (exp(nbre)+exp(n
027330:  62 72 65 2A 2D 31 29 29 0D 0A 20 20 20 20 20 20    bre*-1))..      
027340:  20 65 6C 73 65 20 20 20 69 66 20 66 5E 2E 76 61     else   if f^.va
027350:  6C 65 75 72 3D 27 74 68 27 20 74 68 65 6E 0D 0A    leur='th' then..
027360:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027370:  63 61 6C 63 75 6C 3A 3D 28 65 78 70 28 6E 62 72    calcul:=(exp(nbr
027380:  65 29 2D 65 78 70 28 6E 62 72 65 2A 2D 31 29 29    e)-exp(nbre*-1))
027390:  2F 28 65 78 70 28 6E 62 72 65 29 2B 65 78 70 28    /(exp(nbre)+exp(
0273A0:  6E 62 72 65 2A 2D 31 29 29 0D 0A 20 20 20 20 20    nbre*-1))..     
0273B0:  20 20 65 6C 73 65 20 20 20 69 66 20 66 5E 2E 76      else   if f^.v
0273C0:  61 6C 65 75 72 3D 27 61 72 63 73 69 6E 27 20 74    aleur='arcsin' t
0273D0:  68 65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20    hen begin..     
0273E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0273F0:  20 20 20 20 20 20 20 20 69 66 20 6E 62 72 65 3D            if nbre=
027400:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
027410:  21 00 00 00 02 09 4E E5 21 00 41 02 00 00 00 02    !.....N.!.A.....
027420:  21 00 42 02 00 00 00 02 21 00 43 02 00 00 00 02    !.B.....!.C.....
027430:  21 00 44 02 00 00 00 02 21 00 45 02 00 00 00 02    !.D.....!.E.....
027440:  21 00 46 02 00 00 00 02 21 00 47 02 00 00 00 02    !.F.....!.G.....
027450:  21 00 48 02 00 00 00 02 21 00 49 02 00 00 00 02    !.H.....!.I.....
027460:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
027470:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
027480:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
027490:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0274A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0274B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0274C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0274D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0274E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0274F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
027500:  2D 31 20 74 68 65 6E 20 63 61 6C 63 75 6C 3A 3D    -1 then calcul:=
027510:  2D 30 2E 35 2A 70 69 20 65 6C 73 65 0D 0A 20 20    -0.5*pi else..  
027520:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027530:  20 20 20 20 20 20 20 20 20 20 20 69 66 20 6E 62               if nb
027540:  72 65 3D 31 20 74 68 65 6E 20 63 61 6C 63 75 6C    re=1 then calcul
027550:  3A 3D 30 2E 35 2A 70 69 20 65 6C 73 65 0D 0A 20    :=0.5*pi else.. 
027560:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027570:  20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 28                if (
027580:  28 6E 62 72 65 3C 2D 31 29 6F 72 28 6E 62 72 65    (nbre<-1)or(nbre
027590:  3E 31 29 29 20 74 68 65 6E 0D 0A 20 20 20 20 20    >1)) then..     
0275A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0275B0:  20 20 20 20 20 20 20 20 62 65 67 69 6E 20 64 65            begin de
0275C0:  66 69 6E 69 3A 3D 66 61 6C 73 65 3B 67 6F 74 6F    fini:=false;goto
0275D0:  20 66 69 6E 63 61 6C 63 75 6C 3B 0D 0A 20 20 20     fincalcul;..   
0275E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0275F0:  20 20 20 20 20 20 20 20 20 20 65 6E 64 20 20 65              end  e
027600:  6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20    lse..           
027610:  20 63 61 6C 63 75 6C 3A 3D 61 72 63 74 61 6E 28     calcul:=arctan(
027620:  6E 62 72 65 2F 73 71 72 74 28 31 2D 6E 62 72 65    nbre/sqrt(1-nbre
027630:  2A 6E 62 72 65 29 29 3B 0D 0A 20 20 20 20 20 20    *nbre));..      
027640:  20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20          end..     
027650:  20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20      else..        
027660:  20 20 20 20 20 20 20 69 66 20 66 5E 2E 76 61 6C           if f^.val
027670:  65 75 72 3D 27 61 72 63 63 6F 73 27 20 74 68 65    eur='arccos' the
027680:  6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20    n begin..       
027690:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0276A0:  20 20 20 20 20 20 69 66 20 6E 62 72 65 3D 2D 31          if nbre=-1
0276B0:  20 74 68 65 6E 20 63 61 6C 63 75 6C 3A 3D 70 69     then calcul:=pi
0276C0:  20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 20     else..         
0276D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0276E0:  20 20 20 20 69 66 20 6E 62 72 65 3D 31 20 74 68        if nbre=1 th
0276F0:  65 6E 20 63 61 6C 63 75 6C 3A 3D 30 20 65 6C 73    en calcul:=0 els
027700:  65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    e..             
027710:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027720:  69 66 20 28 28 6E 62 72 65 3C 2D 31 29 6F 72 28    if ((nbre<-1)or(
027730:  6E 62 72 65 3E 31 29 29 20 74 68 65 6E 0D 0A 20    nbre>1)) then.. 
027740:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027750:  20 20 20 20 20 20 20 20 20 20 20 20 62 65 67 69                begi
027760:  6E 20 64 65 66 69 6E 69 3A 3D 66 61 6C 73 65 3B    n defini:=false;
027770:  67 6F 74 6F 20 66 69 6E 63 61 6C 63 75 6C 3B 0D    goto fincalcul;.
027780:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
027790:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6E                  en
0277A0:  64 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20    d  else..       
0277B0:  20 20 20 20 20 63 61 6C 63 75 6C 3A 3D 28 70 69         calcul:=(pi
0277C0:  2F 32 29 2D 61 72 63 74 61 6E 28 6E 62 72 65 2F    /2)-arctan(nbre/
0277D0:  73 71 72 74 28 31 2D 6E 62 72 65 2A 6E 62 72 65    sqrt(1-nbre*nbre
0277E0:  29 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20    ));..           
0277F0:  20 65 6E 64 0D 0A 20 20 20 20 20 20 20 65 6C 73     end..       els
027800:  65 0D 0A 20 20 65 72 72 65 75 72 28 31 30 29 0D    e..  erreur(10).
027810:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
027820:  20 20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64                 end
027830:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
027840:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C                  el
027850:  73 65 0D 0A 20 20 69 66 20 66 3D 6E 69 6C 20 74    se..  if f=nil t
027860:  68 65 6E 20 63 61 6C 63 75 6C 3A 3D 30 3B 0D 0A    hen calcul:=0;..
027870:  20 20 66 69 6E 63 61 6C 63 75 6C 3A 3B 0D 0A 65      fincalcul:;..e
027880:  6E 64 3B 0D 0A 0D 0A 66 75 6E 63 74 69 6F 6E 20    nd;....function 
027890:  20 74 61 70 65 66 6F 6E 63 74 69 6F 6E 3B 0D 0A     tapefonction;..
0278A0:  76 61 72 0D 0A 77 77 77 2C 77 77 78 3A 73 74 72    var..www,wwx:str
0278B0:  32 30 30 3B 0D 0A 63 6F 65 66 66 3A 72 65 61 6C    200;..coeff:real
0278C0:  3B 72 65 73 75 6C 74 61 74 3A 69 6E 74 65 67 65    ;resultat:intege
0278D0:  72 3B 0D 0A 66 6F 72 6D 61 74 3A 73 74 72 31 30    r;..format:str10
0278E0:  3B 0D 0A 62 65 67 69 6E 0D 0A 69 66 20 66 5E 2E    ;..begin..if f^.
0278F0:  6E 61 74 75 72 65 3D 27 69 64 66 63 74 27 20 74    nature='idfct' t
027900:  68 65 6E 0D 0A 74 61 70 65 66 6F 6E 63 74 69 6F    hen..tapefonctio
027910:  6E 3A 3D 66 5E 2E 76 61 6C 65 75 72 2B 27 28 27    n:=f^.valeur+'('
027920:  2B 74 61 70 65 66 6F 6E 63 74 69 6F 6E 28 66 5E    +tapefonction(f^
027930:  2E 64 2C 76 29 2B 27 29 27 20 65 6C 73 65 0D 0A    .d,v)+')' else..
027940:  69 66 20 66 5E 2E 6E 61 74 75 72 65 3D 27 6E 6F    if f^.nature='no
027950:  6D 62 72 65 27 20 74 68 65 6E 20 20 74 61 70 65    mbre' then  tape
027960:  66 6F 6E 63 74 69 6F 6E 3A 3D 66 5E 2E 76 61 6C    fonction:=f^.val
027970:  65 75 72 20 65 6C 73 65 0D 0A 69 66 20 66 5E 2E    eur else..if f^.
027980:  6E 61 74 75 72 65 3D 27 70 61 72 61 6D 27 20 74    nature='param' t
027990:  68 65 6E 0D 0A 74 61 70 65 66 6F 6E 63 74 69 6F    hen..tapefonctio
0279A0:  6E 3A 3D 27 70 28 27 2B 66 5E 2E 76 61 6C 65 75    n:='p('+f^.valeu
0279B0:  72 2B 27 29 27 20 65 6C 73 65 0D 0A 69 66 20 66    r+')' else..if f
0279C0:  5E 2E 6E 61 74 75 72 65 3D 27 76 61 72 69 61 62    ^.nature='variab
0279D0:  27 20 74 68 65 6E 0D 0A 74 61 70 65 66 6F 6E 63    ' then..tapefonc
0279E0:  74 69 6F 6E 3A 3D 76 20 65 6C 73 65 0D 0A 69 66    tion:=v else..if
0279F0:  20 28 28 66 5E 2E 6E 61 74 75 72 65 3D 27 70 6C     ((f^.nature='pl
027A00:  75 73 27 29 20 6F 72 20 28 66 5E 2E 6E 61 74 75    us') or (f^.natu
027A10:  72 65 3D 27 6D 6F 69 6E 73 27 29 29 20 74 68 65    re='moins')) the
027A20:  6E 0D 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20    n..    begin..  
027A30:  20 20 77 77 77 3A 3D 74 61 70 65 66 6F 6E 63 74      www:=tapefonct
027A40:  69 6F 6E 28 66 5E 2E 64 2C 76 29 3B 77 77 78 3A    ion(f^.d,v);wwx:
027A50:  3D 74 61 70 65 66 6F 6E 63 74 69 6F 6E 28 66 5E    =tapefonction(f^
027A60:  2E 67 2C 76 29 3B 0D 0A 20 20 20 20 69 66 20 28    .g,v);..    if (
027A70:  28 28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27    ((f^.d^.valeur='
027A80:  2B 27 29 6F 72 28 66 5E 2E 64 5E 2E 76 61 6C 65    +')or(f^.d^.vale
027A90:  75 72 3D 27 2D 27 29 29 61 6E 64 28 66 5E 2E 76    ur='-'))and(f^.v
027AA0:  61 6C 65 75 72 3D 27 2B 27 29 29 20 74 68 65 6E    aleur='+')) then
027AB0:  0D 0A 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20    ..     begin..  
027AC0:  20 20 20 64 65 6C 65 74 65 28 77 77 77 2C 31 2C       delete(www,1,
027AD0:  31 29 3B 64 65 6C 65 74 65 28 77 77 77 2C 6C 65    1);delete(www,le
027AE0:  6E 67 74 68 28 77 77 77 29 2C 31 29 3B 0D 0A 20    ngth(www),1);.. 
027AF0:  20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 69 66        end;..    if
027B00:  20 28 28 66 5E 2E 67 5E 2E 76 61 6C 65 75 72 3D     ((f^.g^.valeur=
027B10:  27 2B 27 29 6F 72 28 66 5E 2E 67 5E 2E 76 61 6C    '+')or(f^.g^.val
027B20:  65 75 72 3D 27 2D 27 29 29 20 74 68 65 6E 0D 0A    eur='-')) then..
027B30:  20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20         begin..    
027B40:  20 64 65 6C 65 74 65 28 77 77 78 2C 31 2C 31 29     delete(wwx,1,1)
027B50:  3B 64 65 6C 65 74 65 28 77 77 78 2C 6C 65 6E 67    ;delete(wwx,leng
027B60:  74 68 28 77 77 78 29 2C 31 29 3B 0D 0A 20 20 20    th(wwx),1);..   
027B70:  20 20 65 6E 64 3B 63 6F 65 66 66 3A 3D 31 3B 0D      end;coeff:=1;.
027B80:  0A 20 20 20 20 20 69 66 20 66 5E 2E 64 5E 2E 6E    .     if f^.d^.n
027B90:  61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 20 74    ature='nombre' t
027BA0:  68 65 6E 20 76 61 6C 28 66 5E 2E 64 5E 2E 76 61    hen val(f^.d^.va
027BB0:  6C 65 75 72 2C 63 6F 65 66 66 2C 72 65 73 75 6C    leur,coeff,resul
027BC0:  74 61 74 29 3B 0D 0A 20 20 20 20 20 69 66 20 28    tat);..     if (
027BD0:  28 66 5E 2E 64 5E 2E 76 61 6C 65 75 72 3D 27 2A    (f^.d^.valeur='*
027BE0:  27 29 61 6E 64 20 28 66 5E 2E 64 5E 2E 67 5E 2E    ')and (f^.d^.g^.
027BF0:  6E 61 74 75 72 65 3D 27 6E 6F 6D 62 72 65 27 29    nature='nombre')
027C00:  29 20 74 68 65 6E 0D 0A 20 20 20 20 20 76 61 6C    ) then..     val
027C10:  28 66 5E 2E 64 5E 2E 67 5E 2E 76 61 6C 65 75 72    (f^.d^.g^.valeur
027C20:  2C 63 6F 65 66 66 2C 72 65 73 75 6C 74 61 74 29    ,coeff,resultat)
027C30:  3B 0D 0A 20 20 20 20 20 69 66 20 28 28 66 5E 2E    ;..     if ((f^.
027C40:  76 61 6C 65 75 72 3D 27 2B 27 29 20 61 6E 64 20    valeur='+') and 
027C50:  28 63 6F 65 66 66 3C 30 29 29 20 74 68 65 6E 0D    (coeff<0)) then.
027C60:  0A 20 20 20 20 74 61 70 65 66 6F 6E 63 74 69 6F    .    tapefonctio
027C70:  6E 3A 3D 27 28 27 2B 77 77 78 2B 77 77 77 2B 27    n:='('+wwx+www+'
027C80:  29 27 20 65 6C 73 65 0D 0A 20 20 20 74 61 70 65    )' else..   tape
027C90:  66 6F 6E 63 74 69 6F 6E 3A 3D 27 28 27 2B 77 77    fonction:='('+ww
027CA0:  78 2B 66 5E 2E 76 61 6C 65 75 72 2B 77 77 77 2B    x+f^.valeur+www+
027CB0:  27 29 27 0D 0A 20 20 20 65 6E 64 0D 0A 20 20 20    ')'..   end..   
027CC0:  65 6C 73 65 0D 0A 69 66 20 28 28 66 5E 2E 6E 61    else..if ((f^.na
027CD0:  74 75 72 65 3D 27 64 69 76 69 73 65 27 29 20 6F    ture='divise') o
027CE0:  72 20 28 66 5E 2E 6E 61 74 75 72 65 3D 27 6D 75    r (f^.nature='mu
027CF0:  6C 74 69 27 29 20 6F 72 20 28 66 5E 2E 6E 61 74    lti') or (f^.nat
027D00:  75 72 65 3D 27 70 75 69 73 73 27 29 29 0D 0A 74    ure='puiss'))..t
027D10:  68 65 6E 20 74 61 70 65 66 6F 6E 63 74 69 6F 6E    hen tapefonction
027D20:  3A 3D 74 61 70 65 66 6F 6E 63 74 69 6F 6E 28 66    :=tapefonction(f
027D30:  5E 2E 67 2C 76 29 2B 66 5E 2E 76 61 6C 65 75 72    ^.g,v)+f^.valeur
027D40:  2B 74 61 70 65 66 6F 6E 63 74 69 6F 6E 28 66 5E    +tapefonction(f^
027D50:  2E 64 2C 76 29 20 65 6C 73 65 0D 0A 74 61 70 65    .d,v) else..tape
027D60:  66 6F 6E 63 74 69 6F 6E 3A 3D 27 27 3B 0D 0A 65    fonction:='';..e
027D70:  6E 64 3B 0D 0A 0D 0A 66 75 6E 63 74 69 6F 6E 20    nd;....function 
027D80:  6F 70 70 6F 73 65 3B 0D 0A 76 61 72 0D 0A 75 2C    oppose;..var..u,
027D90:  76 3A 66 6F 6E 63 74 69 6F 6E 3B 0D 0A 63 6F 65    v:fonction;..coe
027DA0:  66 66 2C 72 65 73 75 6C 74 61 74 3A 69 6E 74 65    ff,resultat:inte
027DB0:  67 65 72 3B 0D 0A 63 6F 65 66 32 3A 72 65 61 6C    ger;..coef2:real
027DC0:  3B 0D 0A 62 65 67 69 6E 0D 0A 69 66 20 28 28 66    ;..begin..if ((f
027DD0:  5E 2E 76 61 6C 65 75 72 3D 27 2A 27 29 20 61 6E    ^.valeur='*') an
027DE0:  64 20 28 66 5E 2E 67 5E 2E 6E 61 74 75 72 65 3D    d (f^.g^.nature=
027DF0:  27 6E 6F 6D 62 72 65 27 29 29 20 74 68 65 6E 0D    'nombre')) then.
027E00:  0A 20 62 65 67 69 6E 0D 0A 20 20 6E 65 77 28 75    . begin..  new(u
027E10:  29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D 27 6D 75    );u^.nature:='mu
027E20:  6C 74 69 27 3B 75 5E 2E 76 61 6C 65 75 72 3A 3D    lti';u^.valeur:=
027E30:  27 2A 27 3B 75 5E 2E 64 3A 3D 66 5E 2E 64 3B 0D    '*';u^.d:=f^.d;.
027E40:  0A 20 20 75 5E 2E 67 3A 3D 6F 70 70 6F 73 65 28    .  u^.g:=oppose(
027E50:  66 5E 2E 67 29 3B 6F 70 70 6F 73 65 3A 3D 75 3B    f^.g);oppose:=u;
027E60:  0D 0A 20 65 6E 64 0D 0A 20 65 6C 73 65 0D 0A 69    .. end.. else..i
027E70:  66 20 28 28 66 5E 2E 76 61 6C 65 75 72 3D 27 78    f ((f^.valeur='x
027E80:  27 29 20 6F 72 20 28 66 5E 2E 76 61 6C 65 75 72    ') or (f^.valeur
027E90:  3D 27 5E 27 29 29 20 74 68 65 6E 0D 0A 20 62 65    ='^')) then.. be
027EA0:  67 69 6E 0D 0A 20 20 6E 65 77 28 75 29 3B 75 5E    gin..  new(u);u^
027EB0:  2E 6E 61 74 75 72 65 3A 3D 27 6D 75 6C 74 69 27    .nature:='multi'
027EC0:  3B 75 5E 2E 76 61 6C 65 75 72 3A 3D 27 2A 27 3B    ;u^.valeur:='*';
027ED0:  75 5E 2E 64 3A 3D 66 3B 0D 0A 20 20 6E 65 77 28    u^.d:=f;..  new(
027EE0:  76 29 3B 76 5E 2E 6E 61 74 75 72 65 3A 3D 27 6E    v);v^.nature:='n
027EF0:  6F 6D 62 72 65 27 3B 76 5E 2E 76 61 6C 65 75 72    ombre';v^.valeur
027F00:  3A 3D 27 2D 31 27 3B 76 5E 2E 64 3A 3D 6E 69 6C    :='-1';v^.d:=nil
027F10:  3B 76 5E 2E 67 3A 3D 6E 69 6C 3B 0D 0A 20 20 75    ;v^.g:=nil;..  u
027F20:  5E 2E 67 3A 3D 76 3B 6F 70 70 6F 73 65 3A 3D 75    ^.g:=v;oppose:=u
027F30:  3B 0D 0A 20 65 6E 64 0D 0A 20 65 6C 73 65 0D 0A    ;.. end.. else..
027F40:  69 66 20 66 5E 2E 6E 61 74 75 72 65 3D 27 6E 6F    if f^.nature='no
027F50:  6D 62 72 65 27 20 74 68 65 6E 0D 0A 20 62 65 67    mbre' then.. beg
027F60:  69 6E 0D 0A 20 20 6E 65 77 28 75 29 3B 75 5E 2E    in..  new(u);u^.
027F70:  6E 61 74 75 72 65 3A 3D 27 6E 6F 6D 62 72 65 27    nature:='nombre'
027F80:  3B 75 5E 2E 64 3A 3D 6E 69 6C 3B 75 5E 2E 67 3A    ;u^.d:=nil;u^.g:
027F90:  3D 6E 69 6C 3B 0D 0A 20 20 76 61 6C 28 66 5E 2E    =nil;..  val(f^.
027FA0:  76 61 6C 65 75 72 2C 63 6F 65 66 32 2C 72 65 73    valeur,coef2,res
027FB0:  75 6C 74 61 74 29 3B 63 6F 65 66 32 3A 3D 63 6F    ultat);coef2:=co
027FC0:  65 66 32 2A 28 2D 31 29 3B 0D 0A 20 20 69 66 20    ef2*(-1);..  if 
027FD0:  66 72 61 63 28 63 6F 65 66 32 29 3D 30 20 74 68    frac(coef2)=0 th
027FE0:  65 6E 20 73 74 72 28 72 6F 75 6E 64 28 63 6F 65    en str(round(coe
027FF0:  66 32 29 2C 75 5E 2E 76 61 6C 65 75 72 29 0D 0A    f2),u^.valeur)..
028000:  20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 62 65        else..    be
028010:  67 69 6E 0D 0A 20 20 20 20 73 74 72 28 63 6F 65    gin..    str(coe
028020:  66 32 3A 31 30 3A 35 2C 75 5E 2E 76 61 6C 65 75    f2:10:5,u^.valeu
028030:  72 29 3B 0D 0A 20 20 20 20 77 68 69 6C 65 20 70    r);..    while p
028040:  6F 73 28 27 20 27 2C 75 5E 2E 76 61 6C 65 75 72    os(' ',u^.valeur
028050:  29 3C 3E 30 20 64 6F 20 64 65 6C 65 74 65 28 75    )<>0 do delete(u
028060:  5E 2E 76 61 6C 65 75 72 2C 31 2C 31 29 3B 0D 0A    ^.valeur,1,1);..
028070:  20 20 20 20 65 6E 64 3B 0D 0A 20 20 6F 70 70 6F        end;..  oppo
028080:  73 65 3A 3D 75 3B 0D 0A 20 65 6E 64 0D 0A 20 65    se:=u;.. end.. e
028090:  6C 73 65 0D 0A 69 66 20 66 5E 2E 76 61 6C 65 75    lse..if f^.valeu
0280A0:  72 3D 27 2B 27 20 74 68 65 6E 0D 0A 20 20 62 65    r='+' then..  be
0280B0:  67 69 6E 20 6E 65 77 28 75 29 3B 75 5E 2E 6E 61    gin new(u);u^.na
0280C0:  74 75 72 65 3A 3D 27 70 6C 75 73 27 3B 75 5E 2E    ture:='plus';u^.
0280D0:  76 61 6C 65 75 72 3A 3D 27 2B 27 3B 0D 0A 20 20    valeur:='+';..  
0280E0:  75 5E 2E 67 3A 3D 6F 70 70 6F 73 65 28 66 5E 2E    u^.g:=oppose(f^.
0280F0:  67 29 3B 75 5E 2E 64 3A 3D 6F 70 70 6F 73 65 28    g);u^.d:=oppose(
028100:  66 5E 2E 64 29 3B 6F 70 70 6F 73 65 3A 3D 75 20    f^.d);oppose:=u 
028110:  65 6E 64 0D 0A 20 65 6C 73 65 0D 0A 69 66 20 66    end.. else..if f
028120:  5E 2E 76 61 6C 65 75 72 3D 27 2D 27 20 74 68 65    ^.valeur='-' the
028130:  6E 0D 0A 20 20 62 65 67 69 6E 20 6E 65 77 28 75    n..  begin new(u
028140:  29 3B 75 5E 2E 6E 61 74 75 72 65 3A 3D 27 70 6C    );u^.nature:='pl
028150:  75 73 27 3B 75 5E 2E 76 61 6C 65 75 72 3A 3D 27    us';u^.valeur:='
028160:  2B 27 3B 75 5E 2E 67 3A 3D 6F 70 70 6F 73 65 28    +';u^.g:=oppose(
028170:  66 5E 2E 67 29 3B 75 5E 2E 64 3A 3D 66 5E 2E 64    f^.g);u^.d:=f^.d
028180:  3B 0D 0A 20 20 6F 70 70 6F 73 65 3A 3D 75 20 65    ;..  oppose:=u e
028190:  6E 64 0D 0A 20 20 65 6C 73 65 0D 0A 69 66 20 66    nd..  else..if f
0281A0:  3D 6E 69 6C 20 74 68 65 6E 20 6F 70 70 6F 73 65    =nil then oppose
0281B0:  3A 3D 6E 69 6C 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A    :=nil;..end;....
0281C0:  0D 0A 0D 0A 66 75 6E 63 74 69 6F 6E 20 20 65 78    ....function  ex
0281D0:  70 6F 73 61 6E 74 3B 0D 0A 76 61 72 0D 0A 6C 6C    posant;..var..ll
0281E0:  3A 69 6E 74 65 67 65 72 3B 0D 0A 62 65 67 69 6E    :integer;..begin
0281F0:  0D 0A 6C 6C 3A 3D 72 6F 75 6E 64 28 6C 29 3B 0D    ..ll:=round(l);.
028200:  0A 69 66 20 6B 3D 30 20 74 68 65 6E 20 65 78 70    .if k=0 then exp
028210:  6F 73 61 6E 74 3A 3D 30 20 65 6C 73 65 0D 0A 69    osant:=0 else..i
028220:  66 20 6C 6C 3D 30 20 74 68 65 6E 20 65 78 70 6F    f ll=0 then expo
028230:  73 61 6E 74 3A 3D 31 20 65 6C 73 65 0D 0A 69 66    sant:=1 else..if
028240:  20 6C 6C 3E 30 20 74 68 65 6E 20 62 65 67 69 6E     ll>0 then begin
028250:  20 6C 3A 3D 6C 2D 31 3B 65 78 70 6F 73 61 6E 74     l:=l-1;exposant
028260:  3A 3D 6B 2A 65 78 70 6F 73 61 6E 74 28 6B 2C 6C    :=k*exposant(k,l
028270:  29 20 65 6E 64 20 65 6C 73 65 0D 0A 69 66 20 6C    ) end else..if l
028280:  6C 3C 30 20 74 68 65 6E 20 62 65 67 69 6E 20 6C    l<0 then begin l
028290:  3A 3D 6C 2B 31 3B 65 78 70 6F 73 61 6E 74 3A 3D    :=l+1;exposant:=
0282A0:  28 31 2F 6B 29 2A 65 78 70 6F 73 61 6E 74 28 6B    (1/k)*exposant(k
0282B0:  2C 6C 29 20 65 6E 64 3B 0D 0A 65 6E 64 3B 0D 0A    ,l) end;..end;..
0282C0:  0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 20 20    ....procedure   
0282D0:  20 63 61 6C 63 75 6C 66 6F 6E 63 74 69 6F 6E 28     calculfonction(
0282E0:  66 3A 66 6F 6E 63 74 69 6F 6E 29 3B 0D 0A 76 61    f:fonction);..va
0282F0:  72 0D 0A 63 68 78 2C 63 68 79 3A 73 74 72 31 30    r..chx,chy:str10
028300:  3B 0D 0A 62 65 67 69 6E 0D 0A 20 63 6C 72 73 63    ;..begin.. clrsc
028310:  72 3B 0D 0A 20 72 65 70 65 61 74 0D 0A 20 77 72    r;.. repeat.. wr
028320:  69 74 65 28 27 76 61 6C 65 75 72 20 64 65 20 78    ite('valeur de x
028330:  20 3F 27 29 3B 0D 0A 20 72 65 61 64 6C 6E 28 78     ?');.. readln(x
028340:  29 3B 0D 0A 20 64 65 66 69 6E 69 3A 3D 74 72 75    );.. defini:=tru
028350:  65 3B 72 65 73 75 6C 74 61 74 3A 3D 63 61 6C 63    e;resultat:=calc
028360:  75 6C 28 66 2C 78 29 3B 0D 0A 20 69 66 20 66 72    ul(f,x);.. if fr
028370:  61 63 28 78 29 3D 30 20 74 68 65 6E 20 73 74 72    ac(x)=0 then str
028380:  28 72 6F 75 6E 64 28 78 29 2C 63 68 78 29 20 65    (round(x),chx) e
028390:  6C 73 65 20 73 74 72 28 78 3A 38 3A 33 2C 63 68    lse str(x:8:3,ch
0283A0:  78 29 3B 0D 0A 20 69 66 20 64 65 66 69 6E 69 3D    x);.. if defini=
0283B0:  74 72 75 65 20 74 68 65 6E 0D 0A 20 20 20 20 20    true then..     
0283C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62                   b
0283D0:  65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20    egin..          
0283E0:  20 20 20 20 20 20 20 20 20 20 77 72 69 74 65 28              write(
0283F0:  27 66 27 2C 69 2C 27 28 27 2C 63 68 78 2C 27 29    'f',i,'(',chx,')
028400:  3D 27 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20    =');..          
028410:  20 20 20 20 20 20 20 20 20 20 69 66 20 66 72 61              if fra
028420:  63 28 72 65 73 75 6C 74 61 74 29 3D 30 20 74 68    c(resultat)=0 th
028430:  65 6E 20 73 74 72 28 72 6F 75 6E 64 28 72 65 73    en str(round(res
028440:  75 6C 74 61 74 29 2C 63 68 79 29 20 65 6C 73 65    ultat),chy) else
028450:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
028460:  20 20 20 20 20 20 73 74 72 28 72 65 73 75 6C 74          str(result
028470:  61 74 3A 38 3A 33 2C 63 68 79 29 3B 0D 0A 20 20    at:8:3,chy);..  
028480:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028490:  20 20 77 72 69 74 65 6C 6E 28 63 68 79 29 3B 0D      writeln(chy);.
0284A0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
0284B0:  20 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20         end..      
0284C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C                  el
0284D0:  73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    se..            
0284E0:  20 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20            begin.. 
0284F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028500:  20 20 20 77 72 69 74 65 6C 6E 28 27 66 27 2C 69       writeln('f',i
028510:  2C 27 28 27 2C 63 68 78 2C 27 29 20 6E 27 27 65    ,'(',chx,') n''e
028520:  73 74 20 70 61 73 20 64 65 66 69 6E 69 65 27 29    st pas definie')
028530:  3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    ;..             
028540:  20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 77 72           end;.. wr
028550:  69 74 65 6C 6E 28 27 3C 31 3E 20 55 6E 20 61 75    iteln('<1> Un au
028560:  74 72 65 20 78 3F 20 3C 32 3E 20 52 65 74 6F 75    tre x? <2> Retou
028570:  72 20 61 75 20 6D 65 6E 75 20 27 29 3B 0D 0A 20    r au menu ');.. 
028580:  20 20 72 65 70 65 61 74 0D 0A 20 20 20 72 65 61      repeat..   rea
028590:  64 28 6B 62 64 2C 63 61 72 29 3B 0D 0A 20 20 20    d(kbd,car);..   
0285A0:  75 6E 74 69 6C 20 28 28 63 61 72 3D 27 31 27 29    until ((car='1')
0285B0:  20 6F 72 20 28 63 61 72 3D 27 32 27 29 29 3B 0D     or (car='2'));.
0285C0:  0A 20 20 20 76 61 6C 28 63 61 72 2C 63 68 6F 69    .   val(car,choi
0285D0:  78 2C 72 65 73 75 6C 74 29 3B 0D 0A 20 77 72 69    x,result);.. wri
0285E0:  74 65 6C 6E 3B 0D 0A 20 75 6E 74 69 6C 20 63 68    teln;.. until ch
0285F0:  6F 69 78 3D 32 0D 0A 65 6E 64 3B 0D 0A 0D 0D 0D    oix=2..end;.....
028600:  0D 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
028610:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
028620:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
028630:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
028640:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
028650:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
028660:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
028670:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
028680:  65 29 2D 65 78 70 28 6E 62 72 65 2A 2D 31 29 29    e)-exp(nbre*-1))
028690:  2F 28 65 78 70 28 6E 62 72 65 29 2B 65 78 70 28    /(exp(nbre)+exp(
0286A0:  6E 62 72 65 2A 2D 31 29 29 0D 0A 20 20 20 20 20    nbre*-1))..     
0286B0:  20 20 65 6C 73 65 20 20 20 69 66 20 66 5E 2E 76      else   if f^.v
0286C0:  61 6C 65 75 72 3D 27 61 72 63 73 69 6E 27 20 74    aleur='arcsin' t
0286D0:  68 65 6E 20 62 65 67 69 6E 0D 0A 20 20 20 20 20    hen begin..     
0286E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0286F0:  20 20 20 20 20 20 20 20 69 66 20 6E 62 72 65 3D            if nbre=
028700:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
028710:  22 00 00 00 02 09 4E E5 22 00 41 02 00 00 00 02    ".....N.".A.....
028720:  22 00 42 02 00 00 00 02 22 00 43 02 00 00 00 02    ".B.....".C.....
028730:  22 00 44 02 00 00 00 02 22 00 45 02 00 00 00 02    ".D.....".E.....
028740:  22 00 46 02 00 00 00 02 22 00 47 02 00 00 00 02    ".F.....".G.....
028750:  22 00 48 02 00 00 00 02 22 00 49 02 00 00 00 02    ".H.....".I.....
028760:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
028770:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
028780:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
028790:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0287A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0287B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0287C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0287D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0287E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0287F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
028800:  C3 E2 20 CD AB 43 6F 70 79 72 69 67 68 74 20 28    .. ..Copyright (
028810:  43 29 20 31 39 38 35 20 42 4F 52 4C 41 4E 44 20    C) 1985 BORLAND 
028820:  49 6E 63 00 04 00 A1 42 00 00 00 00 00 00 00 00    Inc....B........
028830:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
028840:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
028850:  00 00 00 06 5A 65 6E 69 74 68 64 65 72 20 43 50    ....Zenithder CP
028860:  43 34 36 34 2F 36 36 34 50 18 00 00 1C 00 0D 0D    C464/664P.......
028870:  1C 01 01 01 1D 03 03 1B 1B 1B D5 00 1C 01 00 00    ................
028880:  1C 00 17 17 1D 17 17 EF 9E CD BD 04 1B 59 00 00    .............Y..
028890:  00 00 00 00 00 00 00 00 00 00 00 01 20 20 04 03    ............  ..
0288A0:  00 00 02 1B 45 00 00 00 00 00 00 00 00 00 02 1B    ....E...........
0288B0:  4C 00 00 00 02 1B 4D 00 00 00 00 00 02 1B 4B 00    L.....M.......K.
0288C0:  00 00 02 1B 71 00 00 00 02 1B 70 00 00 00 00 00    ....q.....p.....
0288D0:  7E B7 37 C8 23 F5 E5 7E CD E8 01 E1 F1 3D C8 18    ~.7.#..~.....=..
0288E0:  F3 CD 00 02 0D 0A 00 C9 6F E5 CD A6 00 C9 FE 80    ........o.......
0288F0:  DC 6B 02 D4 84 02 E6 7F 18 EE E5 21 EE 01 18 04    .k.........!....
028900:  E5 21 E8 01 22 13 02 E1 E3 F5 C5 D5 7E 23 B7 28    .!..".......~#.(
028910:  07 E5 CD E8 01 E1 18 F4 D1 C1 F1 E3 C9 7D B4 C8    .............}..
028920:  3A 24 01 87 87 87 E3 E3 E3 E3 C5 01 D2 04 C1 3D    :$.............=
028930:  20 F4 2B 18 E8 CD D0 01 D8 2A CE 01 18 DF F5 C5     .+......*......
028940:  D5 E5 21 A8 01 CD 35 02 21 A2 01 CD D0 01 2A BA    ..!...5.!.....*.
028950:  01 D4 1D 02 E1 D1 C1 F1 C9 F5 C5 D5 E5 21 B4 01    .............!..
028960:  18 E9 F5 C5 D5 E5 21 AE 01 18 E0 F5 3A E0 00 B7    ......!.....:...
028970:  28 10 C5 D5 E5 AF 32 E0 00 21 C8 01 CD 35 02 E1    (.....2..!...5..
028980:  D1 C1 F1 C9 F5 3A E0 00 FE FF 28 F6 C5 D5 E5 3E    .....:....(....>
028990:  FF 32 E0 00 21 C2 01 18 E3 F5 C5 D5 E5 21 BC 01    .2..!........!..
0289A0:  18 DA F5 C5 D5 E5 E5 11 F0 00 21 8B 01 01 10 00    ..........!.....
0289B0:  ED B0 D1 3A 9E 01 4F 3A 9C 01 82 D5 CD DC 02 D1    ...:..O:........
0289C0:  3A 9F 01 4F 3A 9D 01 83 CD DC 02 21 F0 00 CD D0    :..O:......!....
0289D0:  01 2A A0 01 CD 1D 02 E1 D1 C1 F1 C9 21 F0 00 06    .*..........!...
0289E0:  00 09 EB 21 9B 01 34 35 28 02 12 C9 1B 1B 21 0A    ...!..45(.....!.
0289F0:  03 06 03 2B 0E 2F 0C 96 30 FC 86 F5 79 FE 30 28    ...+./..0...y.0(
028A00:  01 12 13 F1 10 ED C9 01 0A 64 21 6B 01 C3 35 02    .........d!k..5.
028A10:  21 7B 01 C3 35 02 11 03 00 CD 5F 03 E6 01 18 06    !{..5....._.....
028A20:  11 06 00 CD 5F 03 6F 26 00 C9 11 12 00 18 F4 11    ...._.o&........
028A30:  0C 00 18 08 11 0F 00 18 03 11 09 00 E1 C1 E5 3A    ...............:
028A40:  DD 00 B7 28 1A D5 C5 CD A0 00 7C B5 28 0F CD E1    ...(......|.(...
028A50:  03 FE 13 20 08 CD E1 03 FE 03 CA D4 20 C1 D1 2A    ... ........ ..*
028A60:  01 00 19 E9 22 D2 00 78 32 DD 00 79 B7 28 0B 3E    ...."..x2..y.(.>
028A70:  C3 32 38 00 21 FB 1F 22 39 00 21 A5 03 11 A0 00    .28.!.."9.!.....
028A80:  01 18 00 ED B0 21 BD 03 11 B8 00 01 0C 00 ED B0    .....!..........
028A90:  AF 6F 67 32 D0 00 22 D4 00 22 D6 00 3E 7E 32 D1    .og2..".."..>~2.
028AA0:  00 32 E0 00 C9 C3 16 03 C3 20 03 C3 39 03 C3 2F    .2....... ..9../
028AB0:  03 C3 34 03 C3 2A 03 C3 39 03 C3 20 03 C1 00 82    ..4..*..9.. ....
028AC0:  00 43 00 C4 00 C5 00 C1 00 C5 D5 E5 DD E5 FD E5    .C..............
028AD0:  F5 6F 26 00 E5 CD A6 00 F1 FD E1 DD E1 E1 D1 C1    .o&.............
028AE0:  C9 C5 D5 E5 DD E5 FD E5 CD A3 00 7D 18 EB 0E FF    .........£.}....
028AF0:  18 0C 0E 00 ED 5B D2 00 13 1A FE 20 28 FA 21 65    .....[..... (.!e
028B00:  00 06 03 CD 7B 04 1A CD A6 04 FE 41 38 12 FE 51    ....{......A8..Q
028B10:  30 0E 47 13 1A FE 3A 20 06 78 D6 40 13 18 02 1B    0.G...: .x.@....
028B20:  AF 21 5C 00 77 23 0C 0D 28 19 1A CD 82 04 20 13    .!\.w#..(..... .
028B30:  FE 3F 28 0F FE 2A 28 0B FE 2E 28 07 06 0B CD 77    .?(..*(...(....w
028B40:  04 18 10 06 08 CD 5E 04 1A FE 2E 20 06 13 06 03    ......^.... ....
028B50:  CD 5E 04 21 68 00 06 18 36 00 23 10 FB C9 1A 0C    .^.!h...6.#.....
028B60:  0D 28 08 FE 3F 28 09 FE 2A 28 0B CD 82 04 28 0B    .(..?(..*(....(.
028B70:  77 23 13 10 E9 C9 13 3E 3F 18 02 3E 20 77 23 10    w#.....>?..> w#.
028B80:  FC C9 CD A6 04 FE 20 38 0D E5 C5 21 98 04 01 0E    ...... 8...!....
028B90:  00 ED B1 C1 E1 C9 BF C9 20 2E 2C 3B 3A 3D 3F 2A    ........ .,;:=?*
028BA0:  5B 5D 3C 3E 7B 7D FE 61 D8 FE 7B D0 D6 20 C9 7C    []<>{}.a..{.. .|
028BB0:  CD B4 04 7D F5 1F 1F 1F 1F CD BD 04 F1 E6 0F C6    ...}............
028BC0:  90 27 CE 40 27 C3 C9 03 AF 37 CB 7C C0 7C B7 7D    .'.@'....7.|.|.}
028BD0:  C8 3E FF C9 32 D8 00 C5 CD AF 1E C1 2A 06 00 B7    .>..2.......*...
028BE0:  ED 42 DA A8 20 EB D1 F9 01 00 FC 09 22 C6 00 AF    .B.. ......."...
028BF0:  6F 67 22 CE 00 32 DC 00 3E C3 32 D9 00 21 DE 20    og"..2..>.2..!. 
028C00:  22 DA 00 EB 22 CC 00 E9 E5 2A C6 00 B7 ED 42 22    "..."....*....B"
028C10:  C6 00 ED 5B C4 00 B7 ED 52 19 EB E1 DA 75 1D ED    ...[....R....u..
028C20:  B0 C9 2A C6 00 ED B0 22 C6 00 D9 C9 5E 23 56 23    ..*...."....^#V#
028C30:  D5 5E 23 56 23 4E 23 46 E1 C9 DD E1 EB 1A 4F 06    .^#V#N#F......O.
028C40:  00 2F 6F 26 FF 39 F9 EB 03 ED B0 DD E9 D1 1A 4F    ./o&.9.........O
028C50:  06 00 2F 6F 26 FF 39 F9 EB 03 ED B0 E9 DD E1 EB    ../o&.9.........
028C60:  21 E0 FF 39 F9 EB C5 04 05 28 05 AF 12 13 10 FC    !..9.....(......
028C70:  ED B0 C1 3E 20 90 91 28 06 47 AF 12 13 10 FC DD    ...> ..(.G......
028C80:  E9 DD E1 21 E0 FF 39 F9 06 20 AF 77 23 10 FC DD    ...!..9.. .w#...
028C90:  E9 DD E1 45 CD BA 05 B6 77 DD E9 DD E1 D1 7D 93    ...E....w.....}.
028CA0:  38 F7 3C 4F 43 CD BA 05 5F 41 AF B3 CB 23 30 06    8.<OC..._A...#0.
028CB0:  B6 77 23 AF 1E 01 10 F3 18 DD 78 E6 F8 0F 0F 0F    .w#.......x.....
028CC0:  C6 02 6F 26 00 39 78 E6 07 3C 47 AF 37 17 10 FD    ..o&.9x..<G.7...
028CD0:  C9 E5 D9 EB E3 73 23 72 23 D1 73 23 72 23 71 23    .....s#r#.s#r#q#
028CE0:  70 C9 DD E1 78 EB 21 00 00 44 39 4E E5 09 23 E3    p...x.!..D9N..#.
028CF0:  B9 38 01 79 12 13 23 B7 28 03 4F ED B0 E1 F9 DD    .8.y..#.(.O.....
028D00:  E9 DD E1 78 21 00 00 44 39 4E E5 09 23 5E 23 56    ...x!..D9N..#^#V
028D10:  18 DC DD E1 EB 68 26 00 44 39 ED B0 21 20 00 39    .....h&.D9..! .9
028D20:  F9 DD E9 DD E1 21 20 00 39 5E 23 56 68 26 00 44    .....! .9^#Vh&.D
028D30:  39 ED B0 21 22 00 18 E7 DD E1 EB 78 2F 6F 26 FF    9..!"......x/o&.
028D40:  39 F9 70 23 48 06 00 EB ED B0 DD E9 B7 ED 52 19    9.p#H.........R.
028D50:  D8 3E 90 C3 27 20 B7 ED 52 B7 ED 42 30 03 09 19    .>..' ..R..B0...
028D60:  C9 3E 91 C3 27 20 B7 ED 52 EB 13 EA 71 06 F0 18    .>..' ..R...q...
028D70:  01 F8 11 00 00 C9 D5 EB B7 ED 52 EB E1 18 EB B7    ..........R.....
028D80:  ED 52 21 01 00 C8 2B C9 CD DF 0B 18 F5 CD B0 09    .R!...+.........
028D90:  18 F0 B7 ED 52 21 01 00 C0 2B C9 CD DF 0B 18 F5    ....R!...+......
028DA0:  CD B0 09 18 F0 CD 72 07 21 01 00 D0 2B C9 CD DF    ......r.!...+...
028DB0:  0B 18 F5 CD B0 09 18 F0 CD 72 07 21 01 00 C8 D8    .........r.!....
028DC0:  2B C9 CD DF 0B 18 F4 CD B0 09 18 EF CD 72 07 21    +............r.!
028DD0:  00 00 C8 D8 23 C9 CD DF 0B 18 F4 CD B0 09 18 EF    ....#...........
028DE0:  CD 72 07 21 01 00 D8 2B C9 CD DF 0B 18 F5 CD B0    .r.!...+........
028DF0:  09 18 F0 54 5D 4B 42 EB 21 00 00 7A B7 3E 10 20    ...T]KB.!..z.>. 
028E00:  03 53 3E 08 29 EB 29 EB 30 01 09 3D 20 F6 C9 7C    .S>.).).0..= ..|
028E10:  B5 CA 03 0A 7C AA F5 CD 80 07 EB CD 80 07 EB 44    ....|..........D
028E20:  4D AF 67 6F 3E 11 ED 6A ED 42 30 02 09 37 3F CB    M.go>..j.B0..7?.
028E30:  13 CB 12 3D 20 F0 EB F1 F0 18 48 E5 CD 92 07 CB    ...= .....H.....
028E40:  3C CB 1D D1 EB CD 0F 07 EB CB 7A C8 18 35 CD 61    <.........z..5.a
028E50:  07 C8 29 10 FD C9 CD 61 07 C8 CB 3C CB 1D 10 FA    ..)....a...<....
028E60:  C9 EB 7A B7 20 08 7B FE 10 30 03 47 B7 C9 AF 67    ..z. .{..0.G...g
028E70:  6F C9 EB 7C AA 7C FA 7E 07 BA C0 7D BB C9 17 C9    o..|.|.~...}....
028E80:  CB 7C C8 7C 2F 67 7D 2F 6F 23 C9 7D E6 01 6F 26    .|.|/g}/o#.}..o&
028E90:  00 C9 ED 4B CA 00 ED 5B C8 00 C5 D5 78 41 4A 53    ...K...[....xAJS
028EA0:  1E 00 1F CB 18 CB 19 CB 1A CB 1B E1 19 EB E1 ED    ................
028EB0:  4A 44 4D 21 E9 62 19 22 C8 00 EB 21 19 36 ED 4A    JDM!.b."...!.6.J
028EC0:  22 CA 00 44 4D C9 06 00 11 10 27 CD E2 07 11 E8    "..DM.....'.....
028ED0:  03 CD E2 07 11 64 00 CD E2 07 1E 0A CD E2 07 7D    .....d.........}
028EE0:  18 0D AF 3C ED 52 30 FB 19 04 3D 20 02 05 C8 C6    ...<.R0...= ....
028EF0:  30 DD 77 00 DD 23 C9 DD 7E 00 D6 24 4F 21 00 00    0.w..#..~..$O!..
028F00:  20 02 DD 23 DD 7E 00 CD A6 04 D6 30 38 29 FE 0A     ..#.~.....08)..
028F10:  38 0E 0C 0D 20 21 D6 07 FE 0A 38 1B FE 10 30 17    8... !....8...0.
028F20:  54 5D 29 D8 29 D8 0C 0D 20 02 54 5D 19 D8 29 D8    T]).)... .T]..).
028F30:  5F 16 00 19 D8 18 CB 79 B7 C8 7C 87 C9 DD E1 E1    _......y..|.....
028F40:  E5 7D 26 00 23 39 4E 81 38 1C 77 EB 21 00 00 44    .}&.#9N.8.w.!..D
028F50:  ED 42 39 F9 EB E5 03 ED B0 EB E1 2B 1B 4F 03 ED    .B9........+.O..
028F60:  B8 EB 23 F9 DD E9 3E 10 C3 29 20 DD E1 CD C8 04    ..#...>..) .....
028F70:  57 E1 CD DD 09 5F E1 E5 7D 93 38 1A 14 15 28 16    W...._..}.8...(.
028F80:  BA 38 16 4A 06 00 60 39 7B 82 54 5D 3D 6F 60 39    .8.J..`9{.T]=o`9
028F90:  79 ED B8 EB 18 09 AF 18 03 3C 6B 2D 26 00 39 77    y........<k-&.9w
028FA0:  F9 DD E9 DD E1 E1 E5 7D 26 00 23 39 F9 6F 26 00    .......}&.#9.o&.
028FB0:  DD E9 DD E1 21 00 00 54 39 5E 4B 23 E5 19 5E 43    ....!..T9^K#..^C
028FC0:  23 E5 19 E5 FD E1 D1 E1 79 90 38 10 3C 4F C5 D5    #.......y.8.<O..
028FD0:  E5 1A BE 28 0C E1 D1 C1 23 0D 20 F2 21 00 00 18    ...(....#. .!...
028FE0:  0E 23 13 10 EC D1 E1 C1 21 00 00 39 EB ED 52 FD    .#......!..9..R.
028FF0:  F9 DD E9 DD E1 CD C8 04 4F E1 CD DD 09 5F E1 7E    ........O...._.~
029000:  93 38 1B 0C 0D 28 17 91 38 12 F5 7E 91 77 06 00    .8...(..8..~.w..
029010:  50 19 54 5D 09 F1 3C 4F ED B0 18 02 1D 73 DD E9    P.T]..<O.....s..
029020:  DD E1 CD DD 09 4F D1 ED 53 E8 00 21 00 00 39 1A    .....O..S..!..9.
029030:  F5 86 38 03 B8 38 01 78 12 F1 57 5E 91 38 2F 3C    ..8..8.x..W^.8/<
029040:  6F 7A 83 38 04 B8 7D 38 08 78 93 38 26 91 38 23    oz.8..}8.x.8&.8#
029050:  3C B7 28 1F C5 D5 2A E8 00 5F 1D 16 00 42 19 09    <.(...*.._...B..
029060:  D1 D5 E5 50 19 EB E1 4F ED B8 D1 C1 18 05 7A 3C    ...P...O......z<
029070:  28 19 4F 78 91 3C BB 38 01 7B B7 28 0E 2A E8 00    (.Ox.<.8.{.(.*..
029080:  06 00 09 EB 21 01 00 39 4F ED B0 21 00 00 54 39    ....!..9O..!..T9
029090:  5E 13 19 F9 DD E9 DD E1 E1 2D C2 66 08 6C 26 00    ^........-.f.l&.
0290A0:  DD E9 21 02 00 54 39 5E 13 19 7E 36 01 23 77 C9    ..!..T9^..~6.#w.
0290B0:  21 04 00 54 39 5E 4B 23 E5 19 5E 43 23 E5 19 E5    !..T9^K#..^C#...
0290C0:  FD E1 D1 E1 AF B8 28 04 B9 20 08 78 B9 E1 D1 FD    ......(.. .x....
0290D0:  F9 D5 E9 1A BE 20 F6 23 13 05 0D 18 E7 7C B7 20    ..... .#.....|. 
0290E0:  03 7D B7 C0 3E 11 C3 29 20 CD 0D 0A D0 3E 01 C3    .}..>..) ....>..
0290F0:  27 20 CD 81 0A 18 F5 CD AC 0F CD 97 0A 18 ED D9    ' ..............
029100:  7D B7 D9 3E 02 CA 27 20 CD F5 0A 18 DF D9 CB 78    }..>..' .......x
029110:  D9 C2 88 0A D9 7D B7 D9 C8 D9 C5 D5 E5 D9 7D B7    .....}........}.
029120:  20 05 D9 CB B8 18 54 C5 CB F8 AF 08 D9 CB F8 7D     .....T........}
029130:  D9 95 28 13 30 06 ED 44 08 3D 08 D9 CD 7A 0B 2C    ..(.0..D.=...z.,
029140:  3D 20 F9 08 28 01 D9 F1 E6 80 20 0F CD 92 0B 30    = ..(..... ....0
029150:  25 CD 7B 0B B7 2C 20 1E 37 18 20 CD C6 0B 3F F5    %.{.., .7. ...?.
029160:  28 10 38 01 D9 CD AC 0B CB 78 20 09 CD 86 0B 2D    (.8......x ....-
029170:  20 F6 CD 72 0B F1 38 02 CB B8 B7 D9 E1 D1 C1 D9     ..r..8.........
029180:  C9 D9 CB 78 D9 C2 14 0A CD 8F 0A CD 14 0A D8 2C    ...x...........,
029190:  2D C8 78 EE 80 47 C9 D9 7D B7 D9 CA 72 0B 7D B7    -.x..G..}...r.}.
0291A0:  C8 D9 85 D9 CD 4D 0B C5 D5 E5 DD 39 CD 72 0B D9    .....M.....9.r..
0291B0:  2E 05 D9 3E 08 DD 23 DD 6E 00 08 CB 1D 30 03 CD    ...>..#.n....0..
0291C0:  92 0B CD 7B 0B 08 3D 20 F1 D9 2D D9 20 E5 DD 6E    ...{..= ..-. ..n
0291D0:  FB CB 78 20 09 08 CD 87 0B 2C 2D 28 01 2D F1 F1    ..x .....,-(.-..
0291E0:  F1 B7 08 F1 D9 C1 E1 D9 DD E1 CB B8 B0 47 2C 2D    .............G,-
0291F0:  CC 72 0B 08 C9 7D B7 C8 D9 95 D9 3F CD 4D 0B E5    .r...}.....?.M..
029200:  E5 E5 DD 39 D9 2E 05 D9 3E 08 08 CD C6 0B 38 03    ...9....>.....8.
029210:  CD AC 0B 3F CB 15 08 3D 20 0C DD 75 05 DD 2B D9    ...?...= ..u..+.
029220:  2D D9 28 0E 3E 08 CD 86 0B 30 DF 08 CD AC 0B B7    -.(.>....0......
029230:  18 E1 CD 86 0B 38 04 CD C6 0B 3F E1 D1 C1 CB 78    .....8....?....x
029240:  20 05 CD 87 0B 18 9A 2C 20 97 37 18 95 38 06 C6     ......, .7..8..
029250:  80 38 06 18 1B C6 80 38 17 6F DD E3 D9 E5 C5 78    .8.....8.o.....x
029260:  CB F8 D9 A8 E6 80 F5 CB F8 DD E5 DD 21 00 00 C9    ............!...
029270:  E1 D8 AF 6F 47 4F 57 5F 67 C9 B7 CB 18 CB 19 CB    ...oGOW_g.......
029280:  1A CB 1B CB 1C C9 B7 CB 14 CB 13 CB 12 CB 11 CB    ................
029290:  10 C9 7C D9 84 D9 67 7B D9 8B D9 5F 7A D9 8A D9    ..|...g{..._z...
0292A0:  57 79 D9 89 D9 4F 78 D9 88 D9 47 C9 7C D9 94 D9    Wy...Ox...G.|...
0292B0:  67 7B D9 9B D9 5F 7A D9 9A D9 57 79 D9 99 D9 4F    g{..._z...Wy...O
0292C0:  78 D9 98 D9 47 C9 78 D9 B8 D9 C0 79 D9 B9 D9 C0    x...G.x....y....
0292D0:  7A D9 BA D9 C0 7B D9 BB D9 C0 7C D9 BC D9 C9 D9    z....{....|.....
0292E0:  78 D9 A8 F2 E9 0B 78 17 C9 CB 78 28 06 CD F3 0B    x.....x...x(....
0292F0:  C8 3F C9 7D D9 BD D9 C0 B7 C8 C3 C6 0B 7D D6 81    .?.}.........}..
029300:  DA 72 0B 3C FE 28 D0 D9 C5 D5 E5 08 CD 72 0B 08    .r.<.(.......r..
029310:  37 CD 7B 0B 3D 20 F9 D9 7C D9 A4 D9 67 7B D9 A3    7.{.= ..|...g{.£
029320:  D9 5F 7A D9 A2 D9 57 79 D9 A1 D9 4F 78 D9 A0 D9    ._z...Wy...Ox...
029330:  47 C3 7B 0A D9 C5 D5 E5 D9 CD AC 0F D9 CD FD 0B    G.{.............
029340:  D9 CD 81 0A 18 EB 7D B7 C8 CB 78 3E 03 C2 27 20    ......}...x>..' 
029350:  CD AC 0F 7D C6 80 CB 2F C6 80 6F D6 14 F5 D9 C5    ...}.../..o.....
029360:  D5 E5 CD F5 0A CD 0D 0A 2D C5 D5 E5 CD 81 0A 7D    ........-......}
029370:  E1 D1 C1 D9 E1 D1 C1 E3 BC E3 30 E3 F1 D9 C9 D9    ..........0.....
029380:  CD 8E 0F 2D CD 81 0A D9 CD 8E 0F 2C D9 7D FE 6C    ...-.......,.}.l
029390:  D8 C5 CB B8 CD DF 0B C1 38 09 CD F5 0A CD 34 0C    ........8.....4.
0293A0:  CD 97 0A CB 78 28 03 CD 0D 0A D9 2D D9 CD DF 0B    ....x(.....-....
0293B0:  F5 38 03 CD 81 0A D9 2D D9 CD DF 0B 38 05 D9 2C    .8.....-....8..,
0293C0:  CD 81 0A 7D FE 6C 38 3B D9 01 AA 2A 11 AA AA 21    ...}.l8;...*...!
0293D0:  7F AA CD 97 0A DD E5 DD 21 07 0D 3E 05 CD 34 0F    ........!..>..4.
0293E0:  DD E1 CD AC 0F CD 97 0A CD 97 0A C5 D5 E5 D9 CD    ................
0293F0:  AC 0F 2D 2D D9 2D CD 0D 0A D9 E1 D1 C1 D9 CD 81    ..--.-..........
029400:  0A 2C 2C F1 2C 2D C8 D8 78 EE 80 47 C9 67 AA 3F    .,,.,-..x..G.g.?
029410:  2B 32 D7 6E B6 2A 1D EF 38 74 0D D0 00 0D D0 7A    +2.n.*..8t.....z
029420:  88 88 88 88 08 7E AB AA AA AA AA 2C 2D 3E 04 CA    .....~.....,->..
029430:  27 20 CB 78 C2 27 20 D9 CD 98 0F D9 7D 2E 81 95    ' .x.' .....}...
029440:  F5 CD F5 0A D9 CD 86 0F D9 CD 81 0A C5 D5 E5 D9    ................
029450:  2C CD 0D 0A D9 E1 D1 C1 CD F5 0A DD E5 DD 21 8C    ,.............!.
029460:  0D 3E 06 CD 34 0F DD E1 2C D9 CD A2 0F 2D D9 CD    .>..4...,....-..
029470:  0D 0A F1 C5 D5 E5 6F 26 00 30 01 25 CD 08 10 D9    ......o&.0.%....
029480:  2C CD 97 0A D9 E1 D1 C1 CD 0D 0A 7D FE 67 DA 72    ,..........}.g.r
029490:  0B C9 7D 8A 9D D8 89 1D 7D E9 A2 8B 2E 3A 7D 8E    ..}.....}....:}.
0294A0:  E3 38 8E 63 7E 49 92 24 49 12 7E CD CC CC CC 4C    .8.c~I.$I.~....L
0294B0:  7F AB AA AA AA 2A D9 CD A2 0F D9 B7 CB 78 F5 CB    .....*.......x..
0294C0:  B8 CD F5 0A 7D FE 88 30 47 C5 D5 E5 2C CD D0 0F    ....}..0G...,...
0294D0:  E5 CB 3C CB 1D 7D E1 F5 CD 08 10 2C 2D 28 01 2D    ..<..}.....,-(.-
0294E0:  D9 F1 E1 D1 C1 F5 CD 81 0A DD E5 DD 21 10 0E 3E    ............!..>
0294F0:  08 CD 49 0F DD E1 F1 30 0A F5 D9 CD 98 0F D9 CD    ..I....0........
029500:  97 0A F1 85 6F 38 09 F1 C8 D9 CD 86 0F C3 F5 0A    ....o8..........
029510:  E1 3E 01 C3 27 20 6D 2E 1D 11 60 31 70 46 2C FE    .>..' m...`1pF,.
029520:  E5 7F 74 36 7C 89 84 21 77 53 3C FF C3 2E 7A D2    ..t6|..!wS<...z.
029530:  7D 5B 95 1D 7C 25 B8 46 58 63 7E 16 FC EF FD 75    }[..|%.FXc~....u
029540:  80 D2 F7 17 72 31 7D B7 C8 DD E5 D9 CD 86 0F D9    ....r1}.........
029550:  AF CB 78 28 03 3C CB B8 F5 CD DF 0B 38 08 D9 CD    ..x(.<......8...
029560:  F5 0A F1 CB FF F5 D9 01 CF 06 11 8E E9 21 7E 4A    .............!~J
029570:  D9 CD DF 0B 30 05 CD 2E 0F 18 4F DD 21 CE 0E 3E    ....0.....O.!..>
029580:  02 08 D9 11 12 00 DD 19 CD 73 0F D9 CD DF 0B 38    .........s.....8
029590:  0B 08 3D 20 EC D9 11 0C 00 DD 19 D9 D9 CD 6E 0F    ..= ..........n.
0295A0:  CB F8 CD 0D 0A C5 D5 E5 CD 73 0F CD 97 0A D9 CD    .........s......
0295B0:  86 0F CD 0D 0A D9 E1 D1 C1 CD F5 0A DD E5 CD 2E    ................
0295C0:  0F DD E1 D9 CD 6E 0F CD 0D 0A F1 17 30 0A F5 D9    .....n......0...
0295D0:  CD 8E 0F 2D CD 81 0A F1 DD E1 CB 4F C8 CB F8 C9    ...-.......O....
0295E0:  7F E7 CF CC 13 54 7F F6 F4 A2 30 09 7F 6A C1 91    .....T....0..j..
0295F0:  0A 06 80 B5 9E 8A 6F 44 80 82 2C 3A CD 13 80 6A    ......oD..,:...j
029600:  C1 91 0A 06 81 00 00 00 00 00 80 21 A2 DA 0F 49    ...........!...I
029610:  7D E8 A2 8B 2E BA 7D 8E E3 38 8E 63 7E 49 92 24    }.....}..8.c~I.$
029620:  49 92 7E CD CC CC CC 4C 7F AB AA AA AA AA DD 21    I.~....L.......!
029630:  0A 0F 3E 05 C5 D5 E5 F5 CD AC 0F CD 97 0A F1 CD    ..>.............
029640:  49 0F D9 E1 D1 C1 C3 97 0A F5 D9 CD 6E 0F 18 10    I...........n...
029650:  F5 D9 C5 D5 E5 CD 6E 0F CD 0D 0A D9 E1 D1 C1 D9    ......n.........
029660:  CD 97 0A F1 3D 20 E9 D9 CD 86 0F C3 0D 0A 11 06    ....= ..........
029670:  00 DD 19 DD 6E 00 DD 66 01 DD 5E 02 DD 56 03 DD    ....n..f..^..V..
029680:  4E 04 DD 46 05 C9 21 81 00 44 4C 54 5C C9 01 0F    N..F..!..DLT\...
029690:  49 11 A2 DA 21 82 21 C9 01 04 35 11 33 F3 21 81    I...!.!...5.3.!.
0296A0:  FA C9 01 72 31 11 F7 17 21 80 D2 C9 C5 D5 E5 D9    ...r1...!.......
0296B0:  E1 D1 C1 C9 CD 92 07 21 80 00 3E 20 CB 78 20 0D    .......!..> .x .
0296C0:  CB 23 CB 12 CB 11 CB 10 2D 3D 20 F0 6F CB B8 C9    .#......-= .o...
0296D0:  CB 78 D9 CD 86 0F 28 02 CB F8 2D CD 0D 0A B7 CB    .x....(...-.....
0296E0:  7D 28 1C CB 78 08 CB F8 3E 8F BD 38 16 28 06 CD    }(..x...>..8.(..
0296F0:  7A 0B 2C 18 F3 CD 7A 0B 08 60 69 C8 C3 83 07 21    z.,...z..`i....!
029700:  00 00 C9 3E 92 C3 27 20 7C B5 CA 72 0B CB 7C 08    ...>..' |..r..|.
029710:  CD 80 07 3E 90 29 3D CB 7C 28 FA 44 4D 11 00 00    ...>.)=.|(.DM...
029720:  62 6F 08 C0 CB B8 C9 CD C8 04 EB 1E 00 38 04 FE    bo...........8..
029730:  19 38 18 1D CD C8 04 D9 CB 78 D9 16 07 28 01 14    .8.......x...(..
029740:  92 30 01 AF FE 09 38 02 3E 09 3C 57 D5 D9 FD 21    .0....8.>.<W...!
029750:  5D 00 DD E5 CD EB 10 DD E1 D1 4F 7A 3C CB 7B 20    ].........Oz<.{ 
029760:  10 81 F2 6B 10 FD 36 00 00 18 0B FE 0C 38 02 3E    ...k..6......8.>
029770:  0B D5 CD 80 11 D1 CB 78 28 05 3E 2D CD E5 10 CB    .......x(.>-....
029780:  7B 28 03 61 0E 00 CB 79 28 05 CD E3 10 18 07 CD    {(.a...y(.......
029790:  D9 10 0D F2 8F 10 7A B7 28 17 3E 2E CD E5 10 0C    ......z.(.>.....
0297A0:  28 06 CD E3 10 15 20 F7 15 FA B1 10 CD D9 10 18    (..... .........
0297B0:  F7 CB 7B C8 3E 45 CD E5 10 3E 2B CB 7C 28 06 7C    ..{.>E...>+.|(.|
0297C0:  ED 44 67 3E 2D CD E5 10 7C 06 2F 04 D6 0A 30 FB    .Dg>-...|./...0.
0297D0:  C6 3A DD 70 00 DD 23 18 0C FD 7E 00 FD 23 B7 20    .:.p..#...~..#. 
0297E0:  04 FD 2B 3E 30 DD 77 00 DD 23 C9 FD E5 2C 2D 20    ..+>0.w..#...,- 
0297F0:  0E 06 0C FD 36 00 30 FD 23 10 F8 AF C3 7D 11 C5    ....6.0.#....}..
029800:  CB B8 7D D9 D6 80 6F 9F 67 11 4D 00 CD F5 06 11    ..}...o.g.M.....
029810:  05 00 19 7C FE D9 20 01 3C FD 77 00 ED 44 CD 40    ...|.. .<.w..D.@
029820:  12 7D FE 81 30 06 CD B3 12 FD 35 00 CB F8 3E 84    .}..0.....5...>.
029830:  95 2E 00 28 08 CD 7A 0B CB 1D 3D 20 F8 FD 7E 00    ...(..z...= ..~.
029840:  F5 3E 0C 08 78 1F 1F 1F 1F E6 0F C6 30 FD 77 00    .>..x.......0.w.
029850:  FD 23 78 E6 0F 47 C5 D5 E5 CB 25 CD 87 0B CB 25    .#x..G....%....%
029860:  CD 87 0B EB E3 19 D1 E3 ED 5A EB E1 E3 ED 4A 44    .........Z....JD
029870:  4D E1 CB 25 CD 87 0B 08 3D 20 C8 F1 C1 FD E1 C9    M..%....= ......
029880:  FD E5 E1 5F 16 00 19 7E 36 00 FE 35 D8 1D FA 9C    ..._...~6..5....
029890:  11 2B 7E 3C 77 FE 3A D8 36 00 18 F1 36 31 23 36    .+~<w.:.6...61#6
0298A0:  00 0C C9 D9 01 00 00 D9 CD 72 0B DD 7E 00 CD A6    .........r..~...
0298B0:  04 FE 2E 20 0C D9 CB 70 37 C0 CB F0 D9 DD 23 18    ... ...p7.....#.
0298C0:  EA FE 45 28 21 CD 39 12 30 54 08 CD B3 12 D8 08    ..E(!.9.0T......
0298D0:  D9 C5 6F 26 00 CD 08 10 CD E9 09 D9 C1 D8 CB 70    ..o&...........p
0298E0:  28 01 0D D9 18 D7 CD 1E 12 D8 D9 CB E0 DD 23 DD    (.............#.
0298F0:  7E 00 FE 2B 28 06 FE 2D 20 04 CB E8 DD 23 CD 36    ~..+(..- ....#.6
029900:  12 3F D8 4F DD 23 CD 36 12 30 0A DD 23 57 79 87    .?.O.#.6.0..#Wy.
029910:  87 81 87 82 4F CB 68 28 04 79 ED 44 4F D9 D9 79    ....O.h(.y.DO..y
029920:  C6 80 FE 5A D8 FE A6 3F D8 C5 DD E5 79 CD 40 12    ...Z...?....y.@.
029930:  DD E1 D9 C1 D9 C9 DD 7E 00 D6 30 3F D0 FE 0A C9    .......~..0?....
029940:  F5 B7 F2 47 12 ED 44 F5 CB 3F CB 3F 3C 21 FA FF    ...G..D..?.?<!..
029950:  11 06 00 19 3D 20 FC EB DD 21 77 12 DD 19 CD 73    ....= ...!w....s
029960:  0F F1 E6 03 28 08 F5 CD B3 12 F1 3D 20 F8 F1 B7    ....(......= ...
029970:  F2 97 0A D9 C3 F5 0A 81 00 00 00 00 00 8E 00 00    ................
029980:  00 40 1C 9B 00 00 20 BC 3E A8 00 10 A5 D4 68 B6    .@.... .>.....h.
029990:  04 BF C9 1B 0E C3 AC C5 EB 78 2D D0 CD CE 1B C2    .........x-.....
0299A0:  53 DE F9 78 39 3F 01 EB 2B A8 AD C5 1D F8 C9 7B    S..x9?..+......{
0299B0:  CE 97 40 7D B7 C8 CB F8 C5 D5 7C CD 7A 0B CD 7A    ..@}......|.z..z
0299C0:  0B 84 67 E3 ED 5A EB E1 E3 ED 4A 44 4D E1 30 06    ..g..Z....JDM.0.
0299D0:  CD 7B 0B 2C 37 C8 7D C6 03 6F CB B8 C9 0E 01 18    .{.,7.}..o......
0299E0:  02 0E 00 CD 3F 13 1A BE 20 08 23 13 10 F8 79 EE    ....?... .#...y.
0299F0:  01 4F 21 40 00 39 F9 69 26 00 DD E9 0E 01 18 02    .O!@.9.i&.......
029A00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
029A10:  23 00 00 00 02 09 4E E5 23 00 41 02 00 00 00 02    #.....N.#.A.....
029A20:  23 00 42 02 00 00 00 02 23 00 43 02 00 00 00 02    #.B.....#.C.....
029A30:  23 00 44 02 00 00 00 02 23 00 45 02 00 00 00 02    #.D.....#.E.....
029A40:  23 00 46 02 00 00 00 02 23 00 47 02 00 00 00 02    #.F.....#.G.....
029A50:  23 00 48 02 00 00 00 02 23 00 49 02 00 00 00 02    #.H.....#.I.....
029A60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029A70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029A80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029A90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029AA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029AB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029AC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029AD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029AE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029AF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029B00:  0E 00 CD 3F 13 0D 20 01 EB 0E 00 1A B6 BE 20 E2    ...?.. ....... .
029B10:  23 13 10 F7 0E 01 18 DA CD 3F 13 1A B6 77 23 13    #........?...w#.
029B20:  10 F9 EB F9 DD E9 CD 3F 13 1A 2F A6 77 23 13 10    .......?../.w#..
029B30:  F8 18 EF CD 3F 13 1A A6 77 23 13 10 F9 18 E3 FD    ....?...w#......
029B40:  E1 DD E1 21 00 00 39 EB 21 20 00 45 39 FD E9 DD    ...!..9.! .E9...
029B50:  E1 21 21 00 39 7E B7 28 03 AF 18 06 2B 46 CD BA    .!!.9~.(....+F..
029B60:  05 A6 21 22 00 39 F9 21 00 00 28 01 23 DD E9 3E    ..!".9.!..(.#..>
029B70:  AF 32 E8 00 FD E1 2A D2 00 06 10 CD E2 05 AF 12    .2....*.........
029B80:  E1 22 E2 00 FD E5 7C B7 20 06 3E 22 32 D0 00 C9    ."....|. .>"2...
029B90:  3A E8 00 B7 28 0A CD B6 13 20 05 2A E2 00 77 C9    :...(.... .*..w.
029BA0:  CD F2 03 2A E2 00 36 00 11 0C 00 19 EB 21 5C 00    ...*..6......!\.
029BB0:  01 24 00 ED B0 C9 06 06 21 E6 13 C5 E5 06 03 ED    .$......!.......
029BC0:  5B D2 00 13 1A FE 20 28 FA 1A CD A6 04 96 28 0A    [..... (......(.
029BD0:  E1 C1 11 04 00 19 10 E3 B7 C9 23 13 10 EB C1 C1    ..........#.....
029BE0:  1A FE 3A C0 7E C9 43 4F 4E C1 54 52 4D C1 4B 42    ..:.~.CON.TRM.KB
029BF0:  44 82 4C 53 54 43 41 55 58 C4 55 53 52 C5 3E AF    D.LSTCAUX.USR.>.
029C00:  32 E8 00 CD 69 14 3A D0 00 B7 C0 2A E2 00 CB AE    2...i.:....*....
029C10:  7E E6 0F C0 CD 30 14 3A D0 00 B7 C0 2A E2 00 3A    ~....0.:....*..:
029C20:  E8 00 B7 01 80 80 28 03 01 40 00 71 23 23 70 C9    ......(..@.q##p.
029C30:  CD 5A 14 2A E2 00 11 0C 00 19 EB 3A E8 00 B7 01    .Z.*.......:....
029C40:  0F 01 28 0A D5 0E 13 CD 05 00 D1 01 16 F1 C5 CD    ..(.............
029C50:  05 00 C1 3C C0 78 32 D0 00 C9 2A E2 00 11 18 00    ...<.x2...*.....
029C60:  19 06 18 36 00 23 10 FB C9 22 E2 00 7E E6 0F C0    ...6.#..."..~...
029C70:  CB 76 28 0A 3E 1A CD C6 16 CD 0C 17 18 03 CB 7E    .v(.>..........~
029C80:  C8 2A E2 00 E5 11 0C 00 19 EB 0E 10 CD 05 00 E1    .*..............
029C90:  3C 20 05 3E FF 32 D0 00 36 00 C9 E3 22 E4 00 E3    < .>.2..6..."...
029CA0:  E5 21 C2 00 22 E2 00 E1 C9 E3 22 E4 00 E3 22 E2    .!.."....."...".
029CB0:  00 CB 7E C0 3E 02 32 D0 00 C9 E3 22 E4 00 E3 22    ..~.>.2...."..."
029CC0:  E2 00 CB 76 C0 3E 03 32 D0 00 C9 3E AF E3 22 E4    ...v.>.2...>..".
029CD0:  00 E3 E5 21 C2 00 22 E2 00 CB AE F5 CD E8 14 F1    ...!..".........
029CE0:  B7 28 03 CD E1 01 E1 C9 06 00 21 D1 00 7E FE 7F    .(........!..~..
029CF0:  38 02 3E 7E 4F 36 7E 2A D2 00 22 D4 00 16 00 CD    8.>~O6~*..".....
029D00:  E1 03 77 1E 01 FE 08 28 36 FE 7F 28 32 1D FE 18    ..w....(6..(2...
029D10:  28 2D FE 1B 28 29 FE 1A 28 36 FE 0D 28 38 FE 20    (-..()..(6..(8. 
029D20:  30 11 FE 03 20 D9 3A DD 00 B7 28 D3 DD 2A E4 00    0... .:...(..*..
029D30:  C3 16 20 79 BA 28 C8 7E 14 23 CD C9 03 18 C0 15    .. y.(.~.#......
029D40:  FA FD 14 2B CD 00 02 08 20 08 00 1D 28 B1 18 EF    ...+.... ...(...
029D50:  04 05 28 AB 18 04 04 05 20 04 36 1A 18 08 CD E1    ..(..... .6.....
029D60:  01 36 0D 23 36 0A 23 22 D6 00 C9 2A E2 00 3A D0    .6.#6.#"...*..:.
029D70:  00 B7 20 79 7E CB 6F 20 70 E6 0F 20 2E 23 23 7E    .. y~.o p.. .##~
029D80:  B7 F2 97 15 0E 14 E5 CD BA 19 E1 28 08 E5 11 2E    ...........(....
029D90:  00 19 36 1A E1 AF 77 34 C6 2E 5F 16 00 19 7E FE    ..6...w4.._...~.
029DA0:  1A 20 3D 2A E2 00 23 23 35 18 35 3D 20 1B 2A D4    . =*..##5.5= .*.
029DB0:  00 ED 5B D6 00 B7 ED 52 38 05 06 FF CD EA 14 2A    ..[....R8......*
029DC0:  D4 00 7E 23 22 D4 00 18 17 3D 20 06 CD A3 00 7D    ..~#"....= ..£.}
029DD0:  18 0E 3D 3D 20 06 CD AF 00 7D 18 04 CD B5 00 7D    ..== ....}.....}
029DE0:  2A E2 00 CB EE 23 77 2B C9 23 7E 2B C9 3E 1A C9    *....#w+.#~+.>..
029DF0:  E5 2A E2 00 7E E6 0F FE 06 28 27 CD 6B 15 FE 21    .*..~....('.k..!
029E00:  30 08 FE 1A 28 04 CB AE 18 F1 11 5D 00 06 1E C5    0...(......]....
029E10:  D5 CD 6B 15 D1 C1 FE 21 38 06 CB AE 12 13 10 EF    ..k....!8.......
029E20:  AF 12 E1 C9 DD 21 5D 00 DD 7E 00 B7 C8 06 00 FE    .....!]..~......
029E30:  2D C0 04 DD 23 C9 38 05 DD 7E 00 B7 C8 3E 10 32    -...#.8..~...>.2
029E40:  D0 00 37 C9 E5 CD 6B 15 CB AE E1 77 C9 3E AF 4F    ..7...k....w.>.O
029E50:  C5 CD F0 15 C1 CD 24 16 C8 C5 E5 CD F7 07 D1 C1    ......$.........
029E60:  CD 36 16 D8 05 CC 83 07 EB 73 0C 0D 20 02 23 72    .6.......s.. .#r
029E70:  EB C9 CD F0 15 CD 24 16 C8 C5 E5 CD A3 11 D9 E1    ......$.....£...
029E80:  C1 CD 36 16 D8 05 D9 CC 8F 0A D9 C3 D1 05 E5 EB    ..6.............
029E90:  0E 00 C5 D5 CD 6B 15 D1 C1 FE 0D 28 0B FE 1A 28    .....k.....(...(
029EA0:  07 CB AE 0C 13 12 10 EA E1 71 C9 CD 6B 15 FE 1A    .........q..k...
029EB0:  28 13 CB AE FE 0A 28 0D FE 0D 20 EF CD 6B 15 FE    (.....(... ..k..
029EC0:  0A 20 02 CB AE C9 2A E2 00 4F 3A D0 00 B7 C0 7E    . ....*..O:....~
029ED0:  E6 0F 20 10 23 23 E5 7E C6 2E 5F 16 00 19 71 E1    .. .##.~.._...q.
029EE0:  34 F0 18 28 FE 06 28 15 E1 06 00 C5 E5 3D CA A6    4..(..(......=..
029EF0:  00 3D 3D CA A9 00 3D CA AC 00 C3 B2 00 2A E8 00    .==...=......*..
029F00:  3A EA 00 BE C8 34 5E 16 00 19 71 C9 2A E2 00 23    :....4^...q.*..#
029F10:  23 7E B7 C8 36 00 0E 15 CD BA 19 C8 3E F0 32 D0    #~..6.......>.2.
029F20:  00 C9 7D C3 C6 16 C1 D1 C5 DD 2A D2 00 CB 7C 28    ..}.......*...|(
029F30:  06 CD 83 07 EB 18 0E EB CB 7C 28 09 CD 83 07 DD    .........|(.....
029F40:  36 00 2D DD 23 D5 CD C6 07 E1 CD C8 04 ED 5B D2    6.-.#.........[.
029F50:  00 DD E5 E1 B7 ED 52 4D EB 91 38 0E 28 0C 47 E5    ......RM..8.(.G.
029F60:  3E 20 C5 CD C6 16 C1 10 F7 E1 41 04 05 C8 7E C5    > ........A...~.
029F70:  E5 CD C6 16 E1 C1 23 18 F3 C1 D1 D9 E1 D1 C1 D9    ......#.........
029F80:  C5 DD 2A D2 00 D5 CD 27 10 18 BE C1 D1 C5 CD C8    ..*....'........
029F90:  04 CB 43 21 A1 17 0E 04 20 BF 21 A5 17 0E 05 18    ..C!.... .!.....
029FA0:  B8 54 52 55 45 46 41 4C 53 45 CD C8 04 21 02 00    .TRUEFALSE...!..
029FB0:  39 4E 23 CD 59 17 D1 F9 D5 C9 E1 7E 23 B7 28 0C    9N#.Y......~#.(.
029FC0:  47 7E C5 E5 CD C6 16 E1 C1 23 10 F5 E9 3E 0D CD    G~.......#...>..
029FD0:  C6 16 3E 0A C3 C6 16 11 0D 01 18 0D 11 0D 00 18    ..>.............
029FE0:  08 11 1A 01 18 03 11 1A 00 22 E2 00 CB 7E 28 1C    ........."...~(.
029FF0:  D5 CD 6B 15 D1 BB 28 10 FE 1A 28 0C FE 21 30 0C    ..k...(...(..!0.
02A000:  14 15 28 08 CB AE 18 E8 21 01 00 C9 21 00 00 C9    ..(.....!...!...
02A010:  3E AF 32 E8 00 ED 53 E6 00 CD 7A 18 3A D0 00 B7    >.2...S...z.:...
02A020:  C0 CD 30 14 3A D0 00 B7 C0 2A E2 00 36 D0 23 23    ..0.:....*..6.##
02A030:  77 11 06 00 19 77 23 77 11 24 00 19 77 23 77 11    w....w#w.$..w#w.
02A040:  D6 FF 19 3A E8 00 B7 20 1B E5 01 04 00 AF CD 09    ...:... ........
02A050:  19 E1 23 23 4E 23 46 2A E6 00 B7 ED 42 C8 3E 90    ..##N#F*....B.>.
02A060:  32 D0 00 C9 E5 AF 77 23 77 23 ED 5B E6 00 73 23    2.....w#w#.[..s#
02A070:  72 E1 01 04 00 3E 03 C3 09 19 22 E2 00 7E E6 C0    r....>...."..~..
02A080:  C8 CD AE 19 2A E2 00 11 2D 00 19 AF 77 23 77 11    ....*...-...w#w.
02A090:  D4 FF 19 77 23 23 01 04 00 3E 01 CD 09 19 CD AE    ...w##...>......
02A0A0:  19 C3 81 14 E3 22 E4 00 E3 22 E2 00 7E E6 C0 C0    ....."..."..~...
02A0B0:  3E 04 32 D0 00 C9 3A D0 00 B7 C0 E5 CD 5A 1A EB    >.2...:......Z..
02A0C0:  B7 ED 52 E1 30 10 AF CD 09 19 2A E2 00 11 08 00    ..R.0.....*.....
02A0D0:  19 34 C0 23 34 C9 3E 99 32 D0 00 C9 3A D0 00 B7    .4.#4.>.2...:...
02A0E0:  C0 E5 CD 5A 1A B7 ED 52 3E 01 20 10 2A E2 00 11    ...Z...R>. .*...
02A0F0:  04 00 19 34 20 04 23 34 28 08 3E 03 E1 CD 09 19    ...4 .#4(.>.....
02A100:  18 C8 E1 3E F2 32 D0 00 C9 32 E9 00 EB 2A E2 00    ...>.2...2...*..
02A110:  CB 66 28 2F CB A6 3A E9 00 CB 47 28 18 23 23 7E    .f(/..:...G(.##~
02A120:  2B 2B B7 20 10 3A E9 00 CB 4F 20 17 78 B7 20 13    ++. .:...O .x. .
02A130:  79 B7 FA 43 19 C5 D5 0E 21 CD BA 19 D1 C1 20 51    y..C....!..... Q
02A140:  2A E2 00 3A E9 00 CB 47 28 02 CB EE 23 23 7E C6    *..:...G(...##~.
02A150:  2E D5 5F 16 00 19 D1 D6 2E CD 9A 19 ED A0 E2 66    .._............f
02A160:  19 3C F2 5C 19 3D 3C CD 9A 19 2A E2 00 23 23 E6    .<.\.=<...*..##.
02A170:  7F 77 20 16 C5 D5 E5 CD AE 19 E1 D1 C1 20 15 D5    .w .......... ..
02A180:  11 2B 00 19 D1 34 20 02 23 34 78 B1 C2 0D 19 EB    .+...4 .#4x.....
02A190:  C9 3E 99 01 3E F0 32 D0 00 C9 F5 3A E9 00 CB 47    .>..>.2....:...G
02A1A0:  28 01 EB F1 C9 22 E2 00 CD AE 19 C8 18 E6 0E 22    (...."........."
02A1B0:  2A E2 00 CB E6 CB 6E C8 CB AE 2A E2 00 E5 C5 11    *.....n...*.....
02A1C0:  30 00 19 EB 0E 1A CD 05 00 C1 E1 11 0C 00 19 EB    0...............
02A1D0:  CD 05 00 B7 C9 C1 D1 ED 53 E2 00 C5 E5 CD 5A 1A    ........S.....Z.
02A1E0:  D1 B7 ED 52 38 40 2A E2 00 01 06 00 09 4E 23 46    ...R8@*......N#F
02A1F0:  23 73 23 72 CD 2C 1A 01 04 00 09 30 01 13 7D E6    #s#r.,.....0..}.
02A200:  7F 29 EB ED 6A EB 53 5C 2A E2 00 23 23 77 01 2B    .)..j.S\*..##w.+
02A210:  00 09 4E 23 46 EB B7 ED 42 09 C8 D5 E5 CD AE 19    ..N#F...B.......
02A220:  D1 E1 72 2B 73 C9 3E 91 32 D0 00 C9 D5 D9 E1 D9    ..r+s.>.2.......
02A230:  21 00 00 54 5D 3E 10 29 EB ED 6A EB D9 29 D9 30    !..T]>.)..j..).0
02A240:  04 09 30 01 13 3D 20 EF C9 CD 5D 1A B7 ED 52 21    ..0..= ...]...R!
02A250:  00 00 C0 23 C9 CD 5D 1A EB C9 2A E2 00 11 04 00    ...#..]...*.....
02A260:  19 5E 23 56 23 D5 4E 23 46 23 5E 23 56 E1 C9 3E    .^#V#.N#F#^#V..>
02A270:  AF 32 E8 00 CD B0 1A 3A D0 00 B7 C0 CD 30 14 3A    .2.....:.....0.:
02A280:  D0 00 B7 C0 2A E2 00 36 C0 E5 11 0C 00 19 EB 0E    ....*..6........
02A290:  23 CD 05 00 E1 11 2D 00 19 AF 4E 77 23 46 77 11    #.....-...Nw#Fw.
02A2A0:  D6 FF 19 71 23 70 23 36 80 23 77 23 77 23 77 C9    ...q#p#6.#w#w#w.
02A2B0:  22 E2 00 7E E6 C0 C8 C3 81 14 3E 22 18 02 3E 21    "..~......>"..>!
02A2C0:  44 4D 21 F0 00 22 E6 00 DD E1 D1 E1 DD E5 C5 CD    DM!.."..........
02A2D0:  FD 1A C1 3A D0 00 B7 C0 2A F0 00 ED 42 C8 3A E9    ...:....*...B.:.
02A2E0:  00 FE 21 3E 99 28 02 3E F0 32 D0 00 C9 3E 22 18    ..!>.(.>.2...>".
02A2F0:  02 3E 21 22 E6 00 DD E1 C1 D1 E1 DD E5 32 E9 00    .>!".........2..
02A300:  22 E2 00 7E E6 C0 CA B0 18 2A E6 00 AF 77 23 77    "..~.....*...w#w
02A310:  78 B1 28 39 C5 D5 0E 1A CD 05 00 2A E2 00 11 0C    x.(9.......*....
02A320:  00 19 EB 3A E9 00 4F CD 05 00 D1 C1 B7 20 1E D5    ...:..O...... ..
02A330:  2A E2 00 11 2D 00 19 34 20 02 23 34 D1 21 80 00    *...-..4 .#4.!..
02A340:  19 EB 2A E6 00 34 20 02 23 34 0B 18 C3 2A E2 00    ..*..4 .#4...*..
02A350:  11 2D 00 19 4E 23 46 11 DA FF 19 71 23 70 11 FC    .-..N#F....q#p..
02A360:  FF 19 56 2B 5E EB B7 ED 42 D0 EB 71 23 70 C9 C1    ..V+^...B..q#p..
02A370:  D1 ED 53 E2 00 C5 E5 CD 5A 1A D1 B7 ED 52 DA 26    ..S.....Z....R.&
02A380:  1A 2A E2 00 01 08 00 09 73 23 72 01 24 00 09 73    .*......s#r.$..s
02A390:  23 72 C9 CD 4C 1C C0 11 0C 00 19 EB 0E 13 CD 05    #r..L...........
02A3A0:  00 3C C0 18 3F FD E1 2A D2 00 06 10 CD E2 05 AF    .<..?..*........
02A3B0:  12 E1 FD E5 CD 4C 1C C0 E5 CD F2 03 E1 E5 11 1C    .....L..........
02A3C0:  00 19 EB 21 5C 00 01 0C 00 ED B0 E1 11 0C 00 19    ...!\...........
02A3D0:  E5 EB 0E 17 CD 05 00 D1 3C 28 09 21 5C 00 01 24    ........<(.!\..$
02A3E0:  00 ED B0 C9 3E 01 32 D0 00 C9 3E AF 32 E8 00 CD    ....>.2...>.2...
02A3F0:  4C 1C C0 3A D8 00 B7 3E 21 28 EB 2A E2 00 11 0C    L..:...>!(.*....
02A400:  00 19 11 5C 00 01 24 00 ED B0 11 5C 00 0E 0F CD    ...\..$....\....
02A410:  05 00 3C 28 CF 21 33 1C 11 B0 00 01 19 00 ED B0    ..<(.!3.........
02A420:  11 00 01 3A E8 00 B7 20 04 ED 5B 01 01 31 00 01    ...:... ..[..1..
02A430:  C3 B0 00 D5 0E 1A CD 05 00 11 5C 00 0E 14 CD 05    ..........\.....
02A440:  00 D1 21 80 00 19 EB B7 28 E9 18 37 22 E2 00 7E    ..!.....(..7"..~
02A450:  E6 0F C8 3E 20 32 D0 00 C9 22 E6 00 ED 53 E8 00    ...> 2..."...S..
02A460:  EB E1 22 E2 00 4E 73 23 46 72 EB B7 ED 42 28 5A    .."..Ns#Fr...B(Z
02A470:  EB 23 11 5C 00 3A DC 00 12 13 01 0B 00 ED B0 06    .#.\.:..........
02A480:  18 AF 12 13 10 FC E5 11 5C 00 0E 0F CD 05 00 D1    ........\.......
02A490:  3C 28 3F 2A E6 00 22 7D 00 ED 4B E8 00 C5 D5 0E    <(?*.."}..K.....
02A4A0:  1A CD 05 00 11 5C 00 0E 21 CD 05 00 D1 C1 B7 20    .....\..!...... 
02A4B0:  21 2A 7D 00 23 22 7D 00 21 80 00 19 EB 0B 78 B1    !*}.#"}.!.....x.
02A4C0:  20 DB 11 5C 00 0E 10 CD 05 00 2A E2 00 11 0D 00     ..\......*.....
02A4D0:  19 E9 DD 2A E2 00 3E F0 C3 29 20 CD C8 04 FE 11    ...*..>..) .....
02A4E0:  D0 32 DC 00 C9 22 F0 00 EB E1 E3 22 F2 00 13 13    .2..."....."....
02A4F0:  13 7B E6 FC 5F 21 DE 00 22 F8 00 DD 2A DE 00 DD    .{.._!.."...*...
02A500:  6E 02 DD 66 03 7D B4 28 48 ED 52 30 0F DD 6E 00    n..f.}.(H.R0..n.
02A510:  DD 66 01 E5 DD 22 F8 00 DD E1 18 E3 20 0A DD 5E    .f..."...... ..^
02A520:  00 DD 56 01 DD E5 18 1B 4D 44 DD 6E 00 DD 66 01    ..V.....MD.n..f.
02A530:  DD E5 DD 19 DD 75 00 DD 74 01 DD 71 02 DD 70 03    .....u..t..q..p.
02A540:  DD E5 D1 2A F8 00 73 23 72 D1 2A F2 00 73 23 72    ...*..s#r.*..s#r
02A550:  C9 DD E5 E1 19 22 C4 00 2A F0 00 01 04 00 09 DD    ....."..*.......
02A560:  E5 C1 09 DA 75 1D ED 4B C6 00 ED 42 01 00 00 21    ....u..K...B...!
02A570:  00 00 DA 30 1D 3E FF C3 27 20 EB E1 E3 7E 23 66    ...0.>..' ...~#f
02A580:  6F 13 13 13 7B E6 FC 5F EB 22 F0 00 2A DE 00 E5    o...{.._."..*...
02A590:  DD E1 B7 ED 52 30 52 DD 6E 00 DD 66 01 E5 B7 ED    ....R0R.n..f....
02A5A0:  52 30 04 DD E1 18 F0 E1 D5 FD E1 ED 4B F0 00 FD    R0..........K...
02A5B0:  71 02 FD 70 03 FD 75 00 FD 74 01 DD 73 00 DD 72    q..p..u..t..s..r
02A5C0:  01 DD E5 E1 DD 4E 02 DD 46 03 CD 04 1E 28 09 DD    .....N..F....(..
02A5D0:  5E 00 DD 56 01 D5 DD E1 DD E5 E1 DD 4E 02 DD 46    ^..V........N..F
02A5E0:  03 DD 5E 00 DD 56 01 18 1B 2A DE 00 ED 53 DE 00    ..^..V...*...S..
02A5F0:  D5 DD E1 DD 75 00 DD 74 01 ED 4B F0 00 DD 71 02    ....u..t..K...q.
02A600:  DD 70 03 EB 09 B7 ED 52 C0 D5 FD E1 2A C4 00 B7    .p.....R....*...
02A610:  ED 52 28 1B FD 7E 00 DD 77 00 FD 7E 01 DD 77 01    .R(..~..w..~..w.
02A620:  FD 6E 02 FD 66 03 09 DD 75 02 DD 74 03 AF C9 DD    .n..f...u..t....
02A630:  E5 E1 22 C4 00 06 04 36 00 23 10 FB C9 CD 4B 1E    .."....6.#....K.
02A640:  2A F4 00 C9 CD 4B 1E 2A F6 00 C9 21 00 00 22 F4    *....K.*...!..".
02A650:  00 22 F6 00 DD 2A DE 00 DD 4E 02 DD 46 03 79 B0    ."...*...N..F.y.
02A660:  28 1E 2A F4 00 09 22 F4 00 2A F6 00 B7 ED 42 30    (.*..."..*....B0
02A670:  04 ED 43 F6 00 DD 6E 00 DD 66 01 E5 DD E1 18 D8    ..C...n..f......
02A680:  2A C6 00 01 FB FF 09 ED 5B C4 00 B7 ED 52 D8 EB    *.......[....R..
02A690:  2A F4 00 19 22 F4 00 2A F6 00 B7 ED 52 D0 ED 53    *..."..*....R..S
02A6A0:  F6 00 C9 ED 5B C4 00 73 23 72 C9 5E 23 56 EB 22    ....[..s#r.^#V."
02A6B0:  C4 00 22 DE 00 06 04 36 00 23 10 FB C9 3E AF 4F    .."....6.#...>.O
02A6C0:  22 E8 00 AF 77 32 D0 00 78 32 EA 00 2A E2 00 22    "...w2..x2..*.."
02A6D0:  ED 00 21 46 1F 22 E2 00 E1 22 E4 00 E1 0C 0D 20    ..!F."..."..... 
02A6E0:  05 CD 26 17 18 03 CD 79 17 2A ED 00 22 E2 00 2A    ..&....y.*.."..*
02A6F0:  E4 00 E9 3E AF 32 EC 00 22 E8 00 2A E2 00 22 ED    ...>.2.."..*..".
02A700:  00 21 46 1F 22 E2 00 E1 22 E4 00 E1 22 EA 00 21    .!F."..."..."..!
02A710:  5C 00 06 1E CD E2 05 AF 12 2A EA 00 3A EC 00 B7    \........*..:...
02A720:  20 05 CD 4E 16 18 03 CD 72 16 21 D0 00 7E 36 00     ..N....r.!..~6.
02A730:  B7 67 6F 28 08 DD E5 E1 11 5C 00 ED 52 EB 2A E8    .go(.....\..R.*.
02A740:  00 73 23 72 18 A3 C6 00 ED 5F 32 CB 00 C9 EB DD    .s#r.£..._2.....
02A750:  E1 C1 E1 78 B1 28 0B 73 0B 78 B1 28 05 54 5D 13    ...x.(.s.x.(.T].
02A760:  ED B0 DD E9 44 4D DD E1 D1 E1 78 B1 28 F4 ED 52    ....DM....x.(..R
02A770:  19 30 ED 0B 09 EB 09 EB 03 ED B8 DD E9 55 14 15    .0...........U..
02A780:  28 03 CD 9D 1F DD E1 4F 06 00 2F 6F 26 FF 39 F9    (......O../o&.9.
02A790:  71 23 EB 0C 0D 28 02 ED B0 DD E9 16 00 21 80 00    q#...(.......!..
02A7A0:  3E 1F 46 B8 30 02 06 1F 23 0E 00 04 05 28 0D 7E    >.F.0...#....(.~
02A7B0:  FE 20 28 04 FE 09 20 04 23 05 18 EF 5D 04 05 28    . (... .#...]..(
02A7C0:  0D 7E FE 20 28 08 FE 09 28 04 23 05 18 EF 7D 93    .~. (...(.#...}.
02A7D0:  28 04 0C 15 20 D5 69 26 00 54 C9 D1 C1 D5 2D 61    (... .i&.T....-a
02A7E0:  25 C3 A2 02 7D CD A6 04 6F C9 2A 01 00 19 19 19    %...}...o.*.....
02A7F0:  E9 21 D0 00 7E 36 00 6F 26 00 C9 CD 16 03 7C B5    .!..~6.o&.....|.
02A800:  C8 3A DD 00 F5 AF 32 DD 00 CD 20 03 F1 32 DD 00    .:....2... ..2..
02A810:  7D FE 03 C0 DD E1 11 01 00 18 11 3A D0 00 B7 C8    }..........:....
02A820:  DD E1 5F 16 01 18 05 DD E1 5F 16 02 D5 CD 7A 03    .._......_....z.
02A830:  D1 AF 32 DD 00 2A CE 00 7C B5 DD E5 E1 ED 4B CC    ..2..*..|.....K.
02A840:  00 ED 42 01 15 00 09 22 CE 00 B7 20 07 D5 D5 E5    ..B...."... ....
02A850:  CD D9 00 D1 7A B7 20 14 CD 00 02 5E 43 0D 0A 55    ....z. ....^C..U
02A860:  73 65 72 20 62 72 65 61 6B 00 18 2B 3D 20 0B CD    ser break..+= ..
02A870:  00 02 0D 0A 49 2F 4F 00 18 0E CD 00 02 0D 0A 52    ....I/O........R
02A880:  75 6E 2D 74 69 6D 65 00 CD 00 02 20 65 72 72 6F    un-time.... erro
02A890:  72 20 00 7B CD B4 04 CD 00 02 2C 20 50 43 3D 00    r .{......, PC=.
02A8A0:  2A CE 00 CD AF 04 18 15 CD 00 02 4E 6F 74 20 65    *..........Not e
02A8B0:  6E 6F 75 67 68 20 6D 65 6D 6F 72 79 00 CD 00 02    nough memory....
02A8C0:  0D 0A 50 72 6F 67 72 61 6D 20 61 62 6F 72 74 65    ..Program aborte
02A8D0:  64 0D 0A 00 3A D8 00 B7 CA 8E 27 C3 00 00 E1 D1    d...:.....'.....
02A8E0:  D1 E9 31 00 01 21 C2 F2 01 C2 F2 CD 64 03 21 64    ..1..!......d.!d
02A8F0:  03 11 64 03 01 42 F3 3E 01 CD D4 04 C3 BA F2 CD    ..d..B.>........
02A900:  3E 02 CD 9B 14 CD CD 17 CD 1B 20 CD 9B 14 CD BA    >......... .....
02A910:  17 0E 20 20 20 20 20 20 4D 20 45 20 4E 20 55 20    ..      M E N U 
02A920:  CD CD 17 CD 1B 20 CD 9B 14 CD CD 17 CD 1B 20 CD    ..... ........ .
02A930:  9B 14 CD BA 17 1B 20 20 3C 31 3E 20 45 6E 74 72    ......  <1> Entr
02A940:  65 65 20 64 65 20 6C 61 20 66 6F 6E 63 74 69 6F    ee de la fonctio
02A950:  6E CD CD 17 CD 1B 20 CD 9B 14 CD CD 17 CD 1B 20    n..... ........ 
02A960:  CD 9B 14 CD BA 17 1D 20 20 3C 32 3E 20 44 65 76    .......  <2> Dev
02A970:  65 6C 6F 70 70 65 72 20 64 65 73 20 70 72 6F 64    elopper des prod
02A980:  75 69 74 73 CD CD 17 CD 1B 20 CD 9B 14 CD CD 17    uits..... ......
02A990:  CD 1B 20 CD 9B 14 CD BA 17 28 20 20 3C 33 3E 20    .. ......(  <3> 
02A9A0:  44 65 76 65 6C 6F 70 70 65 72 20 64 65 73 20 70    Developper des p
02A9B0:  75 69 73 73 61 6E 63 65 73 20 65 6E 74 69 65 72    uissances entier
02A9C0:  65 73 CD CD 17 CD 1B 20 CD 9B 14 CD CD 17 CD 1B    es..... ........
02A9D0:  20 CD 9B 14 CD BA 17 1F 20 20 3C 34 3E 20 43 61     .......  <4> Ca
02A9E0:  6C 63 75 6C 20 64 65 20 76 61 6C 65 75 72 73 20    lcul de valeurs 
02A9F0:  64 65 20 66 28 78 29 CD CD 17 CD 1B 20 CD 9B 14    de f(x)..... ...
02AA00:  CD CD 17 CD 1B 20 CD 9B 14 CD BA 17 1D 20 20 3C    ..... .......  <
02AA10:  35 3E 20 44 65 72 69 76 65 65 73 20 64 65 20 6C    5> Derivees de l
02AA20:  61 20 66 6F 6E 63 74 69 6F 6E CD CD 17 CD 1B 20    a fonction..... 
02AA30:  CD 9B 14 CD CD 17 CD 1B 20 CD 9B 14 CD BA 17 1C    ........ .......
02AA40:  20 20 3C 36 3E 20 44 65 76 65 6C 6F 70 70 65 6D      <6> Developpem
02AA50:  65 6E 74 73 20 6C 69 6D 69 74 65 73 CD CD 17 CD    ents limites....
02AA60:  1B 20 CD 9B 14 CD CD 17 CD 1B 20 CD 9B 14 CD BA    . ........ .....
02AA70:  17 16 20 20 3C 37 3E 20 46 69 6E 20 64 75 20 70    ..  <7> Fin du p
02AA80:  65 28 27 4E 2E 20 64 65 20 6C 61 20 66 6F 6E 63    e('N. de la fonc
02AA90:  74 69 6F 6E 20 28 31 20 61 20 39 29 3F 27 29 3B    tion (1 a 9)?');
02AAA0:  0D 0A 69 3A 3D 6E 75 6D 66 6F 6E 63 3B 0D 0A 69    ..i:=numfonc;..i
02AAB0:  66 20 66 5B 69 5D 3D 6E 69 6C 20 74 68 65 6E 20    f f[i]=nil then 
02AAC0:  6C 69 72 66 6F 6E 63 74 69 6F 6E 28 66 5B 69 5D    lirfonction(f[i]
02AAD0:  29 3B 0D 0A 77 72 69 74 65 28 27 44 65 76 65 6C    );..write('Devel
02AAE0:  6F 70 70 65 6D 65 6E 74 20 61 75 20 76 6F 69 73    oppement au vois
02AAF0:  69 6E 61 67 65 20 64 65 20 61 3D 27 29 3B 72 65    inage de a=');re
02AB00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AB10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AB20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AB30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AB40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AB50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AB60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AB70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AB80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AB90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ABA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ABB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ABC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ABD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ABE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ABF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AC00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AC10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AC20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AC30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AC40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AC50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AC60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AC70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AC80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AC90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ACA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ACB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ACC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ACD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ACE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ACF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AD00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
02AD10:  24 00 00 00 02 09 4E E5 24 00 41 02 00 00 00 02    $.....N.$.A.....
02AD20:  24 00 42 02 00 00 00 02 24 00 43 02 00 00 00 02    $.B.....$.C.....
02AD30:  24 00 44 02 00 00 00 02 24 00 45 02 00 00 00 02    $.D.....$.E.....
02AD40:  24 00 46 02 00 00 00 02 24 00 47 02 00 00 00 02    $.F.....$.G.....
02AD50:  24 00 48 02 00 00 00 02 24 00 49 02 00 00 00 02    $.H.....$.I.....
02AD60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02AD70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02AD80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02AD90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02ADA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02ADB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02ADC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02ADD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02ADE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02ADF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02AE00:  0D 0A 66 75 6E 63 74 69 6F 6E 20 20 20 6D 65 6E    ..function   men
02AE10:  75 3A 69 6E 74 65 67 65 72 3B 0D 0A 0D 0A 62 65    u:integer;....be
02AE20:  67 69 6E 0D 0A 63 6C 72 73 63 72 3B 0D 0A 77 72    gin..clrscr;..wr
02AE30:  69 74 65 6C 6E 3B 77 72 69 74 65 6C 6E 28 27 20    iteln;writeln(' 
02AE40:  4D 20 45 20 4E 20 55 20 27 29 3B 0D 0A 77 72 69    M E N U ');..wri
02AE50:  74 65 6C 6E 3B 77 72 69 74 65 6C 6E 28 27 3C 31    teln;writeln('<1
02AE60:  3E 20 45 6E 74 72 65 65 20 64 65 20 6C 61 20 66    > Entree de la f
02AE70:  6F 6E 63 74 69 6F 6E 27 29 3B 0D 0A 77 72 69 74    onction');..writ
02AE80:  65 6C 6E 3B 77 72 69 74 65 6C 6E 28 27 3C 32 3E    eln;writeln('<2>
02AE90:  20 43 61 6C 63 75 6C 20 64 65 20 76 61 6C 65 75     Calcul de valeu
02AEA0:  72 73 20 64 65 20 66 28 78 29 27 29 3B 0D 0A 77    rs de f(x)');..w
02AEB0:  72 69 74 65 6C 6E 3B 77 72 69 74 65 6C 6E 28 27    riteln;writeln('
02AEC0:  3C 33 3E 20 47 72 61 70 68 65 73 20 64 65 20 66    <3> Graphes de f
02AED0:  6F 6E 63 74 69 6F 6E 73 27 29 3B 0D 0A 77 72 69    onctions');..wri
02AEE0:  74 65 6C 6E 3B 77 72 69 74 65 6C 6E 28 27 3C 34    teln;writeln('<4
02AEF0:  3E 20 46 69 6E 20 64 75 20 70 72 6F 67 72 61 6D    > Fin du program
02AF00:  6D 65 27 29 3B 0D 0A 77 72 69 74 65 6C 6E 3B 77    me');..writeln;w
02AF10:  72 69 74 65 6C 6E 28 27 20 56 4F 54 52 45 20 43    riteln(' VOTRE C
02AF20:  48 4F 49 58 3F 20 27 29 3B 0D 0A 72 65 61 64 6C    HOIX? ');..readl
02AF30:  6E 28 63 68 6F 69 78 29 3B 6D 65 6E 75 3A 3D 63    n(choix);menu:=c
02AF40:  68 6F 69 78 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 66    hoix;..end;....f
02AF50:  75 6E 63 74 69 6F 6E 20 6E 75 6D 66 6F 6E 63 3A    unction numfonc:
02AF60:  69 6E 74 65 67 65 72 3B 0D 0A 76 61 72 20 6A 3A    integer;..var j:
02AF70:  69 6E 74 65 67 65 72 3B 0D 0A 0D 0A 62 65 67 69    integer;....begi
02AF80:  6E 0D 0A 63 61 72 3A 3D 27 20 27 3B 0D 0A 72 65    n..car:=' ';..re
02AF90:  70 65 61 74 0D 0A 72 65 61 64 28 6B 62 64 2C 63    peat..read(kbd,c
02AFA0:  61 72 29 3B 0D 0A 75 6E 74 69 6C 20 28 28 63 61    ar);..until ((ca
02AFB0:  72 3E 27 30 27 29 20 61 6E 64 20 28 63 61 72 3C    r>'0') and (car<
02AFC0:  27 3A 27 29 29 3B 0D 0A 77 72 69 74 65 6C 6E 3B    ':'));..writeln;
02AFD0:  0D 0A 76 61 6C 28 63 61 72 2C 6A 2C 72 65 73 75    ..val(car,j,resu
02AFE0:  6C 74 29 3B 0D 0A 6E 75 6D 66 6F 6E 63 3A 3D 6A    lt);..numfonc:=j
02AFF0:  3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65    ;..end;....proce
02B000:  64 75 72 65 20 20 67 72 61 70 68 65 28 72 65 76    dure  graphe(rev
02B010:  6F 69 72 3A 69 6E 74 65 67 65 72 29 3B 0D 0A 66    oir:integer);..f
02B020:  6F 72 77 61 72 64 3B 0D 0A 0D 0A 70 72 6F 63 65    orward;....proce
02B030:  64 75 72 65 20 62 6F 75 63 6C 65 3B 0D 0A 76 61    dure boucle;..va
02B040:  72 20 7A 3A 69 6E 74 65 67 65 72 3B 0D 0A 62 65    r z:integer;..be
02B050:  67 69 6E 0D 0A 72 65 70 65 61 74 0D 0A 63 68 6F    gin..repeat..cho
02B060:  69 78 3A 3D 6D 65 6E 75 3B 0D 0A 63 61 73 65 20    ix:=menu;..case 
02B070:  63 68 6F 69 78 20 6F 66 0D 0A 20 31 3A 20 20 20    choix of.. 1:   
02B080:  20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 77     begin..       w
02B090:  72 69 74 65 28 27 4E 6F 20 64 65 20 6C 61 20 66    rite('No de la f
02B0A0:  6F 6E 63 74 69 6F 6E 20 28 31 20 61 20 39 29 3F    onction (1 a 9)?
02B0B0:  27 29 3B 0D 0A 20 20 20 20 20 20 20 69 3A 3D 6E    ');..       i:=n
02B0C0:  75 6D 66 6F 6E 63 3B 0D 0A 20 20 20 20 20 20 20    umfonc;..       
02B0D0:  63 6C 72 73 63 72 3B 63 61 72 3A 3D 27 20 27 3B    clrscr;car:=' ';
02B0E0:  0D 0A 20 20 20 20 20 20 20 6C 69 72 66 6F 6E 63    ..       lirfonc
02B0F0:  74 69 6F 6E 28 66 5B 69 5D 29 3B 0D 0A 20 20 20    tion(f[i]);..   
02B100:  20 20 20 20 73 69 6D 70 6C 69 66 28 66 5B 69 5D        simplif(f[i]
02B110:  29 3B 0D 0A 20 20 20 20 20 20 20 74 65 6D 70 6F    );..       tempo
02B120:  3B 0D 0A 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A    ;..       end;..
02B130:  20 32 3A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20     2:    begin..  
02B140:  20 20 20 20 20 63 6C 72 73 63 72 3B 77 72 69 74         clrscr;writ
02B150:  65 28 27 4E 6F 20 64 65 20 6C 61 20 66 6F 6E 63    e('No de la fonc
02B160:  74 69 6F 6E 20 28 31 20 61 20 39 29 3F 27 29 3B    tion (1 a 9)?');
02B170:  0D 0A 20 20 20 20 20 20 20 69 3A 3D 6E 75 6D 66    ..       i:=numf
02B180:  6F 6E 63 3B 0D 0A 20 20 20 20 20 20 20 69 66 20    onc;..       if 
02B190:  6D 5B 69 5D 3E 30 20 74 68 65 6E 0D 0A 20 20 20    m[i]>0 then..   
02B1A0:  20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20        begin..     
02B1B0:  20 20 66 6F 72 20 7A 3A 3D 31 20 74 6F 20 6D 5B      for z:=1 to m[
02B1C0:  69 5D 20 64 6F 0D 0A 20 20 20 20 20 20 20 62 65    i] do..       be
02B1D0:  67 69 6E 0D 0A 20 20 20 20 20 20 20 77 72 69 74    gin..       writ
02B1E0:  65 28 27 56 61 6C 65 75 72 20 64 75 20 70 61 72    e('Valeur du par
02B1F0:  61 6D 65 74 72 65 20 6E 2E 27 29 3B 77 72 69 74    ametre n.');writ
02B200:  65 28 7A 29 3B 77 72 69 74 65 28 27 20 3D 27 29    e(z);write(' =')
02B210:  3B 72 65 61 64 6C 6E 28 70 5B 7A 2C 69 5D 29 3B    ;readln(p[z,i]);
02B220:  0D 0A 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20    ..       end;.. 
02B230:  20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20          end;..    
02B240:  20 20 20 63 61 6C 63 75 6C 66 6F 6E 63 74 69 6F       calculfonctio
02B250:  6E 28 66 5B 69 5D 29 3B 0D 0A 20 20 20 20 20 20    n(f[i]);..      
02B260:  20 65 6E 64 3B 0D 0A 20 33 3A 20 20 20 20 67 72     end;.. 3:    gr
02B270:  61 70 68 65 28 30 29 3B 0D 0A 0D 0A 65 6E 64 3B    aphe(0);....end;
02B280:  0D 0A 75 6E 74 69 6C 20 63 68 6F 69 78 3D 34 3B    ..until choix=4;
02B290:  0D 0A 65 6E 64 3B 0D 0A 0D 0D 1A 1A 1A 1A 1A 1A    ..end;..........
02B2A0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02B2B0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02B2C0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02B2D0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02B2E0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02B2F0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02B300:  61 6D 69 6C 6C 65 20 64 65 20 63 6F 75 72 62 65    amille de courbe
02B310:  73 2E 0D 0A 0D 0A 20 50 6F 75 72 20 65 6E 74 72    s..... Pour entr
02B320:  65 72 20 6C 65 73 20 70 61 72 61 6D 65 74 72 65    er les parametre
02B330:  73 3A 20 70 28 69 29 2C 20 69 20 65 74 61 6E 74    s: p(i), i etant
02B340:  20 6C 65 20 6E 75 6D 65 72 6F 20 64 75 20 70 61     le numero du pa
02B350:  72 61 6D 65 74 72 65 2C 0D 0A 20 20 69 20 64 65    rametre,..  i de
02B360:  76 61 6E 74 20 65 74 72 65 20 63 6F 6D 70 72 69    vant etre compri
02B370:  73 20 65 6E 74 72 65 20 31 20 65 74 20 33 2E 0D    s entre 1 et 3..
02B380:  0A 0D 0A 0D 0A 0D 0A 20 20 53 49 20 56 4F 55 53    .......  SI VOUS
02B390:  20 4E 27 45 4E 54 52 45 5A 20 50 41 53 20 43 4F     N'ENTREZ PAS CO
02B3A0:  52 52 45 43 54 45 4D 45 4E 54 20 56 4F 54 52 45    RRECTEMENT VOTRE
02B3B0:  20 46 4F 4E 43 54 49 4F 4E 20 56 4F 55 53 20 41     FONCTION VOUS A
02B3C0:  55 52 45 5A 0D 0A 20 20 55 4E 20 4D 45 53 53 41    UREZ..  UN MESSA
02B3D0:  47 45 20 44 27 45 52 52 45 55 52 20 45 54 20 55    GE D'ERREUR ET U
02B3E0:  4E 20 4E 55 4D 45 52 4F 3A 0D 0A 0D 0A 20 20 65    N NUMERO:....  e
02B3F0:  72 72 65 75 72 20 6E 2E 31 3A 20 70 20 6E 27 65    rreur n.1: p n'e
02B400:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B410:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B420:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B430:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B440:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B450:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B460:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B470:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B480:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B490:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B4A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B4B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B4C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B4D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B4E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B4F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B500:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B510:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B520:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B530:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B540:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B550:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B560:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B570:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B580:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B590:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B5A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B5B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B5C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B5D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B5E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B5F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02B600:  0D 0A 70 72 6F 63 65 64 75 72 65 20 20 67 72 61    ..procedure  gra
02B610:  70 68 65 3B 0D 0A 0D 0A 76 61 72 0D 0A 78 6F 2C    phe;....var..xo,
02B620:  79 6F 2C 78 78 64 2C 78 78 61 2C 75 78 2C 75 79    yo,xxd,xxa,ux,uy
02B630:  2C 70 61 73 3A 72 65 61 6C 3B 0D 0A 78 70 2C 79    ,pas:real;..xp,y
02B640:  70 2C 6E 62 66 6F 6E 63 2C 7A 2C 62 6B 2C 69 6E    p,nbfonc,z,bk,in
02B650:  64 65 78 2C 63 68 6F 69 78 62 69 73 3A 69 6E 74    dex,choixbis:int
02B660:  65 67 65 72 3B 0D 0A 70 72 65 63 65 64 65 3A 62    eger;..precede:b
02B670:  6F 6F 6C 65 61 6E 3B 0D 0A 66 78 2C 66 79 3A 61    oolean;..fx,fy:a
02B680:  72 72 61 79 5B 31 2E 2E 31 30 5D 20 6F 66 20 69    rray[1..10] of i
02B690:  6E 74 65 67 65 72 3B 0D 0A 6C 64 61 3A 61 72 72    nteger;..lda:arr
02B6A0:  61 79 5B 31 2E 2E 32 30 5D 20 6F 66 20 72 65 61    ay[1..20] of rea
02B6B0:  6C 3B 0D 0A 62 65 67 69 6E 0D 0A 20 63 6C 72 73    l;..begin.. clrs
02B6C0:  63 72 3B 0D 0A 20 20 69 66 20 72 65 76 6F 69 72    cr;..  if revoir
02B6D0:  3D 30 20 74 68 65 6E 0D 0A 20 20 62 65 67 69 6E    =0 then..  begin
02B6E0:  0D 0A 20 20 20 77 72 69 74 65 6C 6E 28 27 31 2D    ..   writeln('1-
02B6F0:  43 6F 75 72 62 65 20 79 3D 66 28 78 29 27 29 3B    Courbe y=f(x)');
02B700:  77 72 69 74 65 6C 6E 3B 0D 0A 20 20 20 77 72 69    writeln;..   wri
02B710:  74 65 6C 6E 28 27 32 2D 43 6F 75 72 62 65 20 78    teln('2-Courbe x
02B720:  3D 66 28 74 29 3B 79 3D 66 28 74 29 27 29 3B 77    =f(t);y=f(t)');w
02B730:  72 69 74 65 6C 6E 3B 0D 0A 20 20 20 77 72 69 74    riteln;..   writ
02B740:  65 6C 6E 28 27 33 2D 43 6F 75 72 62 65 20 70 6F    eln('3-Courbe po
02B750:  6C 61 69 72 65 20 72 3D 66 28 74 29 27 29 3B 77    laire r=f(t)');w
02B760:  72 69 74 65 6C 6E 3B 0D 0A 20 20 20 77 72 69 74    riteln;..   writ
02B770:  65 28 27 56 6F 74 72 65 20 63 68 6F 69 78 3F 20    e('Votre choix? 
02B780:  27 29 3B 0D 0A 20 20 20 72 65 70 65 61 74 0D 0A    ');..   repeat..
02B790:  20 20 20 72 65 61 64 28 6B 62 64 2C 63 61 72 29       read(kbd,car)
02B7A0:  3B 0D 0A 20 20 20 75 6E 74 69 6C 20 28 28 63 61    ;..   until ((ca
02B7B0:  72 3E 27 30 27 29 20 61 6E 64 20 28 63 61 72 3C    r>'0') and (car<
02B7C0:  27 34 27 29 29 3B 0D 0A 20 20 20 77 72 69 74 65    '4'));..   write
02B7D0:  6C 6E 3B 0D 0A 20 20 20 76 61 6C 28 63 61 72 2C    ln;..   val(car,
02B7E0:  63 68 6F 69 78 2C 72 65 73 75 6C 74 29 3B 0D 0A    choix,result);..
02B7F0:  20 20 20 77 72 69 74 65 6C 6E 3B 0D 0A 20 20 65       writeln;..  e
02B800:  6E 64 3B 0D 0A 20 20 77 72 69 74 65 6C 6E 3B 0D    nd;..  writeln;.
02B810:  0A 20 20 77 72 69 74 65 28 27 41 62 73 63 69 73    .  write('Abscis
02B820:  73 65 20 6F 72 69 67 69 6E 65 20 27 29 3B 72 65    se origine ');re
02B830:  61 64 6C 6E 28 78 6F 29 3B 0D 0A 20 20 77 72 69    adln(xo);..  wri
02B840:  74 65 28 27 4F 72 64 6F 6E 6E 65 65 20 6F 72 69    te('Ordonnee ori
02B850:  67 69 6E 65 20 27 29 3B 72 65 61 64 6C 6E 28 79    gine ');readln(y
02B860:  6F 29 3B 0D 0A 20 20 77 72 69 74 65 28 27 42 6F    o);..  write('Bo
02B870:  72 6E 65 20 69 6E 66 65 72 69 65 75 72 65 20 69    rne inferieure i
02B880:  6E 74 20 64 27 27 65 74 75 64 65 20 27 29 3B 72    nt d''etude ');r
02B890:  65 61 64 6C 6E 28 78 78 64 29 3B 0D 0A 20 20 77    eadln(xxd);..  w
02B8A0:  72 69 74 65 28 27 42 6F 72 6E 65 20 73 75 70 65    rite('Borne supe
02B8B0:  72 69 65 75 72 65 20 69 6E 74 20 64 27 27 65 74    rieure int d''et
02B8C0:  75 64 65 20 27 29 3B 72 65 61 64 6C 6E 28 78 78    ude ');readln(xx
02B8D0:  61 29 3B 0D 0A 20 20 77 72 69 74 65 28 27 55 6E    a);..  write('Un
02B8E0:  69 74 65 20 61 62 73 63 69 73 73 65 20 27 29 3B    ite abscisse ');
02B8F0:  72 65 61 64 6C 6E 28 75 78 29 3B 0D 0A 20 20 77    readln(ux);..  w
02B900:  72 69 74 65 28 27 55 6E 69 74 65 20 6F 72 64 6F    rite('Unite ordo
02B910:  6E 6E 65 65 20 27 29 3B 72 65 61 64 6C 6E 28 75    nnee ');readln(u
02B920:  79 29 3B 0D 0A 20 20 77 72 69 74 65 28 27 50 61    y);..  write('Pa
02B930:  73 20 64 27 27 65 74 75 64 65 20 27 29 3B 72 65    s d''etude ');re
02B940:  61 64 6C 6E 28 70 61 73 29 3B 0D 0A 0D 0A 69 66    adln(pas);....if
02B950:  20 72 65 76 6F 69 72 3D 30 20 74 68 65 6E 0D 0A     revoir=0 then..
02B960:  20 62 65 67 69 6E 0D 0A 20 20 77 72 69 74 65 28     begin..  write(
02B970:  27 4E 6F 6D 62 72 65 20 64 65 20 67 72 61 70 68    'Nombre de graph
02B980:  65 73 20 73 75 72 20 6C 65 20 6D 65 6D 65 20 65    es sur le meme e
02B990:  63 72 61 6E 20 28 31 20 61 20 39 29 3F 27 29 3B    cran (1 a 9)?');
02B9A0:  0D 0A 20 20 6E 62 66 6F 6E 63 3A 3D 6E 75 6D 66    ..  nbfonc:=numf
02B9B0:  6F 6E 63 3B 0D 0A 20 20 69 6E 64 65 78 3A 3D 30    onc;..  index:=0
02B9C0:  3B 0D 0A 20 20 66 6F 72 20 7A 3A 3D 31 20 74 6F    ;..  for z:=1 to
02B9D0:  20 6E 62 66 6F 6E 63 20 64 6F 0D 0A 20 20 62 65     nbfonc do..  be
02B9E0:  67 69 6E 0D 0A 20 20 20 63 61 73 65 20 63 68 6F    gin..   case cho
02B9F0:  69 78 20 6F 66 0D 0A 20 20 20 20 31 3A 20 62 65    ix of..    1: be
02BA00:  67 69 6E 0D 0A 20 20 20 20 20 20 77 72 69 74 65    gin..      write
02BA10:  28 27 4E 6F 20 64 65 20 6C 61 20 66 6F 6E 63 74    ('No de la fonct
02BA20:  69 6F 6E 20 79 3D 66 28 78 29 20 6E 2E 27 2C 7A    ion y=f(x) n.',z
02BA30:  2C 27 20 3D 27 29 3B 66 78 5B 7A 5D 3A 3D 6E 75    ,' =');fx[z]:=nu
02BA40:  6D 66 6F 6E 63 3B 0D 0A 20 20 20 20 20 20 69 66    mfonc;..      if
02BA50:  20 66 5B 66 78 5B 7A 5D 5D 3D 6E 69 6C 20 74 68     f[fx[z]]=nil th
02BA60:  65 6E 20 6C 69 72 66 6F 6E 63 74 69 6F 6E 28 66    en lirfonction(f
02BA70:  5B 66 78 5B 7A 5D 5D 29 3B 0D 0A 20 20 20 20 20    [fx[z]]);..     
02BA80:  20 69 66 20 6D 5B 66 78 5B 7A 5D 5D 3E 30 20 74     if m[fx[z]]>0 t
02BA90:  68 65 6E 0D 0A 20 20 20 20 20 20 62 65 67 69 6E    hen..      begin
02BAA0:  20 66 6F 72 20 62 6B 3A 3D 31 20 74 6F 20 6D 5B     for bk:=1 to m[
02BAB0:  66 78 5B 7A 5D 5D 20 64 6F 0D 0A 20 20 20 20 20    fx[z]] do..     
02BAC0:  20 20 20 20 62 65 67 69 6E 20 69 6E 64 65 78 3A        begin index:
02BAD0:  3D 69 6E 64 65 78 2B 31 3B 77 72 69 74 65 28 27    =index+1;write('
02BAE0:  56 61 6C 65 75 72 20 64 75 20 70 61 72 61 6D 65    Valeur du parame
02BAF0:  74 72 65 20 6E 2E 27 2C 62 6B 2C 27 20 3D 27 29    tre n.',bk,' =')
02BB00:  3B 0D 0A 20 20 20 20 20 20 20 20 20 72 65 61 64    ;..         read
02BB10:  6C 6E 28 6C 64 61 5B 69 6E 64 65 78 5D 29 3B 0D    ln(lda[index]);.
02BB20:  0A 20 20 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A    .         end;..
02BB30:  20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20          end;..    
02BB40:  20 65 6E 64 3B 0D 0A 20 20 20 20 32 3A 20 62 65     end;..    2: be
02BB50:  67 69 6E 0D 0A 20 20 20 20 20 20 77 72 69 74 65    gin..      write
02BB60:  28 27 4E 6F 20 64 65 20 6C 61 20 66 6F 6E 63 74    ('No de la fonct
02BB70:  69 6F 6E 20 78 3D 66 28 74 29 20 6E 2E 27 2C 7A    ion x=f(t) n.',z
02BB80:  2C 27 20 3D 27 29 3B 66 78 5B 7A 5D 3A 3D 6E 75    ,' =');fx[z]:=nu
02BB90:  6D 66 6F 6E 63 3B 0D 0A 20 20 20 20 20 20 69 66    mfonc;..      if
02BBA0:  20 66 5B 66 78 5B 7A 5D 5D 3D 6E 69 6C 20 74 68     f[fx[z]]=nil th
02BBB0:  65 6E 20 6C 69 72 66 6F 6E 63 74 69 6F 6E 28 66    en lirfonction(f
02BBC0:  5B 66 78 5B 7A 5D 5D 29 3B 0D 0A 20 20 20 20 20    [fx[z]]);..     
02BBD0:  20 69 66 20 6D 5B 66 78 5B 7A 5D 5D 3E 30 20 74     if m[fx[z]]>0 t
02BBE0:  68 65 6E 0D 0A 20 20 20 20 20 20 62 65 67 69 6E    hen..      begin
02BBF0:  20 66 6F 72 20 62 6B 3A 3D 31 20 74 6F 20 6D 5B     for bk:=1 to m[
02BC00:  66 78 5B 7A 5D 5D 20 64 6F 0D 0A 20 20 20 20 20    fx[z]] do..     
02BC10:  20 20 20 20 62 65 67 69 6E 20 20 69 6E 64 65 78        begin  index
02BC20:  3A 3D 69 6E 64 65 78 2B 31 3B 77 72 69 74 65 28    :=index+1;write(
02BC30:  27 56 61 6C 65 75 72 20 64 75 20 70 61 72 61 6D    'Valeur du param
02BC40:  65 74 72 65 20 6E 2E 27 2C 62 6B 2C 27 20 3D 27    etre n.',bk,' ='
02BC50:  29 3B 0D 0A 20 20 20 20 20 20 20 20 20 72 65 61    );..         rea
02BC60:  64 6C 6E 28 6C 64 61 5B 69 6E 64 65 78 5D 29 3B    dln(lda[index]);
02BC70:  0D 0A 20 20 20 20 20 20 20 20 20 65 6E 64 3B 0D    ..         end;.
02BC80:  0A 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20    .      end;..   
02BC90:  20 20 20 77 72 69 74 65 28 27 4E 6F 20 64 65 20       write('No de 
02BCA0:  6C 61 20 66 6F 6E 63 74 69 6F 6E 20 79 3D 66 28    la fonction y=f(
02BCB0:  74 29 20 6E 2E 27 2C 7A 2C 27 20 3D 27 29 3B 66    t) n.',z,' =');f
02BCC0:  79 5B 7A 5D 3A 3D 6E 75 6D 66 6F 6E 63 3B 0D 0A    y[z]:=numfonc;..
02BCD0:  20 20 20 20 20 20 69 66 20 66 5B 66 79 5B 7A 5D          if f[fy[z]
02BCE0:  5D 3D 6E 69 6C 20 74 68 65 6E 20 6C 69 72 66 6F    ]=nil then lirfo
02BCF0:  6E 63 74 69 6F 6E 28 66 5B 66 79 5B 7A 5D 5D 29    nction(f[fy[z]])
02BD00:  3B 0D 0A 20 20 20 20 20 20 69 66 20 6D 5B 66 79    ;..      if m[fy
02BD10:  5B 7A 5D 5D 3E 30 20 74 68 65 6E 0D 0A 20 20 20    [z]]>0 then..   
02BD20:  20 20 20 62 65 67 69 6E 20 66 6F 72 20 62 6B 3A       begin for bk:
02BD30:  3D 31 20 74 6F 20 6D 5B 66 79 5B 7A 5D 5D 20 64    =1 to m[fy[z]] d
02BD40:  6F 0D 0A 20 20 20 20 20 20 20 20 20 62 65 67 69    o..         begi
02BD50:  6E 20 20 69 6E 64 65 78 3A 3D 69 6E 64 65 78 2B    n  index:=index+
02BD60:  31 3B 77 72 69 74 65 28 27 56 61 6C 65 75 72 20    1;write('Valeur 
02BD70:  64 75 20 70 61 72 61 6D 65 74 72 65 20 6E 2E 27    du parametre n.'
02BD80:  2C 62 6B 2C 27 20 3D 27 29 3B 0D 0A 20 20 20 20    ,bk,' =');..    
02BD90:  20 20 20 20 20 72 65 61 64 6C 6E 28 6C 64 61 5B         readln(lda[
02BDA0:  69 6E 64 65 78 5D 29 3B 0D 0A 20 20 20 20 20 20    index]);..      
02BDB0:  20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20 20 65       end;..      e
02BDC0:  6E 64 3B 0D 0A 20 20 20 20 65 6E 64 3B 0D 0A 20    nd;..    end;.. 
02BDD0:  20 20 20 33 3A 20 62 65 67 69 6E 0D 0A 20 20 20       3: begin..   
02BDE0:  20 20 77 72 69 74 65 28 27 4E 6F 20 64 65 20 6C      write('No de l
02BDF0:  61 20 66 6F 6E 63 74 69 6F 6E 20 72 3D 66 28 74    a fonction r=f(t
02BE00:  29 20 6E 2E 27 2C 7A 2C 27 20 3D 27 29 3B 66 78    ) n.',z,' =');fx
02BE10:  5B 7A 5D 3A 3D 6E 75 6D 66 6F 6E 63 3B 0D 0A 20    [z]:=numfonc;.. 
02BE20:  20 20 20 20 69 66 20 66 5B 66 78 5B 7A 5D 5D 3D        if f[fx[z]]=
02BE30:  6E 69 6C 20 74 68 65 6E 20 6C 69 72 66 6F 6E 63    nil then lirfonc
02BE40:  74 69 6F 6E 28 66 5B 66 78 5B 7A 5D 5D 29 3B 0D    tion(f[fx[z]]);.
02BE50:  0A 20 20 20 20 20 69 66 20 6D 5B 66 78 5B 7A 5D    .     if m[fx[z]
02BE60:  5D 3E 30 20 74 68 65 6E 0D 0A 20 20 20 20 20 62    ]>0 then..     b
02BE70:  65 67 69 6E 20 66 6F 72 20 62 6B 3A 3D 31 20 74    egin for bk:=1 t
02BE80:  6F 20 6D 5B 66 78 5B 7A 5D 5D 20 64 6F 0D 0A 20    o m[fx[z]] do.. 
02BE90:  20 20 20 20 20 20 20 20 62 65 67 69 6E 20 20 69            begin  i
02BEA0:  6E 64 65 78 3A 3D 69 6E 64 65 78 2B 31 3B 77 72    ndex:=index+1;wr
02BEB0:  69 74 65 28 27 56 61 6C 65 75 72 20 64 75 20 70    ite('Valeur du p
02BEC0:  61 72 61 6D 65 74 72 65 20 6E 2E 27 2C 62 6B 2C    arametre n.',bk,
02BED0:  27 20 3D 27 29 3B 0D 0A 20 20 20 20 20 20 20 20    ' =');..        
02BEE0:  20 72 65 61 64 6C 6E 28 6C 64 61 5B 69 6E 64 65     readln(lda[inde
02BEF0:  78 5D 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 65    x]);..         e
02BF00:  6E 64 3B 0D 0A 20 20 20 20 20 65 6E 64 3B 0D 0A    nd;..     end;..
02BF10:  20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 65         end;..    e
02BF20:  6E 64 3B 0D 0A 20 20 20 65 6E 64 3B 0D 0A 20 65    nd;..   end;.. e
02BF30:  6E 64 3B 0D 0A 20 20 63 6C 72 73 63 72 3B 0D 0A    nd;..  clrscr;..
02BF40:  20 20 6F 72 69 67 69 6E 28 72 6F 75 6E 64 28 78      origin(round(x
02BF50:  6F 29 2C 72 6F 75 6E 64 28 79 6F 29 29 3B 0D 0A    o),round(yo));..
02BF60:  20 20 67 72 61 66 6D 6F 76 65 28 30 2C 30 29 3B      grafmove(0,0);
02BF70:  64 72 61 77 72 28 36 34 30 2D 72 6F 75 6E 64 28    drawr(640-round(
02BF80:  78 6F 29 2C 30 29 3B 64 72 61 77 72 28 2D 36 34    xo),0);drawr(-64
02BF90:  30 2C 30 29 3B 0D 0A 20 20 67 72 61 66 6D 6F 76    0,0);..  grafmov
02BFA0:  65 28 30 2C 30 29 3B 64 72 61 77 72 28 30 2C 34    e(0,0);drawr(0,4
02BFB0:  30 30 2D 72 6F 75 6E 64 28 79 6F 29 29 3B 64 72    00-round(yo));dr
02BFC0:  61 77 72 28 30 2C 2D 34 30 30 29 3B 0D 0A 20 20    awr(0,-400);..  
02BFD0:  67 72 61 66 6D 6F 76 65 28 72 6F 75 6E 64 28 75    grafmove(round(u
02BFE0:  78 29 2C 30 29 3B 64 72 61 77 72 28 30 2C 35 29    x),0);drawr(0,5)
02BFF0:  3B 64 72 61 77 72 28 30 2C 2D 31 30 29 3B 0D 0A    ;drawr(0,-10);..
02C000:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
02C010:  25 00 00 00 02 09 4E E5 25 00 41 02 00 00 00 02    %.....N.%.A.....
02C020:  25 00 42 02 00 00 00 02 25 00 43 02 00 00 00 02    %.B.....%.C.....
02C030:  25 00 44 02 00 00 00 02 25 00 45 02 00 00 00 02    %.D.....%.E.....
02C040:  25 00 46 02 00 00 00 02 25 00 47 02 00 00 00 02    %.F.....%.G.....
02C050:  25 00 48 02 00 00 00 02 25 00 49 02 00 00 00 02    %.H.....%.I.....
02C060:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C070:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C080:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C090:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C0A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C0B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C0C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C0D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C0E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C0F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C100:  20 20 67 72 61 66 6D 6F 76 65 28 30 2C 72 6F 75      grafmove(0,rou
02C110:  6E 64 28 75 79 29 29 3B 64 72 61 77 72 28 35 2C    nd(uy));drawr(5,
02C120:  30 29 3B 64 72 61 77 72 28 2D 31 30 2C 30 29 3B    0);drawr(-10,0);
02C130:  0D 0A 20 20 69 6E 64 65 78 3A 3D 30 3B 0D 0A 20    ..  index:=0;.. 
02C140:  20 66 6F 72 20 7A 3A 3D 31 20 74 6F 20 6E 62 66     for z:=1 to nbf
02C150:  6F 6E 63 20 64 6F 0D 0A 20 20 62 65 67 69 6E 0D    onc do..  begin.
02C160:  0A 20 20 63 61 73 65 20 63 68 6F 69 78 20 6F 66    .  case choix of
02C170:  0D 0A 20 20 31 3A 20 62 65 67 69 6E 0D 0A 20 20    ..  1: begin..  
02C180:  78 3A 3D 78 78 64 3B 70 72 65 63 65 64 65 3A 3D    x:=xxd;precede:=
02C190:  66 61 6C 73 65 3B 0D 0A 20 20 69 66 20 72 65 76    false;..  if rev
02C1A0:  6F 69 72 3D 30 20 74 68 65 6E 0D 0A 20 20 62 65    oir=0 then..  be
02C1B0:  67 69 6E 0D 0A 20 20 20 20 69 66 20 6D 5B 66 78    gin..    if m[fx
02C1C0:  5B 7A 5D 5D 3E 30 20 74 68 65 6E 0D 0A 20 20 20    [z]]>0 then..   
02C1D0:  20 20 62 65 67 69 6E 20 66 6F 72 20 62 6B 3A 3D      begin for bk:=
02C1E0:  31 20 74 6F 20 6D 5B 66 78 5B 7A 5D 5D 20 64 6F    1 to m[fx[z]] do
02C1F0:  0D 0A 20 20 20 20 20 20 20 20 20 62 65 67 69 6E    ..         begin
02C200:  0D 0A 20 20 20 20 20 20 20 20 20 69 6E 64 65 78    ..         index
02C210:  3A 3D 69 6E 64 65 78 2B 31 3B 70 5B 62 6B 2C 66    :=index+1;p[bk,f
02C220:  78 5B 7A 5D 5D 3A 3D 6C 64 61 5B 69 6E 64 65 78    x[z]]:=lda[index
02C230:  5D 3B 0D 0A 20 20 20 20 20 20 20 20 20 65 6E 64    ];..         end
02C240:  3B 0D 0A 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20    ;..     end;..  
02C250:  65 6E 64 3B 0D 0A 20 20 77 68 69 6C 65 20 78 3C    end;..  while x<
02C260:  78 78 61 20 64 6F 0D 0A 20 20 62 65 67 69 6E 0D    xxa do..  begin.
02C270:  0A 20 20 64 65 66 69 6E 69 3A 3D 74 72 75 65 3B    .  defini:=true;
02C280:  69 3A 3D 66 78 5B 7A 5D 3B 0D 0A 20 20 20 20 20    i:=fx[z];..     
02C290:  20 20 20 20 72 65 73 75 6C 74 61 74 3A 3D 63 61        resultat:=ca
02C2A0:  6C 63 75 6C 28 66 5B 66 78 5B 7A 5D 5D 2C 78 29    lcul(f[fx[z]],x)
02C2B0:  3B 0D 0A 20 20 20 20 20 20 20 20 20 69 66 20 28    ;..         if (
02C2C0:  28 64 65 66 69 6E 69 3D 74 72 75 65 29 20 61 6E    (defini=true) an
02C2D0:  64 20 28 61 62 73 28 72 65 73 75 6C 74 61 74 29    d (abs(resultat)
02C2E0:  3C 31 30 30 30 29 29 20 74 68 65 6E 20 62 65 67    <1000)) then beg
02C2F0:  69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    in..            
02C300:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C310:  20 20 78 70 3A 3D 72 6F 75 6E 64 28 78 2A 75 78      xp:=round(x*ux
02C320:  29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    );..            
02C330:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C340:  20 20 79 70 3A 3D 72 6F 75 6E 64 28 72 65 73 75      yp:=round(resu
02C350:  6C 74 61 74 2A 75 79 29 3B 0D 0A 20 20 20 20 20    ltat*uy);..     
02C360:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C370:  20 20 20 20 20 20 20 20 20 69 66 20 70 72 65 63             if prec
02C380:  65 64 65 3D 66 61 6C 73 65 20 74 68 65 6E 20 70    ede=false then p
02C390:  6C 6F 74 28 78 70 2C 79 70 29 0D 0A 20 20 20 20    lot(xp,yp)..    
02C3A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C3B0:  20 20 20 20 20 20 20 20 20 20 65 6C 73 65 20 64              else d
02C3C0:  72 61 77 28 78 70 2C 79 70 29 3B 0D 0A 20 20 20    raw(xp,yp);..   
02C3D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C3E0:  20 20 20 20 20 20 20 20 20 20 20 70 72 65 63 65               prece
02C3F0:  64 65 3A 3D 74 72 75 65 3B 0D 0A 20 20 20 20 20    de:=true;..     
02C400:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C410:  20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20            end..   
02C420:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C430:  20 20 20 20 20 20 20 20 20 20 65 6C 73 65 0D 0A              else..
02C440:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C450:  20 20 20 20 20 20 20 20 20 20 20 20 20 70 72 65                 pre
02C460:  63 65 64 65 3A 3D 66 61 6C 73 65 3B 0D 0A 20 20    cede:=false;..  
02C470:  20 20 20 20 20 20 78 3A 3D 78 2B 70 61 73 3B 0D          x:=x+pas;.
02C480:  0A 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20    .     end;..    
02C490:  65 6E 64 3B 0D 0A 20 20 20 32 3A 20 62 65 67 69    end;..   2: begi
02C4A0:  6E 0D 0A 20 20 20 78 3A 3D 78 78 64 3B 70 72 65    n..   x:=xxd;pre
02C4B0:  63 65 64 65 3A 3D 66 61 6C 73 65 3B 0D 0A 20 20    cede:=false;..  
02C4C0:  20 69 66 20 72 65 76 6F 69 72 3D 30 20 74 68 65     if revoir=0 the
02C4D0:  6E 0D 0A 20 20 20 62 65 67 69 6E 0D 0A 20 20 20    n..   begin..   
02C4E0:  20 69 66 20 6D 5B 66 78 5B 7A 5D 5D 3E 30 20 74     if m[fx[z]]>0 t
02C4F0:  68 65 6E 0D 0A 20 20 20 20 62 65 67 69 6E 20 66    hen..    begin f
02C500:  6F 72 20 62 6B 3A 3D 31 20 74 6F 20 6D 5B 66 78    or bk:=1 to m[fx
02C510:  5B 7A 5D 5D 20 64 6F 0D 0A 20 20 20 20 20 20 20    [z]] do..       
02C520:  20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20      begin..       
02C530:  20 20 69 6E 64 65 78 3A 3D 69 6E 64 65 78 2B 31      index:=index+1
02C540:  3B 70 5B 62 6B 2C 66 78 5B 7A 5D 5D 3A 3D 6C 64    ;p[bk,fx[z]]:=ld
02C550:  61 5B 69 6E 64 65 78 5D 3B 0D 0A 20 20 20 20 20    a[index];..     
02C560:  20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 65 6E        end;..    en
02C570:  64 3B 0D 0A 20 20 20 20 69 66 20 6D 5B 66 79 5B    d;..    if m[fy[
02C580:  7A 5D 5D 3E 30 20 74 68 65 6E 0D 0A 20 20 20 20    z]]>0 then..    
02C590:  62 65 67 69 6E 20 66 6F 72 20 62 6B 3A 3D 31 20    begin for bk:=1 
02C5A0:  74 6F 20 6D 5B 66 79 5B 7A 5D 5D 20 64 6F 0D 0A    to m[fy[z]] do..
02C5B0:  20 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A             begin..
02C5C0:  20 20 20 20 20 20 20 20 20 69 6E 64 65 78 3A 3D             index:=
02C5D0:  69 6E 64 65 78 2B 31 3B 70 5B 62 6B 2C 66 79 5B    index+1;p[bk,fy[
02C5E0:  7A 5D 5D 3A 3D 6C 64 61 5B 69 6E 64 65 78 5D 3B    z]]:=lda[index];
02C5F0:  0D 0A 20 20 20 20 20 20 20 20 20 65 6E 64 3B 0D    ..         end;.
02C600:  0A 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 65 6E    .    end;..   en
02C610:  64 3B 0D 0A 20 20 20 77 68 69 6C 65 20 78 3C 78    d;..   while x<x
02C620:  78 61 20 64 6F 0D 0A 20 20 20 62 65 67 69 6E 0D    xa do..   begin.
02C630:  0A 20 20 20 64 65 66 69 6E 69 3A 3D 74 72 75 65    .   defini:=true
02C640:  3B 69 3A 3D 66 78 5B 7A 5D 3B 0D 0A 20 20 20 20    ;i:=fx[z];..    
02C650:  20 20 20 20 20 20 72 65 73 75 6C 74 61 74 3A 3D          resultat:=
02C660:  63 61 6C 63 75 6C 28 66 5B 66 78 5B 7A 5D 5D 2C    calcul(f[fx[z]],
02C670:  78 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 69    x);..          i
02C680:  66 20 28 28 64 65 66 69 6E 69 3D 74 72 75 65 29    f ((defini=true)
02C690:  20 61 6E 64 20 28 61 62 73 28 72 65 73 75 6C 74     and (abs(result
02C6A0:  61 74 29 3C 31 30 30 30 29 29 20 74 68 65 6E 20    at)<1000)) then 
02C6B0:  62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20    begin..         
02C6C0:  20 78 70 3A 3D 72 6F 75 6E 64 28 72 65 73 75 6C     xp:=round(resul
02C6D0:  74 61 74 2A 75 78 29 3B 69 3A 3D 66 79 5B 7A 5D    tat*ux);i:=fy[z]
02C6E0:  3B 0D 0A 20 20 20 20 20 20 20 20 20 20 72 65 73    ;..          res
02C6F0:  75 6C 74 61 74 3A 3D 63 61 6C 63 75 6C 28 66 5B    ultat:=calcul(f[
02C700:  66 79 5B 7A 5D 5D 2C 78 29 3B 0D 0A 20 20 20 20    fy[z]],x);..    
02C710:  20 20 20 20 20 20 69 66 20 28 28 64 65 66 69 6E          if ((defin
02C720:  69 3D 74 72 75 65 29 20 61 6E 64 20 28 61 62 73    i=true) and (abs
02C730:  28 72 65 73 75 6C 74 61 74 29 3C 31 30 30 30 29    (resultat)<1000)
02C740:  29 20 74 68 65 6E 20 62 65 67 69 6E 0D 0A 20 20    ) then begin..  
02C750:  20 20 20 20 20 20 20 20 79 70 3A 3D 72 6F 75 6E            yp:=roun
02C760:  64 28 72 65 73 75 6C 74 61 74 2A 75 79 29 3B 0D    d(resultat*uy);.
02C770:  0A 20 20 20 20 20 20 20 20 20 20 69 66 20 70 72    .          if pr
02C780:  65 63 65 64 65 3D 66 61 6C 73 65 20 74 68 65 6E    ecede=false then
02C790:  20 70 6C 6F 74 28 78 70 2C 79 70 29 20 65 6C 73     plot(xp,yp) els
02C7A0:  65 20 64 72 61 77 28 78 70 2C 79 70 29 3B 0D 0A    e draw(xp,yp);..
02C7B0:  20 20 20 20 20 20 20 20 20 20 70 72 65 63 65 64              preced
02C7C0:  65 3A 3D 74 72 75 65 3B 0D 0A 20 20 20 20 20 20    e:=true;..      
02C7D0:  20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20        end..       
02C7E0:  20 20 20 65 6C 73 65 20 70 72 65 63 65 64 65 3A       else precede:
02C7F0:  3D 66 61 6C 73 65 0D 0A 20 20 20 20 20 20 20 20    =false..        
02C800:  20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20 20      end..         
02C810:  20 65 6C 73 65 20 70 72 65 63 65 64 65 3A 3D 66     else precede:=f
02C820:  61 6C 73 65 3B 0D 0A 20 20 20 20 20 20 20 78 3A    alse;..       x:
02C830:  3D 78 2B 70 61 73 3B 0D 0A 20 20 20 20 20 65 6E    =x+pas;..     en
02C840:  64 3B 0D 0A 20 20 20 65 6E 64 3B 0D 0A 20 20 33    d;..   end;..  3
02C850:  3A 62 65 67 69 6E 0D 0A 20 20 78 3A 3D 78 78 64    :begin..  x:=xxd
02C860:  3B 70 72 65 63 65 64 65 3A 3D 66 61 6C 73 65 3B    ;precede:=false;
02C870:  0D 0A 20 20 69 66 20 72 65 76 6F 69 72 3D 30 20    ..  if revoir=0 
02C880:  74 68 65 6E 0D 0A 20 20 62 65 67 69 6E 0D 0A 20    then..  begin.. 
02C890:  20 20 69 66 20 6D 5B 66 78 5B 7A 5D 5D 3E 30 20      if m[fx[z]]>0 
02C8A0:  74 68 65 6E 0D 0A 20 20 20 62 65 67 69 6E 20 20    then..   begin  
02C8B0:  66 6F 72 20 62 6B 3A 3D 31 20 74 6F 20 6D 5B 66    for bk:=1 to m[f
02C8C0:  78 5B 7A 5D 5D 20 64 6F 0D 0A 20 20 20 20 20 20    x[z]] do..      
02C8D0:  20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20       begin..      
02C8E0:  20 20 20 69 6E 64 65 78 3A 3D 69 6E 64 65 78 2B       index:=index+
02C8F0:  31 3B 70 5B 62 6B 2C 66 78 5B 7A 5D 5D 3A 3D 6C    1;p[bk,fx[z]]:=l
02C900:  64 61 5B 69 6E 64 65 78 5D 3B 0D 0A 20 20 20 20    da[index];..    
02C910:  20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 65 6E         end;..   en
02C920:  64 3B 0D 0A 20 20 65 6E 64 3B 0D 0A 20 20 77 68    d;..  end;..  wh
02C930:  69 6C 65 20 78 3C 78 78 61 20 64 6F 0D 0A 20 20    ile x<xxa do..  
02C940:  62 65 67 69 6E 0D 0A 20 20 20 64 65 66 69 6E 69    begin..   defini
02C950:  3A 3D 74 72 75 65 3B 69 3A 3D 66 78 5B 7A 5D 3B    :=true;i:=fx[z];
02C960:  0D 0A 20 20 20 20 20 20 20 20 20 72 65 73 75 6C    ..         resul
02C970:  74 61 74 3A 3D 63 61 6C 63 75 6C 28 66 5B 66 78    tat:=calcul(f[fx
02C980:  5B 7A 5D 5D 2C 78 29 3B 0D 0A 20 20 20 20 20 20    [z]],x);..      
02C990:  20 20 20 69 66 20 28 28 64 65 66 69 6E 69 3D 74       if ((defini=t
02C9A0:  72 75 65 29 20 61 6E 64 20 28 61 62 73 28 72 65    rue) and (abs(re
02C9B0:  73 75 6C 74 61 74 29 3C 31 30 30 30 29 29 20 74    sultat)<1000)) t
02C9C0:  68 65 6E 0D 0A 20 20 20 20 20 20 20 20 20 62 65    hen..         be
02C9D0:  67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20    gin..           
02C9E0:  78 70 3A 3D 72 6F 75 6E 64 28 72 65 73 75 6C 74    xp:=round(result
02C9F0:  61 74 2A 63 6F 73 28 78 29 2A 75 78 29 3B 0D 0A    at*cos(x)*ux);..
02CA00:  20 20 20 20 20 20 20 20 20 20 20 79 70 3A 3D 72               yp:=r
02CA10:  6F 75 6E 64 28 72 65 73 75 6C 74 61 74 2A 73 69    ound(resultat*si
02CA20:  6E 28 78 29 2A 75 79 29 3B 0D 0A 20 20 20 20 20    n(x)*uy);..     
02CA30:  20 20 20 20 20 20 69 66 20 70 72 65 63 65 64 65          if precede
02CA40:  3D 66 61 6C 73 65 20 74 68 65 6E 20 70 6C 6F 74    =false then plot
02CA50:  28 78 70 2C 79 70 29 20 65 6C 73 65 20 64 72 61    (xp,yp) else dra
02CA60:  77 28 78 70 2C 79 70 29 3B 0D 0A 20 20 20 20 20    w(xp,yp);..     
02CA70:  20 20 20 20 20 20 70 72 65 63 65 64 65 3A 3D 74          precede:=t
02CA80:  72 75 65 0D 0A 20 20 20 20 20 20 20 20 20 65 6E    rue..         en
02CA90:  64 0D 0A 20 20 20 20 20 20 20 20 20 65 6C 73 65    d..         else
02CAA0:  0D 0A 20 20 20 20 20 20 20 20 20 70 72 65 63 65    ..         prece
02CAB0:  64 65 3A 3D 66 61 6C 73 65 3B 0D 0A 20 20 20 20    de:=false;..    
02CAC0:  20 20 20 78 3A 3D 78 2B 70 61 73 3B 0D 0A 20 20       x:=x+pas;..  
02CAD0:  20 20 65 6E 64 3B 0D 0A 20 20 20 65 6E 64 3B 0D      end;..   end;.
02CAE0:  0A 20 20 65 6E 64 3B 0D 0A 20 20 65 6E 64 3B 0D    .  end;..  end;.
02CAF0:  0A 20 20 67 6F 74 6F 78 79 28 31 2C 32 34 29 3B    .  gotoxy(1,24);
02CB00:  65 75 78 20 6D 6F 64 75 6C 65 73 3A 0D 0A 0D 0A    eux modules:....
02CB10:  20 20 20 20 20 2D 2D 20 46 4F 4E 43 54 49 4F 4E         -- FONCTION
02CB20:  2E 43 4F 4D 20 70 6F 75 72 20 63 65 20 71 75 69    .COM pour ce qui
02CB30:  20 65 73 74 20 63 61 6C 63 75 6C 20 66 6F 72 6D     est calcul form
02CB40:  65 6C 2C 20 64 65 72 69 76 61 74 69 6F 6E 20 65    el, derivation e
02CB50:  74 0D 0A 20 20 20 20 20 20 20 20 64 65 76 65 6C    t..        devel
02CB60:  6F 70 70 65 6D 65 6E 74 73 20 6C 69 6D 69 74 65    oppements limite
02CB70:  73 2E 0D 0A 0D 0A 20 20 20 20 20 2D 2D 20 43 4F    s.....     -- CO
02CB80:  55 52 42 45 2E 43 4F 4D 20 70 6F 75 72 20 63 65    URBE.COM pour ce
02CB90:  20 71 75 69 20 65 73 74 20 65 74 75 64 65 20 67     qui est etude g
02CBA0:  72 61 70 68 69 71 75 65 2E 0D 0A 0D 0A 20 20 20    raphique.....   
02CBB0:  20 4C 65 73 20 62 61 72 72 69 65 72 65 73 20 61     Les barrieres a
02CBC0:  75 78 20 65 6E 74 72 65 65 73 20 73 6F 6E 74 20    ux entrees sont 
02CBD0:  74 72 65 73 20 6C 69 6D 69 74 65 65 73 2C 20 76    tres limitees, v
02CBE0:  6F 75 73 20 70 6F 75 76 65 7A 0D 0A 20 20 20 20    ous pouvez..    
02CBF0:  20 3C 70 6C 61 6E 74 65 72 3E 20 74 6F 75 74 20     <planter> tout 
02CC00:  61 20 6C 6F 69 73 69 72 20 63 65 73 20 70 72 6F    a loisir ces pro
02CC10:  67 72 61 6D 6D 65 73 2E 2E 2E 0D 0A 0D 0A 0D 0A    grammes.........
02CC20:  20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 4C     ************* L
02CC30:  65 73 20 65 6E 74 72 65 65 73 20 64 65 20 66 6F    es entrees de fo
02CC40:  6E 63 74 69 6F 6E 73 20 2A 2A 2A 2A 2A 2A 2A 2A    nctions ********
02CC50:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02CC60:  2A 2A 0D 0A 0D 0A 20 56 6F 75 73 20 64 65 76 65    **.... Vous deve
02CC70:  7A 20 65 6E 74 72 65 72 20 54 4F 55 53 20 6C 65    z entrer TOUS le
02CC80:  73 20 73 79 6D 62 6F 6C 65 73 20 6F 70 65 72 61    s symboles opera
02CC90:  74 6F 69 72 65 73 3A 0D 0A 20 20 2A 2C 2B 2C 2D    toires:..  *,+,-
02CCA0:  2C 2F 2C 5E 20 61 76 65 63 20 6C 65 73 20 70 61    ,/,^ avec les pa
02CCB0:  72 65 6E 74 68 65 73 65 73 20 69 6E 64 69 73 70    rentheses indisp
02CCC0:  65 6E 73 61 62 6C 65 73 2E 0D 0A 20 20 20 45 78    ensables...   Ex
02CCD0:  65 6D 70 6C 65 3A 20 33 2A 78 5E 32 2D 63 6F 73    emple: 3*x^2-cos
02CCE0:  28 32 2A 78 29 20 6F 75 20 28 32 2A 78 2B 31 29    (2*x) ou (2*x+1)
02CCF0:  5E 32 20 6F 75 20 28 78 2D 31 29 5E 2D 32 0D 0A    ^2 ou (x-1)^-2..
02CD00:  20 20 20 20 20 20 20 20 20 20 20 20 28 32 2A 78                (2*x
02CD10:  2B 31 29 2F 28 33 2A 78 2D 35 29 0D 0A 0D 0A 20    +1)/(3*x-5).... 
02CD20:  4C 65 73 20 66 6F 6E 63 74 69 6F 6E 73 20 73 75    Les fonctions su
02CD30:  69 76 61 6E 74 65 73 20 73 6F 6E 74 20 64 65 66    ivantes sont def
02CD40:  69 6E 69 65 73 3A 0D 0A 20 20 20 20 20 20 6C 6E    inies:..      ln
02CD50:  3A 20 20 6C 6F 67 61 72 69 74 6D 65 20 6E 65 70    :  logaritme nep
02CD60:  65 72 69 65 6E 2C 0D 0A 20 20 20 20 20 20 65 78    erien,..      ex
02CD70:  70 3A 20 66 6F 6E 63 74 69 6F 6E 20 65 78 70 6F    p: fonction expo
02CD80:  6E 65 6E 74 69 65 6C 6C 65 2C 0D 0A 20 20 20 20    nentielle,..    
02CD90:  20 20 73 69 6E 3A 20 73 69 6E 75 73 2C 20 63 6F      sin: sinus, co
02CDA0:  73 3A 20 63 6F 73 69 6E 75 73 2C 20 74 61 6E 67    s: cosinus, tang
02CDB0:  3A 20 74 61 6E 67 65 6E 74 65 2C 0D 0A 20 20 20    : tangente,..   
02CDC0:  20 20 20 28 6C 65 73 20 61 72 63 73 20 73 6F 6E       (les arcs son
02CDD0:  74 20 65 78 70 72 69 6D 65 73 20 65 6E 20 52 41    t exprimes en RA
02CDE0:  44 49 41 4E 53 29 0D 0A 20 20 20 20 20 20 73 71    DIANS)..      sq
02CDF0:  72 74 3A 20 72 61 64 69 63 61 6C 20 6F 75 20 72    rt: radical ou r
02CE00:  61 63 69 6E 65 20 63 61 72 72 65 65 2C 0D 0A 20    acine carree,.. 
02CE10:  20 20 20 20 20 73 68 3A 20 20 20 73 69 6E 75 73         sh:   sinus
02CE20:  20 68 79 70 65 72 62 6F 6C 69 71 75 65 2C 20 63     hyperbolique, c
02CE30:  68 3A 20 63 6F 73 69 6E 75 73 20 68 79 70 65 72    h: cosinus hyper
02CE40:  62 6F 6C 69 71 75 65 2C 0D 0A 20 20 20 20 20 20    bolique,..      
02CE50:  74 68 3A 20 20 20 74 61 6E 67 65 6E 74 65 20 68    th:   tangente h
02CE60:  79 70 65 72 62 6F 6C 69 71 75 65 2C 0D 0A 20 20    yperbolique,..  
02CE70:  20 20 20 20 61 72 63 73 69 6E 3A 20 61 72 63 73        arcsin: arcs
02CE80:  69 6E 75 73 2C 20 66 6F 6E 63 74 69 6F 6E 20 72    inus, fonction r
02CE90:  65 63 69 70 72 6F 71 75 65 20 64 65 20 73 69 6E    eciproque de sin
02CEA0:  75 73 2C 0D 0A 20 20 20 20 20 20 61 72 63 63 6F    us,..      arcco
02CEB0:  73 3A 20 61 72 63 63 6F 73 69 6E 75 73 20 72 65    s: arccosinus re
02CEC0:  63 69 70 72 6F 71 75 65 20 64 65 20 63 6F 73 69    ciproque de cosi
02CED0:  6E 75 73 2C 0D 0A 20 20 20 20 20 20 61 72 63 74    nus,..      arct
02CEE0:  61 6E 3A 20 61 72 63 74 61 6E 67 65 6E 74 65 20    an: arctangente 
02CEF0:  72 65 63 69 70 72 6F 71 75 65 20 64 65 20 74 61    reciproque de ta
02CF00:  6E 67 65 6E 74 65 2C 0D 0A 0D 0A 20 20 20 54 6F    ngente,....   To
02CF10:  75 74 65 73 20 63 65 73 20 66 6F 6E 63 74 69 6F    utes ces fonctio
02CF20:  6E 73 20 73 6F 6E 74 20 64 65 72 69 76 61 62 6C    ns sont derivabl
02CF30:  65 73 20 66 6F 72 6D 65 6C 6C 65 6D 65 6E 74 2E    es formellement.
02CF40:  0D 0A 0D 0A 20 44 65 75 78 20 66 6F 6E 63 74 69    .... Deux foncti
02CF50:  6F 6E 73 20 73 75 70 70 6C 65 6D 65 6E 74 61 69    ons supplementai
02CF60:  72 65 73 20 71 75 27 69 6C 20 76 61 75 74 20 6D    res qu'il vaut m
02CF70:  69 65 75 78 20 65 76 69 74 65 72 20 64 65 20 64    ieux eviter de d
02CF80:  65 72 69 76 65 72 3A 0D 0A 20 20 20 20 20 20 69    eriver:..      i
02CF90:  6E 74 3A 20 70 61 72 74 69 65 20 65 6E 74 69 65    nt: partie entie
02CFA0:  72 65 2C 0D 0A 20 20 20 20 20 20 61 62 73 3A 20    re,..      abs: 
02CFB0:  76 61 6C 65 75 72 20 61 62 73 6F 6C 75 65 2E 0D    valeur absolue..
02CFC0:  0A 0D 0A 20 56 6F 75 73 20 70 6F 75 76 65 7A 20    ... Vous pouvez 
02CFD0:  65 6E 74 72 65 72 20 64 65 73 20 70 61 72 61 6D    entrer des param
02CFE0:  65 74 72 65 73 20 74 72 65 73 20 75 74 69 6C 65    etres tres utile
02CFF0:  73 20 70 6F 75 72 20 6C 27 65 74 75 64 65 20 67    s pour l'etude g
02D000:  72 61 70 68 69 71 75 65 0D 0A 20 64 27 75 6E 65    raphique.. d'une
02D010:  20 66 61 6D 69 6C 6C 65 20 64 65 20 63 6F 75 72     famille de cour
02D020:  62 65 73 2E 0D 0A 0D 0A 20 50 6F 75 72 20 65 6E    bes..... Pour en
02D030:  74 72 65 72 20 6C 65 73 20 70 61 72 61 6D 65 74    trer les paramet
02D040:  72 65 73 3A 20 70 28 69 29 2C 20 69 20 65 74 61    res: p(i), i eta
02D050:  6E 74 20 6C 65 20 6E 75 6D 65 72 6F 20 64 75 20    nt le numero du 
02D060:  70 61 72 61 6D 65 74 72 65 2C 0D 0A 20 20 69 20    parametre,..  i 
02D070:  64 65 76 61 6E 74 20 65 74 72 65 20 63 6F 6D 70    devant etre comp
02D080:  72 69 73 20 65 6E 74 72 65 20 31 20 65 74 20 33    ris entre 1 et 3
02D090:  2E 0D 0A 0D 0A 0D 0A 0D 0A 20 20 53 49 20 56 4F    .........  SI VO
02D0A0:  55 53 20 4E 27 45 4E 54 52 45 5A 20 50 41 53 20    US N'ENTREZ PAS 
02D0B0:  43 4F 52 52 45 43 54 45 4D 45 4E 54 20 56 4F 54    CORRECTEMENT VOT
02D0C0:  52 45 20 46 4F 4E 43 54 49 4F 4E 20 56 4F 55 53    RE FONCTION VOUS
02D0D0:  20 41 55 52 45 5A 0D 0A 20 20 55 4E 20 4D 45 53     AUREZ..  UN MES
02D0E0:  53 41 47 45 20 44 27 45 52 52 45 55 52 20 45 54    SAGE D'ERREUR ET
02D0F0:  20 55 4E 20 4E 55 4D 45 52 4F 3A 0D 0A 0D 0A 20     UN NUMERO:.... 
02D100:  20 65 72 72 65 75 72 20 6E 2E 31 3A 20 70 20 6E     erreur n.1: p n
02D110:  27 65 73 74 20 70 61 73 20 73 75 69 76 69 20 64    'est pas suivi d
02D120:  65 20 28 0D 0A 20 20 65 72 72 65 75 72 20 6E 2E    e (..  erreur n.
02D130:  32 3A 20 70 28 69 20 6E 27 65 73 74 20 70 61 73    2: p(i n'est pas
02D140:  20 73 75 69 76 69 20 64 65 20 29 0D 0A 20 20 65     suivi de )..  e
02D150:  72 72 65 75 72 20 6E 2E 33 3A 20 70 61 72 20 65    rreur n.3: par e
02D160:  78 65 6D 70 6C 65 20 63 6F 73 28 33 2A 78 20 6E    xemple cos(3*x n
02D170:  27 65 73 74 20 70 61 73 20 73 75 69 76 69 20 64    'est pas suivi d
02D180:  65 20 29 0D 0A 20 20 65 72 72 65 75 72 20 6E 2E    e )..  erreur n.
02D190:  34 3A 20 76 6F 75 73 20 6E 27 61 76 65 7A 20 70    4: vous n'avez p
02D1A0:  61 73 20 6F 75 76 65 72 74 20 64 65 20 70 61 72    as ouvert de par
02D1B0:  65 6E 74 68 65 73 65 20 61 70 72 65 73 20 75 6E    enthese apres un
02D1C0:  65 20 66 6F 6E 63 74 69 6F 6E 0D 0A 20 20 20 20    e fonction..    
02D1D0:  20 20 20 20 20 20 20 20 20 20 65 78 20 63 6F 73              ex cos
02D1E0:  33 0D 0A 20 20 65 72 72 65 75 72 20 6E 2E 35 3A    3..  erreur n.5:
02D1F0:  20 6C 27 69 64 65 6E 74 69 66 69 63 61 74 65 75     l'identificateu
02D200:  72 20 64 65 20 66 6F 6E 63 74 69 6F 6E 20 65 73    r de fonction es
02D210:  74 20 69 6E 63 6F 6E 6E 75 2C 20 65 78 20 6C 6F    t inconnu, ex lo
02D220:  67 28 2E 2E 2C 0D 0A 20 20 65 72 72 65 75 72 20    g(..,..  erreur 
02D230:  6E 2E 36 3A 20 6C 65 20 6E 6F 6D 62 72 65 20 71    n.6: le nombre q
02D240:  75 65 20 76 6F 75 73 20 61 76 65 7A 20 65 6E 74    ue vous avez ent
02D250:  72 65 20 6E 65 20 70 65 75 74 20 65 74 72 65 20    re ne peut etre 
02D260:  69 6E 74 65 72 70 72 65 74 65 0D 0A 20 20 20 20    interprete..    
02D270:  20 20 20 20 20 20 20 20 20 20 65 78 3A 20 30 2E              ex: 0.
02D280:  31 2E 32 0D 0A 20 20 65 72 72 65 75 72 20 6E 2E    1.2..  erreur n.
02D290:  37 3A 20 76 6F 75 73 20 6E 65 20 66 65 72 6D 65    7: vous ne ferme
02D2A0:  7A 20 70 61 73 20 6C 61 20 70 61 72 65 6E 74 68    z pas la parenth
02D2B0:  65 73 65 20 6F 75 76 65 72 74 65 20 70 6F 75 72    ese ouverte pour
02D2C0:  20 75 6E 20 66 61 63 74 65 75 72 2C 0D 0A 20 20     un facteur,..  
02D2D0:  65 72 72 65 75 72 20 6E 2E 38 3A 20 76 6F 75 73    erreur n.8: vous
02D2E0:  20 63 6F 6D 6D 65 6E 63 65 7A 20 75 6E 20 66 61     commencez un fa
02D2F0:  63 74 65 75 72 20 64 65 20 6D 61 6E 69 65 72 65    cteur de maniere
02D300:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
02D310:  26 00 00 00 02 09 4E E5 26 00 41 02 00 00 00 02    &.....N.&.A.....
02D320:  26 00 42 02 00 00 00 02 26 00 43 02 00 00 00 02    &.B.....&.C.....
02D330:  26 00 44 02 00 00 00 02 26 00 45 02 00 00 00 02    &.D.....&.E.....
02D340:  26 00 46 02 00 00 00 02 26 00 47 02 00 00 00 02    &.F.....&.G.....
02D350:  26 00 48 02 00 00 00 02 26 00 49 02 00 00 00 02    &.H.....&.I.....
02D360:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D370:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D380:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D390:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D3A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D3B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D3C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D3D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D3E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D3F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D400:  20 69 6E 63 6F 72 72 65 63 74 65 2C 0D 0A 20 20     incorrecte,..  
02D410:  65 72 72 65 75 72 20 6E 2E 39 3A 20 76 6F 75 73    erreur n.9: vous
02D420:  20 65 6E 74 72 65 7A 20 75 6E 65 20 65 78 70 72     entrez une expr
02D430:  65 73 73 69 6F 6E 20 69 6E 63 6F 72 72 65 63 74    ession incorrect
02D440:  65 2C 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20    e,..            
02D450:  20 20 65 78 3A 20 28 28 33 2A 78 2B 31 29 2F 28      ex: ((3*x+1)/(
02D460:  78 2D 32 29 20 70 75 69 73 20 3C 45 4E 54 45 52    x-2) puis <ENTER
02D470:  3E 0D 0A 0D 0A 0D 0A 20 20 4C 45 53 20 4C 49 4D    >......  LES LIM
02D480:  49 54 45 53 20 44 45 53 20 44 49 4D 45 4E 53 49    ITES DES DIMENSI
02D490:  4F 4E 4E 45 4D 45 4E 54 53 20 44 45 20 56 41 52    ONNEMENTS DE VAR
02D4A0:  49 41 42 4C 45 53 0D 0A 0D 0A 20 20 55 6E 65 20    IABLES....  Une 
02D4B0:  66 6F 6E 63 74 69 6F 6E 20 6E 65 20 70 65 75 74    fonction ne peut
02D4C0:  20 63 6F 6D 70 6F 72 74 65 72 20 70 6C 75 73 20     comporter plus 
02D4D0:  64 65 20 32 35 30 20 63 61 72 61 63 74 65 72 65    de 250 caractere
02D4E0:  73 2E 2E 2E 0D 0A 20 20 56 6F 75 73 20 70 6F 75    s.....  Vous pou
02D4F0:  76 65 7A 20 65 6E 74 72 65 72 20 61 20 6C 61 20    vez entrer a la 
02D500:  66 6F 69 73 20 31 30 20 66 6F 6E 63 74 69 6F 6E    fois 10 fonction
02D510:  73 20 6E 75 6D 65 72 6F 74 65 65 73 20 64 65 20    s numerotees de 
02D520:  31 20 61 20 31 30 2C 0D 0A 20 20 6C 65 20 6E 75    1 a 10,..  le nu
02D530:  6D 65 72 6F 20 30 20 65 74 61 6E 74 20 72 65 73    mero 0 etant res
02D540:  65 72 76 65 20 70 6F 75 72 20 64 65 73 20 75 73    erve pour des us
02D550:  61 67 65 73 20 69 6E 74 65 72 6E 65 73 20 61 75    ages internes au
02D560:  78 20 70 72 6F 67 72 61 6D 6D 65 73 2E 0D 0A 20    x programmes... 
02D570:  20 50 6F 75 72 20 6C 65 73 20 67 72 61 70 68 65     Pour les graphe
02D580:  73 2C 20 75 6E 20 6D 61 78 69 6D 75 6D 20 64 65    s, un maximum de
02D590:  20 31 30 20 67 72 61 70 68 65 73 20 73 75 72 20     10 graphes sur 
02D5A0:  6C 65 20 6D 65 6D 65 20 65 63 72 61 6E 2E 0D 0A    le meme ecran...
02D5B0:  0D 0A 0D 0A 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ....  **********
02D5C0:  20 4C 65 20 63 61 6C 63 75 6C 20 61 6C 67 65 62     Le calcul algeb
02D5D0:  72 69 71 75 65 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    rique **********
02D5E0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02D5F0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 0D 0A 20    ***********.... 
02D600:  20 44 65 75 78 20 6F 70 74 69 6F 6E 73 3A 0D 0A     Deux options:..
02D610:  0D 0A 20 20 64 65 76 65 6C 6F 70 70 65 72 20 6C    ..  developper l
02D620:  65 73 20 70 72 6F 64 75 69 74 73 3A 0D 0A 20 20    es produits:..  
02D630:  65 78 65 6D 70 6C 65 3A 20 28 33 2A 78 2D 32 29    exemple: (3*x-2)
02D640:  2A 28 78 5E 32 2D 35 2A 78 2B 33 29 20 64 65 76    *(x^2-5*x+3) dev
02D650:  69 65 6E 64 72 61 20 28 33 2A 78 5E 33 2D 31 37    iendra (3*x^3-17
02D660:  2A 78 5E 32 2B 31 39 2A 78 2D 36 29 0D 0A 20 20    *x^2+19*x-6)..  
02D670:  63 65 74 74 65 20 6F 70 74 69 6F 6E 20 65 73 74    cette option est
02D680:  20 61 70 70 6C 69 71 75 65 65 20 61 75 74 6F 6D     appliquee autom
02D690:  61 74 69 71 75 65 6D 65 6E 74 20 61 75 78 20 64    atiquement aux d
02D6A0:  65 72 69 76 65 65 73 2E 0D 0A 0D 0A 20 20 64 65    erivees.....  de
02D6B0:  76 65 6C 6F 70 70 65 72 20 6C 65 73 20 70 75 69    velopper les pui
02D6C0:  73 73 61 6E 63 65 73 20 65 6E 74 69 65 72 65 73    ssances entieres
02D6D0:  3A 0D 0A 20 20 65 78 3A 20 28 78 2B 32 29 5E 33    :..  ex: (x+2)^3
02D6E0:  20 64 65 76 69 65 6E 64 72 61 20 28 78 5E 33 2B     deviendra (x^3+
02D6F0:  36 2A 78 5E 32 2B 31 32 2A 78 2B 38 29 0D 0A 0D    6*x^2+12*x+8)...
02D700:  0A 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    .  *************
02D710:  20 4C 61 20 64 65 72 69 76 61 74 69 6F 6E 20 2A     La derivation *
02D720:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02D730:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02D740:  2A 2A 2A 2A 2A 2A 2A 0D 0A 0D 0A 20 20 56 6F 75    *******....  Vou
02D750:  73 20 70 6F 75 76 65 7A 20 61 76 6F 69 72 20 6C    s pouvez avoir l
02D760:  27 65 63 72 69 74 75 72 65 20 64 65 20 6C 61 20    'ecriture de la 
02D770:  64 65 72 69 76 65 65 20 64 65 20 76 6F 74 72 65    derivee de votre
02D780:  20 66 6F 6E 63 74 69 6F 6E 2C 0D 0A 20 20 28 73     fonction,..  (s
02D790:  61 75 66 20 73 69 20 63 65 6C 6C 65 2D 63 69 20    auf si celle-ci 
02D7A0:  63 6F 6E 74 69 65 6E 74 20 49 4E 54 20 6F 75 20    contient INT ou 
02D7B0:  41 42 53 29 0D 0A 20 20 63 65 74 74 65 20 64 65    ABS)..  cette de
02D7C0:  72 69 76 65 65 20 61 75 72 61 20 6C 65 20 6E 75    rivee aura le nu
02D7D0:  6D 65 72 6F 20 64 65 20 76 6F 74 72 65 20 63 68    mero de votre ch
02D7E0:  6F 69 78 20 65 74 20 76 6F 75 73 20 70 6F 75 72    oix et vous pour
02D7F0:  72 65 7A 20 6C 75 69 0D 0A 20 20 61 70 70 6C 69    rez lui..  appli
02D800:  71 75 65 72 20 6C 27 65 6E 73 65 6D 62 6C 65 20    quer l'ensemble 
02D810:  64 75 20 6D 65 6E 75 2C 20 64 6F 6E 63 20 65 76    du menu, donc ev
02D820:  69 64 65 6D 6D 65 6E 74 20 6C 61 20 64 65 72 69    idemment la deri
02D830:  76 65 72 2E 2E 2E 2E 0D 0A 0D 0A 0D 0A 20 20 2A    ver..........  *
02D840:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 4C 65 73    ************ Les
02D850:  20 63 61 6C 63 75 6C 73 20 6E 75 6D 65 72 69 71     calculs numeriq
02D860:  75 65 73 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ues ************
02D870:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02D880:  2A 2A 0D 0A 0D 0A 20 20 56 6F 75 73 20 70 6F 75    **....  Vous pou
02D890:  76 65 7A 20 61 76 6F 69 72 20 6C 61 20 76 61 6C    vez avoir la val
02D8A0:  65 75 72 20 6E 75 6D 65 72 69 71 75 65 20 64 65    eur numerique de
02D8B0:  20 76 6F 74 72 65 20 66 6F 6E 63 74 69 6F 6E 20     votre fonction 
02D8C0:  70 6F 75 72 20 74 6F 75 74 20 78 2C 0D 0A 20 20    pour tout x,..  
02D8D0:  73 69 20 76 6F 74 72 65 20 66 6F 6E 63 74 69 6F    si votre fonctio
02D8E0:  6E 20 63 6F 6E 74 69 65 6E 74 20 75 6E 20 6F 75    n contient un ou
02D8F0:  20 64 65 73 20 70 61 72 61 6D 65 74 72 65 73 2C     des parametres,
02D900:  20 69 6C 20 76 6F 75 73 20 73 65 72 61 20 64 65     il vous sera de
02D910:  6D 61 6E 64 65 0D 0A 20 20 6C 65 75 72 28 73 29    mande..  leur(s)
02D920:  20 76 61 6C 65 75 72 28 73 29 2E 0D 0A 0D 0A 20     valeur(s)..... 
02D930:  20 53 69 20 6C 61 20 66 6F 6E 63 74 69 6F 6E 20     Si la fonction 
02D940:  6E 27 65 73 74 20 70 61 73 20 64 65 66 69 6E 69    n'est pas defini
02D950:  65 2C 20 63 65 6C 61 20 76 6F 75 73 20 73 65 72    e, cela vous ser
02D960:  61 20 69 6E 64 69 71 75 65 2E 0D 0A 20 20 41 69    a indique...  Ai
02D970:  6E 73 69 20 73 69 20 76 6F 75 73 20 61 76 65 7A    nsi si vous avez
02D980:  20 66 31 28 78 29 3D 73 71 72 74 28 32 2D 78 29     f1(x)=sqrt(2-x)
02D990:  20 65 74 20 73 69 20 76 6F 75 73 20 65 6E 74 72     et si vous entr
02D9A0:  65 7A 20 78 3D 33 0D 0A 20 20 76 6F 75 73 20 61    ez x=3..  vous a
02D9B0:  75 72 65 7A 20 6C 65 20 6D 65 73 73 61 67 65 20    urez le message 
02D9C0:  66 31 28 33 29 20 6E 27 65 73 74 20 70 61 73 20    f1(3) n'est pas 
02D9D0:  64 65 66 69 6E 69 65 2E 0D 0A 0D 0A 0D 0A 20 20    definie.......  
02D9E0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 4C 65    ************* Le
02D9F0:  73 20 64 65 76 65 6C 6F 70 70 65 6D 65 6E 74 73    s developpements
02DA00:  20 6C 69 6D 69 74 65 73 20 2A 2A 2A 2A 2A 2A 2A     limites *******
02DA10:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02DA20:  2A 2A 2A 2A 0D 0A 0D 0A 20 20 56 6F 75 73 20 61    ****....  Vous a
02DA30:  75 72 65 7A 20 6C 65 20 64 65 76 65 6C 6F 70 70    urez le developp
02DA40:  65 6D 65 6E 74 20 6C 69 6D 69 74 65 20 64 65 20    ement limite de 
02DA50:  76 6F 74 72 65 20 66 6F 6E 63 74 69 6F 6E 20 61    votre fonction a
02DA60:  75 20 76 6F 69 73 69 6E 61 67 65 0D 0A 20 20 64    u voisinage..  d
02DA70:  65 20 78 3D 30 20 61 20 6C 27 6F 72 64 72 65 20    e x=0 a l'ordre 
02DA80:  71 75 65 20 76 6F 75 73 20 64 65 73 69 72 65 7A    que vous desirez
02DA90:  2E 2E 0D 0A 20 20 4E 27 61 62 75 73 65 7A 20 70    ....  N'abusez p
02DAA0:  61 73 20 3A 20 64 65 6D 61 6E 64 65 72 20 6C 65    as : demander le
02DAB0:  20 64 65 76 65 6C 6F 70 70 65 6D 65 6E 74 20 6C     developpement l
02DAC0:  69 6D 69 74 65 20 64 65 0D 0A 20 20 20 20 20 66    imite de..     f
02DAD0:  31 28 78 29 3D 61 72 63 73 69 6E 28 33 2A 78 5E    1(x)=arcsin(3*x^
02DAE0:  32 2D 35 2A 78 29 20 61 20 6C 27 6F 72 64 72 65    2-5*x) a l'ordre
02DAF0:  20 36 0D 0A 0D 0A 20 20 76 6F 75 73 20 61 6D 65     6....  vous ame
02DB00:  6E 65 72 61 20 61 70 72 65 73 20 75 6E 20 74 65    nera apres un te
02DB10:  6D 70 73 20 63 65 72 74 61 69 6E 20 6C 65 20 6D    mps certain le m
02DB20:  65 73 73 61 67 65 3A 0D 0A 20 20 20 20 3C 3C 3C    essage:..    <<<
02DB30:  3C 3C 20 52 55 4E 2D 54 49 4D 45 20 45 52 52 4F    << RUN-TIME ERRO
02DB40:  52 20 46 46 2C 20 50 43 3D 2E 2E 2E 2E 20 3E 3E    R FF, PC=.... >>
02DB50:  3E 3E 3E 3E 3E 3E 3E 0D 0A 0D 0A 20 20 43 45 4C    >>>>>>>....  CEL
02DB60:  41 20 56 45 55 54 20 44 49 52 45 20 51 55 45 20    A VEUT DIRE QUE 
02DB70:  4C 27 45 53 50 41 43 45 20 41 4C 4C 4F 55 45 20    L'ESPACE ALLOUE 
02DB80:  41 55 58 20 50 4F 49 4E 54 45 55 52 53 20 45 53    AUX POINTEURS ES
02DB90:  54 20 45 4E 54 52 45 20 45 4E 0D 0A 20 20 43 4F    T ENTRE EN..  CO
02DBA0:  4C 4C 49 53 49 4F 4E 20 41 56 45 43 20 4C 27 45    LLISION AVEC L'E
02DBB0:  53 50 41 43 45 20 41 4C 4C 4F 55 45 20 41 55 58    SPACE ALLOUE AUX
02DBC0:  20 50 52 4F 43 45 44 55 52 45 53 20 52 45 43 55     PROCEDURES RECU
02DBD0:  52 53 49 56 45 53 0D 0A 0D 0A 20 20 4C 65 73 20    RSIVES....  Les 
02DBE0:  75 6E 73 20 65 74 20 6C 65 73 20 61 75 74 72 65    uns et les autre
02DBF0:  73 20 6E 65 20 6D 61 6E 71 75 61 6E 74 20 70 61    s ne manquant pa
02DC00:  73 20 64 61 6E 73 20 63 65 73 20 70 72 6F 67 72    s dans ces progr
02DC10:  61 6D 6D 65 73 2E 2E 2E 2E 0D 0A 0D 0A 0D 0A 20    ammes.......... 
02DC20:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 4C 65 73    ************ Les
02DC30:  20 67 72 61 70 68 65 73 20 2A 2A 2A 2A 2A 2A 2A     graphes *******
02DC40:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02DC50:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02DC60:  2A 2A 2A 2A 0D 0A 0D 0A 20 41 55 20 43 48 4F 49    ****.... AU CHOI
02DC70:  58 3A 0D 0A 0D 0A 20 43 4F 55 52 42 45 53 20 79    X:.... COURBES y
02DC80:  3D 66 28 78 29 3A 0D 0A 0D 0A 20 43 4F 55 52 42    =f(x):.... COURB
02DC90:  45 53 20 50 41 52 41 4D 45 54 52 49 51 55 45 53    ES PARAMETRIQUES
02DCA0:  20 78 3D 66 28 74 29 2C 20 79 3D 67 28 74 29 3A     x=f(t), y=g(t):
02DCB0:  0D 0A 0D 0A 20 43 4F 55 52 42 45 53 20 45 4E 20    .... COURBES EN 
02DCC0:  43 4F 4F 52 44 4F 4E 4E 45 45 53 20 50 4F 4C 41    COORDONNEES POLA
02DCD0:  49 52 45 53 20 72 3D 66 28 74 29 3A 0D 0A 0D 0A    IRES r=f(t):....
02DCE0:  20 50 6F 75 72 20 63 68 61 63 75 6E 20 64 65 20     Pour chacun de 
02DCF0:  63 65 73 20 63 68 6F 69 78 20 69 6C 20 76 6F 75    ces choix il vou
02DD00:  73 20 65 73 74 20 64 65 6D 61 6E 64 65 3A 0D 0A    s est demande:..
02DD10:  20 20 2D 2D 2D 20 6C 27 6F 72 69 67 69 6E 65 20      --- l'origine 
02DD20:  28 20 63 65 6E 74 72 65 20 64 65 20 6C 27 65 63    ( centre de l'ec
02DD30:  72 61 6E 3A 20 33 32 30 2C 32 30 30 20 29 0D 0A    ran: 320,200 )..
02DD40:  20 20 2D 2D 2D 20 6C 27 75 6E 69 74 65 20 64 65      --- l'unite de
02DD50:  73 20 61 62 73 63 69 73 73 65 73 20 65 74 20 64    s abscisses et d
02DD60:  65 73 20 6F 72 64 6F 6E 6E 65 73 20 28 20 65 6E    es ordonnes ( en
02DD70:  20 70 6F 69 6E 74 73 2D 65 63 72 61 6E 20 29 0D     points-ecran ).
02DD80:  0A 20 20 2D 2D 2D 20 6C 27 69 6E 74 65 72 76 61    .  --- l'interva
02DD90:  6C 6C 65 20 64 27 65 74 75 64 65 20 70 6F 75 72    lle d'etude pour
02DDA0:  20 78 20 73 69 20 79 3D 66 28 78 29 20 70 6F 75     x si y=f(x) pou
02DDB0:  72 20 74 20 64 61 6E 73 20 6C 65 73 20 61 75 74    r t dans les aut
02DDC0:  72 65 73 20 63 61 73 0D 0A 20 20 2D 2D 2D 20 6C    res cas..  --- l
02DDD0:  65 20 70 61 73 20 64 27 65 74 75 64 65 2C 20 69    e pas d'etude, i
02DDE0:  6E 74 65 72 76 61 6C 6C 65 20 65 6E 74 72 65 20    ntervalle entre 
02DDF0:  6C 65 20 63 61 6C 63 75 6C 20 64 65 20 64 65 75    le calcul de deu
02DE00:  78 20 76 61 6C 65 75 72 73 0D 0A 0D 0A 20 50 55    x valeurs.... PU
02DE10:  49 53 0D 0A 0D 0A 20 4C 65 20 6E 6F 6D 62 72 65    IS.... Le nombre
02DE20:  20 64 65 20 67 72 61 70 68 65 73 20 73 75 72 20     de graphes sur 
02DE30:  6C 65 20 6D 65 6D 65 20 65 63 72 61 6E 3A 0D 0A    le meme ecran:..
02DE40:  20 20 20 2D 2D 2D 20 61 20 70 61 72 74 69 72 20       --- a partir 
02DE50:  64 65 20 70 6C 75 73 69 65 75 72 73 20 66 6F 6E    de plusieurs fon
02DE60:  63 74 69 6F 6E 73 20 70 6F 75 72 20 75 6E 65 20    ctions pour une 
02DE70:  65 74 75 64 65 20 63 6F 6D 70 61 72 61 74 69 76    etude comparativ
02DE80:  65 0D 0A 20 20 20 2D 2D 2D 20 75 6E 65 20 66 6F    e..   --- une fo
02DE90:  6E 63 74 69 6F 6E 20 65 74 20 70 6C 75 73 69 65    nction et plusie
02DEA0:  75 72 73 20 76 61 6C 65 75 72 73 20 64 75 20 6F    urs valeurs du o
02DEB0:  75 20 64 65 73 20 70 61 72 61 6D 65 74 72 65 28    u des parametre(
02DEC0:  73 29 0D 0A 0D 0A 20 4C 65 20 74 72 61 63 65 20    s).... Le trace 
02DED0:  64 75 20 6F 75 20 64 65 73 20 67 72 61 70 68 65    du ou des graphe
02DEE0:  28 73 29 20 74 65 72 6D 69 6E 65 20 76 6F 75 73    (s) termine vous
02DEF0:  20 70 6F 75 76 65 7A 20 66 61 69 72 65 0D 0A 20     pouvez faire.. 
02DF00:  75 6E 65 20 3C 48 41 52 44 43 4F 50 59 3E 20 64    une <HARDCOPY> d
02DF10:  65 20 76 6F 74 72 65 20 65 63 72 61 6E 20 73 75    e votre ecran su
02DF20:  72 20 69 6D 70 72 69 6D 61 6E 74 65 20 63 6F 6D    r imprimante com
02DF30:  70 61 74 69 62 6C 65 20 3C 45 50 53 4F 4E 3E 0D    patible <EPSON>.
02DF40:  0A 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 51    ...*********** Q
02DF50:  55 45 4C 51 55 45 53 20 41 53 54 55 43 45 53 20    UELQUES ASTUCES 
02DF60:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02DF70:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02DF80:  2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 0D 0A 20 50 6F    *********.... Po
02DF90:  75 72 20 67 61 67 6E 65 72 20 64 75 20 74 65 6D    ur gagner du tem
02DFA0:  70 73 3A 0D 0A 0D 0A 20 20 20 20 50 6F 75 72 20    ps:....    Pour 
02DFB0:  6C 65 73 20 64 65 76 65 6C 6F 70 70 65 6D 65 6E    les developpemen
02DFC0:  74 73 20 6C 69 6D 69 74 65 73 3A 0D 0A 20 20 20    ts limites:..   
02DFD0:  20 20 65 6D 70 6C 6F 79 65 72 20 6C 65 73 20 65      employer les e
02DFE0:  78 70 6F 73 61 6E 74 73 20 6E 65 67 61 74 69 66    xposants negatif
02DFF0:  73 20 6F 75 20 66 72 61 63 74 69 6F 6E 6E 61 69    s ou fractionnai
02E000:  72 65 73 0D 0A 20 20 20 20 20 65 78 20 28 31 2B    res..     ex (1+
02E010:  78 29 5E 2D 31 20 61 75 20 6C 69 65 75 20 64 65    x)^-1 au lieu de
02E020:  20 31 2F 28 31 2B 78 29 0D 0A 20 20 20 20 20 20     1/(1+x)..      
02E030:  6F 75 20 28 33 2D 78 29 5E 30 2E 35 20 61 75 20    ou (3-x)^0.5 au 
02E040:  6C 69 65 75 20 64 65 20 73 71 72 74 28 33 2D 78    lieu de sqrt(3-x
02E050:  29 0D 0A 20 20 20 20 20 20 70 65 72 6D 65 74 74    )..      permett
02E060:  72 61 20 75 6E 65 20 65 78 65 63 75 74 69 6F 6E    ra une execution
02E070:  20 62 65 61 75 63 6F 75 70 20 70 6C 75 73 20 72     beaucoup plus r
02E080:  61 70 69 64 65 2E 0D 0A 0D 0A 20 20 20 20 50 6F    apide.....    Po
02E090:  75 72 20 64 65 76 65 6C 6F 70 70 65 72 20 75 6E    ur developper un
02E0A0:  65 20 70 75 69 73 73 61 6E 63 65 20 65 6E 74 69    e puissance enti
02E0B0:  65 72 65 3A 0D 0A 20 20 20 20 20 65 78 20 28 78    ere:..     ex (x
02E0C0:  5E 32 2D 33 2A 78 2B 32 29 5E 34 0D 0A 20 20 20    ^2-3*x+2)^4..   
02E0D0:  20 20 64 65 6D 61 6E 64 65 72 20 6C 65 20 64 65      demander le de
02E0E0:  76 65 6C 6F 70 70 65 6D 65 6E 74 20 6C 69 6D 69    veloppement limi
02E0F0:  74 65 20 64 65 20 63 65 74 74 65 20 66 6F 6E 63    te de cette fonc
02E100:  74 69 6F 6E 0D 0A 20 20 20 20 20 61 75 20 76 6F    tion..     au vo
02E110:  69 73 69 6E 61 67 65 20 64 65 20 61 3D 30 20 65    isinage de a=0 e
02E120:  74 20 61 20 6C 27 6F 72 64 72 65 2C 20 64 65 67    t a l'ordre, deg
02E130:  72 65 20 64 75 20 70 6F 6C 79 6E 6F 6D 65 20 28    re du polynome (
02E140:  69 63 69 20 38 29 0D 0A 20 20 20 20 20 64 6F 6E    ici 8)..     don
02E150:  6E 65 72 61 20 75 6E 65 20 65 78 65 63 75 74 69    nera une executi
02E160:  6F 6E 20 74 72 65 73 20 72 61 70 69 64 65 2E 0D    on tres rapide..
02E170:  0A 0D 0A 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20    .....********** 
02E180:  50 4F 55 52 20 4C 45 53 20 50 4F 53 53 45 53 53    POUR LES POSSESS
02E190:  45 55 52 53 20 44 45 20 54 55 52 42 4F 20 50 41    EURS DE TURBO PA
02E1A0:  53 43 41 4C 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    SCAL ***********
02E1B0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 0D 0A    ************....
02E1C0:  20 41 76 65 63 20 6C 65 73 20 70 72 6F 67 72 61     Avec les progra
02E1D0:  6D 6D 65 73 20 73 6F 75 72 63 65 73 20 69 6C 20    mmes sources il 
02E1E0:  65 73 74 20 70 6F 73 73 69 62 6C 65 20 64 65 0D    est possible de.
02E1F0:  0A 0D 0A 20 2B 2B 2B 2B 20 66 72 61 63 74 69 6F    ... ++++ fractio
02E200:  6E 6E 65 72 20 63 65 73 20 70 72 6F 67 72 61 6D    nner ces program
02E210:  6D 65 73 20 70 6F 75 72 20 6C 65 73 20 65 78 65    mes pour les exe
02E220:  63 75 74 65 72 20 73 6F 75 73 20 43 50 4D 20 32    cuter sous CPM 2
02E230:  0D 0A 20 2B 2B 2B 2B 20 65 6E 72 69 63 68 69 72    .. ++++ enrichir
02E240:  20 6C 65 20 6D 65 6E 75 0D 0A 20 20 20 20 20 20     le menu..      
02E250:  20 70 61 72 20 65 78 65 6D 70 6C 65 20 72 65 73     par exemple res
02E260:  6F 6C 75 74 69 6F 6E 20 64 65 20 66 28 78 29 3D    olution de f(x)=
02E270:  30 0D 0A 20 2B 2B 2B 2B 20 65 6E 72 69 63 68 69    0.. ++++ enrichi
02E280:  72 20 6C 65 20 63 61 74 61 6C 6F 67 75 65 20 64    r le catalogue d
02E290:  65 20 66 6F 6E 63 74 69 6F 6E 73 20 64 65 66 69    e fonctions defi
02E2A0:  6E 69 65 73 0D 0A 20 20 20 20 20 20 20 41 72 67    nies..       Arg
02E2B0:  73 68 2C 20 41 72 67 63 68 2C 20 41 72 67 74 68    sh, Argch, Argth
02E2C0:  20 20 6F 75 20 65 6E 63 6F 72 65 20 6C 6F 67 20      ou encore log 
02E2D0:  64 65 63 69 6D 61 6C 2E 2E 2E 0D 0A 20 2B 2B 2B    decimal..... +++
02E2E0:  2B 20 65 63 72 69 72 65 20 6C 65 73 20 66 6F 6E    + ecrire les fon
02E2F0:  63 74 69 6F 6E 73 20 73 6F 75 73 20 6C 61 20 66    ctions sous la f
02E300:  6F 72 6D 65 20 63 6C 61 73 73 69 71 75 65 3A 0D    orme classique:.
02E310:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
02E320:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 0D                  2.
02E330:  0A 20 20 20 20 20 20 33 2A 78 5E 32 2D 35 2A 78    .      3*x^2-5*x
02E340:  2B 33 20 64 65 76 65 6E 61 6E 74 20 33 78 20 2D    +3 devenant 3x -
02E350:  35 78 2B 33 0D 0A 20 2B 2B 2B 2B 20 70 65 72 73    5x+3.. ++++ pers
02E360:  6F 6E 6E 61 6C 69 73 65 72 20 6C 65 20 6D 65 6E    onnaliser le men
02E370:  75 20 2E 0D 0A 0D 0A 20 4D 41 49 53 20 43 45 4C    u ..... MAIS CEL
02E380:  41 20 4E 27 45 53 54 20 50 4F 53 53 49 42 4C 45    A N'EST POSSIBLE
02E390:  20 51 55 27 45 4E 20 41 4C 4C 45 47 45 41 4E 54     QU'EN ALLEGEANT
02E3A0:  20 4C 45 20 4D 45 4E 55 20 41 43 54 55 45 4C 2E     LE MENU ACTUEL.
02E3B0:  2E 2E 2E 2E 2E 0D 0A 0D 0A 2A 2A 2A 2A 2A 2A 2A    .........*******
02E3C0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02E3D0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02E3E0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02E3F0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02E400:  0D 0A 43 4F 50 59 52 49 47 48 54 20 4D 69 63 68    ..COPYRIGHT Mich
02E410:  65 6C 20 48 49 52 54 5A 4C 45 52 20 20 20 20 20    el HIRTZLER     
02E420:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02E430:  20 20 20 20 20 20 20 20 20 20 20 44 65 63 65 6D               Decem
02E440:  62 72 65 20 20 31 39 38 36 0D 0A 2A 2A 2A 2A 2A    bre  1986..*****
02E450:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02E460:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02E470:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02E480:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02E490:  2A 2A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    **..............
02E4A0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02E4B0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02E4C0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02E4D0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02E4E0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02E4F0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02E500:  E5 21 F6 FF E5 CD D9 4E 21 00 00 E5 21 C8 EC CD    .!.....N!...!...
02E510:  2C 05 CD D0 0F E5 CD 2D 4F 21 05 00 E5 21 00 00    ,......-O!...!..
02E520:  E5 CD D9 4E 21 F6 FF E5 21 00 00 E5 CD D9 4E 21    ...N!...!.....N!
02E530:  00 00 22 B6 EC 21 01 00 E5 2A BC EC D1 CD 66 06    .."..!...*....f.
02E540:  7A B3 CA C6 5E D5 22 BA EC 2A 90 F2 11 01 00 B7    z...^."..*......
02E550:  ED 52 C2 92 5B 21 DA EC CD 2C 05 D9 21 C1 F1 CD    .R..[!...,..!...
02E560:  D1 05 21 00 00 7D 32 B5 EC 21 C1 F1 CD 2C 05 C5    ..!..}2..!...,..
02E570:  D5 E5 21 D4 EC CD 2C 05 D9 E1 D1 C1 CD E9 06 CB    ..!...,.........
02E580:  45 CA 8F 5B 21 01 00 7D 32 C7 F1 21 A1 EC E5 2A    E..[!..}2..!...*
02E590:  BA EC 2B 29 D1 19 5E 23 56 EB 22 98 F2 21 A6 F2    ..+)..^#V."..!..
02E5A0:  E5 21 A1 EC E5 2A BA EC 2B 29 D1 19 5E 23 56 EB    .!...*..+)..^#V.
02E5B0:  2B 29 D1 19 5E 23 56 EB E5 21 C1 F1 CD 2C 05 C5    +)..^#V..!...,..
02E5C0:  D5 E5 CD 4D 2D D9 21 BB F1 CD D1 05 2A C7 F1 26    ...M-.!.....*..&
02E5D0:  00 E5 21 01 00 D1 CD 7F 06 E5 21 BB F1 CD 2C 05    ..!.......!...,.
02E5E0:  CB B8 C5 D5 E5 21 E8 03 CD 08 10 D9 E1 D1 C1 CD    .....!..........
02E5F0:  E9 06 D1 7D A3 6F CB 45 CA 68 5B 21 C1 F1 CD 2C    ...}£o.E.h[!...,
02E600:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00    Track-Info......
02E610:  27 00 00 00 02 09 4E E5 27 00 41 02 00 00 00 02    '.....N.'.A.....
02E620:  27 00 42 02 00 00 00 02 27 00 43 02 00 00 00 02    '.B.....'.C.....
02E630:  27 00 44 02 00 00 00 02 27 00 45 02 00 00 00 02    '.D.....'.E.....
02E640:  27 00 46 02 00 00 00 02 27 00 47 02 00 00 00 02    '.F.....'.G.....
02E650:  27 00 48 02 00 00 00 02 27 00 49 02 00 00 00 02    '.H.....'.I.....
02E660:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E670:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E680:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E690:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E6A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E6B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E6C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E6D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E6E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E6F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E700:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E710:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E720:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E730:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E740:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E750:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E760:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E770:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E780:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E790:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E7A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E7B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E7C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E7D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E7E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E7F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E800:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E810:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E820:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E830:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E840:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E850:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E860:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E870:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E880:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E890:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E8A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E8B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E8C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E8D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E8E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E8F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E900:  77 72 69 74 65 28 27 3C 31 3E 20 49 6D 70 72 69    write('<1> Impri
02E910:  6D 65 72 20 3C 32 3E 20 52 65 76 6F 69 72 20 3C    mer <2> Revoir <
02E920:  33 3E 20 52 65 74 6F 75 72 20 61 75 20 6D 65 6E    3> Retour au men
02E930:  75 27 29 3B 0D 0A 20 20 72 65 70 65 61 74 0D 0A    u');..  repeat..
02E940:  20 20 72 65 61 64 28 6B 62 64 2C 63 61 72 29 3B      read(kbd,car);
02E950:  0D 0A 20 20 75 6E 74 69 6C 20 28 28 63 61 72 3E    ..  until ((car>
02E960:  27 30 27 29 20 61 6E 64 20 28 63 61 72 3C 27 34    '0') and (car<'4
02E970:  27 29 29 3B 0D 0A 20 20 76 61 6C 28 63 61 72 2C    '));..  val(car,
02E980:  63 68 6F 69 78 62 69 73 2C 72 65 73 75 6C 74 29    choixbis,result)
02E990:  3B 0D 0A 20 20 69 66 20 63 68 6F 69 78 62 69 73    ;..  if choixbis
02E9A0:  3D 31 20 74 68 65 6E 0D 0A 20 20 20 62 65 67 69    =1 then..   begi
02E9B0:  6E 0D 0A 20 20 20 67 6F 74 6F 78 79 28 31 2C 32    n..   gotoxy(1,2
02E9C0:  34 29 3B 77 72 69 74 65 28 27 20 20 20 20 20 20    4);write('      
02E9D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02E9E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02E9F0:  20 20 20 20 20 27 29 3B 0D 0A 20 20 20 6F 72 69         ');..   ori
02EA00:  67 69 6E 28 30 2C 30 29 3B 76 69 64 61 67 65 3B    gin(0,0);vidage;
02EA10:  0D 0A 20 20 20 65 6E 64 3B 0D 0A 20 20 69 66 20    ..   end;..  if 
02EA20:  63 68 6F 69 78 62 69 73 3D 32 20 74 68 65 6E 0D    choixbis=2 then.
02EA30:  0A 20 20 67 72 61 70 68 65 28 31 29 3B 0D 0A 65    .  graphe(1);..e
02EA40:  6E 64 3B 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    nd;.............
02EA50:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02EA60:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02EA70:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02EA80:  56 6F 74 72 65 20 63 68 6F 69 78 3F 20 CD 1B 20    Votre choix? .. 
02EA90:  21 BA 00 CD A9 14 21 A5 F2 CD 44 16 CD 1B 20 2A    !.....!...D... *
02EAA0:  A5 F2 26 00 E5 21 30 00 D1 CD CC 06 E5 2A A5 F2    ..&..!0......*..
02EAB0:  26 00 E5 21 34 00 D1 CD E0 06 D1 7D A3 6F CB 45    &..!4......}£o.E
02EAC0:  CA 90 52 CD 9B 14 CD CD 17 CD 1B 20 2A A5 F2 26    ..R........ *..&
02EAD0:  00 65 2E 01 E5 21 90 F2 E5 21 94 F2 CD F4 1E CD    .e...!...!......
02EAE0:  9B 14 CD CD 17 CD 1B 20 CD 9B 14 CD CD 17 CD 1B    ....... ........
02EAF0:  20 CD 9B 14 CD BA 17 11 41 62 73 63 69 73 73 65     .......Abscisse
02EB00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EBA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EBB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EBC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EBD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EBE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EBF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ECA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ECB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ECC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ECD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ECE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ECF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ED00:  E5 21 01 00 D1 CD 7F 06 E5 21 BB F1 CD 2C 05 CB    .!.......!...,..
02ED10:  B8 C5 D5 E5 21 E8 03 CD 08 10 D9 E1 D1 C1 CD E9    ....!...........
02ED20:  06 D1 7D A3 6F CB 45 CA BD 61 21 BB F1 CD 2C 05    ..}£o.E..a!...,.
02ED30:  C5 D5 E5 21 C1 F1 CD 2C 05 CD 7F 0C D9 E1 D1 C1    ...!...,........
02ED40:  CD FA 09 C5 D5 E5 21 CE EC CD 2C 05 D9 E1 D1 C1    ......!...,.....
02ED50:  CD FA 09 CD D0 0F 22 C0 EC 21 BB F1 CD 2C 05 C5    ......"..!...,..
02ED60:  D5 E5 21 C1 F1 CD 2C 05 CD 87 0C D9 E1 D1 C1 CD    ..!...,.........
02ED70:  FA 09 C5 D5 E5 21 C8 EC CD 2C 05 D9 E1 D1 C1 CD    .....!...,......
02ED80:  FA 09 CD D0 0F 22 BE EC 2A B3 EC 26 00 E5 21 00    ....."..*..&..!.
02ED90:  00 D1 CD 7F 06 CB 45 CA A8 61 2A C0 EC E5 2A BE    ......E..a*...*.
02EDA0:  EC E5 CD B3 4F C3 B3 61 2A C0 EC E5 2A BE EC E5    ....O..a*...*...
02EDB0:  CD 35 4F 21 01 00 7D 32 B3 EC C3 C4 61 21 00 00    .5O!..}2....a!..
02EDC0:  7D 32 B3 EC 21 C1 F1 CD 2C 05 C5 D5 E5 21 C2 EC    }2..!...,....!..
02EDD0:  CD 2C 05 D9 E1 D1 C1 CD E9 09 D9 21 C1 F1 CD D1    .,.........!....
02EDE0:  05 C3 98 60 2A BA EC 23 D1 1B C3 73 5A 21 01 00    ...`*..#...sZ!..
02EDF0:  E5 21 18 00 CD DB 1F CD 9B 14 CD BA 17 2A 3C 31    .!...........*<1
02EE00:  3E 20 49 6D 70 72 69 6D 65 72 20 3C 32 3E 20 52    > Imprimer <2> R
02EE10:  65 76 6F 69 72 20 3C 33 3E 20 52 65 74 6F 75 72    evoir <3> Retour
02EE20:  20 61 75 20 6D 65 6E 75 CD 1B 20 21 BA 00 CD A9     au menu.. !....
02EE30:  14 21 A5 F2 CD 44 16 CD 1B 20 2A A5 F2 26 00 E5    .!...D... *..&..
02EE40:  21 30 00 D1 CD CC 06 E5 2A A5 F2 26 00 E5 21 34    !0......*..&..!4
02EE50:  00 D1 CD E0 06 D1 7D A3 6F CB 45 CA 2B 62 2A A5    ......}£o.E.+b*.
02EE60:  F2 26 00 65 2E 01 E5 21 B4 EC E5 21 94 F2 CD F4    .&.e...!...!....
02EE70:  1E 2A B4 EC E5 21 01 00 D1 CD 7F 06 CB 45 CA CE    .*...!.......E..
02EE80:  62 21 01 00 E5 21 18 00 CD DB 1F CD 9B 14 CD BA    b!...!..........
02EE90:  17 2B 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .+              
02EEA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02EEB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 CD 1B 20                 .. 
02EEC0:  21 00 00 E5 21 00 00 E5 CD 07 50 CD 9A 50 2A B4    !...!.....P..P*.
02EED0:  EC E5 21 02 00 D1 CD 7F 06 CB 45 CA E5 62 21 01    ..!.......E..b!.
02EEE0:  00 E5 CD 70 4D 01 E3 00 11 13 EC C3 22 05 21 01    ...pM.......".!.
02EEF0:  00 E5 21 0A 00 D1 CD 66 06 7A B3 CA 33 63 D5 22    ..!....f.z..3c."
02EF00:  98 F2 21 A6 F2 E5 2A 98 F2 2B 29 D1 19 E5 21 00    ..!...*..+)...!.
02EF10:  00 EB E1 73 23 72 21 C8 F1 E5 2A 98 F2 2B 29 D1    ...s#r!...*..+).
02EF20:  19 E5 21 00 00 EB E1 73 23 72 2A 98 F2 23 D1 1B    ..!....s#r*..#..
02EF30:  C3 F9 62 21 0A 00 E5 21 0A 00 E5 CD 31 50 CD 73    ..b!...!....1P.s
02EF40:  4D C3 D4 20 21 00 00 E5 CD 07 50 CD 9A 50 2A B4    M.. !.....P..P*.
02EF50:  EC E5 21 02 00 D1 CD 7F 06 CB 45 CA 7F 06 21 01    ..!.......E...!.
02EF60:  00 E5 CD 70 4D 01 E3 00 11 13 EC C3 22 05 21 01    ...pM.......".!.
02EF70:  00 E5 21 0A 00 D1 CD 66 06 7A B3 CA 00 00 D5 22    ..!....f.z....."
02EF80:  63 68 6F 69 78 62 69 73 2C 72 65 73 75 6C 74 29    choixbis,result)
02EF90:  3B 0D 0A 20 20 69 66 20 63 68 6F 69 78 62 69 73    ;..  if choixbis
02EFA0:  3D 31 20 74 68 65 6E 0D 0A 20 20 20 62 65 67 69    =1 then..   begi
02EFB0:  6E 0D 0A 20 20 20 67 6F 74 6F 78 79 28 31 2C 32    n..   gotoxy(1,2
02EFC0:  34 29 3B 77 72 69 74 65 28 27 20 20 20 20 20 20    4);write('      
02EFD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02EFE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02EFF0:  20 20 20 20 20 27 29 3B 0D 0A 20 20 20 6F 72 69         ');..   ori
02F000:  67 69 6E 28 30 2C 30 29 3B 76 69 64 61 67 65 3B    gin(0,0);vidage;
02F010:  0D 0A 20 20 20 65 6E 64 3B 0D 0A 20 20 69 66 20    ..   end;..  if 
02F020:  63 68 6F 69 78 62 69 73 3D 32 20 74 68 65 6E 0D    choixbis=2 then.
02F030:  0A 20 20 67 72 61 70 68 65 28 31 29 3B 0D 0A 65    .  graphe(1);..e
02F040:  6E 64 3B 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    nd;.............
02F050:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02F060:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02F070:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02F080:  56 6F 74 72 65 20 63 68 6F 69 78 3F 20 CD 1B 20    Votre choix? .. 
02F090:  21 BA 00 CD A9 14 21 A5 F2 CD 44 16 CD 1B 20 2A    !.....!...D... *
02F0A0:  A5 F2 26 00 E5 21 30 00 D1 CD CC 06 E5 2A A5 F2    ..&..!0......*..
02F0B0:  26 00 E5 21 34 00 D1 CD E0 06 D1 7D A3 6F CB 45    &..!4......}£o.E
02F0C0:  CA 90 52 CD 9B 14 CD CD 17 CD 1B 20 2A A5 F2 26    ..R........ *..&
02F0D0:  00 65 2E 01 E5 21 90 F2 E5 21 94 F2 CD F4 1E CD    .e...!...!......
02F0E0:  9B 14 CD CD 17 CD 1B 20 CD 9B 14 CD CD 17 CD 1B    ....... ........
02F0F0:  20 CD 9B 14 CD BA 17 11 41 62 73 63 69 73 73 65     .......Abscisse
02F100:  3E 20 49 6D 70 72 69 6D 65 72 20 3C 32 3E 20 52    > Imprimer <2> R
02F110:  65 76 6F 69 72 20 3C 33 3E 20 52 65 74 6F 75 72    evoir <3> Retour
02F120:  20 61 75 20 6D 65 6E 75 27 29 3B 0D 0A 20 20 72     au menu');..  r
02F130:  65 70 65 61 74 0D 0A 20 20 72 65 61 64 28 6B 62    epeat..  read(kb
02F140:  64 2C 63 61 72 29 3B 0D 0A 20 20 75 6E 74 69 6C    d,car);..  until
02F150:  20 28 28 63 61 72 3E 27 30 27 29 20 61 6E 64 20     ((car>'0') and 
02F160:  28 63 61 72 3C 27 34 27 29 29 3B 0D 0A 20 20 76    (car<'4'));..  v
02F170:  61 6C 28 63 61 72 2C 63 68 6F 69 78 2C 72 65 73    al(car,choix,res
02F180:  75 6C 74 29 3B 0D 0A 20 20 69 66 20 63 68 6F 69    ult);..  if choi
02F190:  78 3D 31 20 74 68 65 6E 0D 0A 20 20 20 62 65 67    x=1 then..   beg
02F1A0:  69 6E 0D 0A 20 20 20 67 6F 74 6F 78 79 28 31 2C    in..   gotoxy(1,
02F1B0:  32 34 29 3B 77 72 69 74 65 28 27 20 20 20 20 20    24);write('     
02F1C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02F1D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02F1E0:  20 20 20 20 20 20 27 29 3B 0D 0A 20 20 20 6F 72          ');..   or
02F1F0:  69 67 69 6E 28 30 2C 30 29 3B 76 69 64 61 67 65    igin(0,0);vidage
02F200:  3B 0D 0A 20 20 20 65 6E 64 3B 0D 0A 20 20 69 66    ;..   end;..  if
02F210:  20 63 68 6F 69 78 3D 32 20 74 68 65 6E 0D 0A 20     choix=2 then.. 
02F220:  20 67 72 61 70 68 65 28 31 29 3B 0D 0A 65 6E 64     graphe(1);..end
02F230:  3B 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ;...............
02F240:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02F250:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02F260:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02F270:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02F280:  20 20 20 20 20 20 20 20 20 20 20 20 20 8D 5B 20                 .[ 
02F290:  21 00 00 E5 21 00 00 E5 CD 05 D3 CD 9A 50 2A 90    !...!........P*.
02F2A0:  F2 E5 21 02 00 D1 CD 7F 06 CB C5 CA B5 62 21 01    ..!..........b!.
02F2B0:  00 E5 CD 70 4D 01 EC 00 11 0A EC C3 22 05 21 01    ...pM.......".!.
02F2C0:  00 E5 21 0A 00 D1 CD 66 06 7A B3 CA 03 63 D5 22    ..!....f.z...c."
02F2D0:  98 F2 21 A6 F2 E5 2A 98 F2 2B 29 D1 19 E5 21 00    ..!...*..+)...!.
02F2E0:  00 EB E1 73 23 22 E1 C8 F1 E5 2A 98 F2 2B 29 D1    ...s#"....*..+).
02F2F0:  19 E5 21 00 00 EB E1 73 23 72 2A 98 F2 23 D1 1B    ..!....s#r*..#..
02F300:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F310:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F320:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F330:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F340:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F350:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F360:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F370:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F380:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F390:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F3A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F3B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F3C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F3D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F3E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F3F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F400:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F410:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F420:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F430:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F440:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F450:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F460:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F470:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F480:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F490:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F4A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F4B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F4C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F4D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F4E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F4F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F500:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F510:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F520:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F530:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F540:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F550:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F560:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F570:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F580:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F590:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F5A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F5B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F5C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F5D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F5E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F5F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F600:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F610:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F620:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F630:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F640:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F650:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F660:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F670:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F680:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F690:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F6A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F6B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F6C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F6D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F6E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F6F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F700:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F710:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F720:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F730:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F740:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F750:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F760:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F770:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F780:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F790:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F7A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F7B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F7C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F7D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F7E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F7F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F800:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F810:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F820:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F830:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F840:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F850:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F860:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F870:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F880:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F890:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F8A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F8B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F8C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F8D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F8E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F8F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
RESULT OF SEARCH :
PRO=89   CHEA=0   COD=0   MUSI=0   COP=8   GRA=63   WRIT=194   198=4   199=0   STARTER=0   KBI=0   CAAV=0   L.TOURNIER=0  
EXTENDED CPC DSK File    SAMdisk100620(  NABCDEFGHI!04 d(o&0#!*4(!!Fk  Discette 
read failure  Press any key to restart!4  Cannot find ".EMS" file  Press any key
 to restart#Z 8! " ++( )8gJO.#EMS  NABCDEFGHI  NABCDEFGHILIREFONCPAS#SOURCES DOC
$ GRAFIK3 INCCOURBE  COMABEDERIVEE PAS !"#CALCULF BAK ,-./LMFONCTIONCOM$%&'()*+0
1234678ECRIF   PAS 5GRAPHEF PAS-CghijvFONCTIONPASDFONCTIONCOM9YZabcCOURBE  COMFF
GHIJKdefCALCULF PASOPQRSTUVWXFONCTIONCOMAALGEBRE PASUklmnopqrstuMENU    PAS&wyzC
OURBE  PASxCALCULF BAKMENU    COMCECRIF   BAK GRAPHEF BAK+A-LIRE  DOCN£  procedu
re  lirfonction(var ffonction)  forward  procedure  relache(var ffonction)  begi
n   if fnil then begin                       dispose(f)fnilmi0                  
 end  end    procedure erreur(noeinteger)     begin   writelnwrite('Erreur de sy
ntaxe a l''entree n.')writeln(noe)   relache(fi)   lirfonction(fi)   end    proc
edure  lircar    begin    repeat      read(kbd,car)    until ((car in filtre) or
 (carchr(13)))    write (car)    end    procedure lirnaturel   begin   lircar   
idfcar   while ((car in '0'..'9') and (length(idf)6)) do     begin     lircar   
  idfidf+car     end   idfcopy(idf,1,length(idf)-1)   end    procedure lirpara(v
ar ffonction)  var indxinteger   begin   lircar   if car '(' then erreur(1)     
else     begin       lirnaturel       if car')' then erreur(2)       else       
 begin         f.nature'param'         f.valeuridf         f.dnil         f.gnil
         val(idf,indx,result)         if miindx then miindx        end     end  
 lircar   end    procedure lirx(var ffonction)   begin   f.nature'variab'   f.va
leur'x'   f.dnil   f.gnil   lircar   end    procedure lirexp(var ffonction)  for
ward    procedure liridfct(var ffonction)   begin   idfcar   while ((car in 'a'.
.'z') and (length(idf)7)) do    begin    lircar    idfidf+car    end   idfcopy(i
df,1,length(idf)-1)   if ((idf'sin')or(idf'cos')or(idf'tang')or(idf'exp')or(idf'
ln')or   (idf'arctan')or(idf'int')or(idf'abs')or(idf'sqrt')or(idf'sh')or(idf'ch'
)   or(idf'th')or(idf'arcsin')or(idf'arccos'))   then      begin       f.nature'
idfct'       f.valeuridf       f.gnil       if car'(' then           begin      
     lircar           lirexp(f.d)           if car')' then erreur(3) else lircar
           end         else erreur(4)      end      else      begin      erreur(
5)      end  end    procedure lirfacteur(var ffonction)  forward    procedure  l
irpuissance(var ffonction)  var  hfonction    begin    new(h)h.gffh    f.nature'
puiss'    f.valeur''    new(f.d)    lircar    lirfacteur(f.d)    end    procedur
e lirnombre(var ffonction)  var nbrereal   begin   idfcarcar'0'   while ((car in
 '0'..'9') and (length(idf)10)) do     begin     lircar     idfidf+car     end  
  if car'.' then begin                        car'0'                     while (
(car in '0'..'9') and (length(idf)10)) do                        begin          
             NABCDEFGHI   lircar                        idfidf+car              
          end                     end    idfcopy(idf,1,length(idf)-1)    val(idf
,nbre,result)    if result0 then erreur(6)      else       begin       f.nature'
nombre'       f.valeuridf       f.dnil       f.gnil       end    end    procedur
e  lirfacteur   begin      case car of      'p'  lirpara(f)      'x'  lirx(f)   
   '('  begin            lircar            lirexp(f)            if car')' then e
rreur(7) else lircar            end      '+','-','0'..'9' lirnombre(f)      'a'.
.'w','y','z' liridfct(f)    else      erreur(8)      end      while car'' do lir
puissance(f)   end    procedure  lirterme(var ffonction)  var  hfonction    begi
n      lirfacteur(f)      while car in '*','/' do     begin      new(h)h.gffh   
   if car'*' then f.nature'multi' else f.nature'divise'      f.valeurcar      ne
w(f.d)      lircar      lirfacteur(f.d)     end    end    procedure  lirexp  var
  hfonction  begin     new(f)     if car in '+','-' then     begin       if car'
+' then           f.nature'plus' else f.nature'moins'           f.valeurcar     
      f.gnil           new(f.d)           lircar           lirterme(f.d)     end
     else           lirterme(f)     while car in '+','-' do       begin       ne
w(h)h.gf       fh       if car'+' then f.nature'plus' else f.nature'moins'      
 f.valeurcar       new(f.d)       lircar       lirterme(f.d)       end     end  
  procedure lirfonction  begin    if fnil then relache(f)    writeln('Entrez vot
re fonction')     lircar     lirexp(f)    if carchr(13) then erreur(9)  end    p
rocedure tempo  begin  writeln  gotoxy(1,25)write('appuyez une touche pour reven
ir au menu')  while not keypressed do  end      ******  QUELQUES EXPLICATIONS SU
R LES FICHIERS SOURCES *******      Les fonctions numeriques sont mises sous for
me d'un arbre       par exemple pour f1(x)3*x*(x-2)       nous aurons l'arbre   
         *           qui permettra tout le calcul                               
   /        formel  necessaire          /            a l'etude de cette fonction
                                *       -     calcul de valeurs         /      /
      pour le graphe, developpement                              /      /       
 de ce polynome          3     x  x    2    ecriture de sa derivee.....      Pou
r representer cet arbre, utilisation de pointeurs definis comme       fonction p
ointeur a 4 composants          nature      une chaine indiquant la nature du no
eud          valeur      valeur numerique pour nombre,                       num
ero du parametre...          droit       adresse du pointeur de droite          
gauche      adresse du pointeur de gauche.      Les declarations relatives a ces
 pointeurs sont dans           FONCTION.PAS et COURBE.PAS      ******** ENTREE D
'UNE FONCTION **************************************      C'est le fichier LIREF
ONC.PAS      Il comprend les diverses procedures pour l'entree des elements    d
'une fonction.      L'articulation des procedures respecte la syntaxe des foncti
ons    numeriques.       Expression algebrique        ----- + ----              
                               ------------------------------ Terme ------------
-------                                                 /                       
  /                             ----- - ----       -------- + ---------         
                                          /                           /         
                                           -------- - ---------       Terme     
      ------------------------- Facteur ----------------                        
                                /                            /                  
                         NABCDEFGHI                ---------- * -----------     
                                                   /                            
/                                                         ---------- / ---------
--     Facteur              ----------------- Nombre -------------------        
                                                  /          /                  
                                         ---------------- Parametre ------------
-----                                                          /          /     
                                                      ---------- ( -- Exp.Algeb.
-- ) ---------                                                          /       
   /                                                  -------                   
                              --------------          /                         
                                                                                
/            ------------------- x ----------------------          /            
                                                                                
             /            ---------------- Puissance -----------------          
/                                                                               
                          /            --- Id.fonction-- ( -- Exp.Alg.-- ) ---  
         Parametre         ------ p ----- ( --- Entier non signe --- ) ---------
         Puissance         ----------- Facteur ------  ----- Facteur -----------
-        ********** Calcul et ecriture des fonctions ***********************    
  C'est le fichier CALCULF.PAS      Avec les procedures pour         ecrire la f
onction Tapefonction         calculer f(x)  Calculf                 avec tests p
our savoir si le calcul est possible         simplifier la fonction Simplif     
   **************** Calcul Formel *************************************      Pou
r les developpements de produits ou de puissances     function   menuinteger    
begin  clrscr  writelnwriteln(' M E N U ')  writelnwriteln('1 Entree de la fonct
ion')  writelnwriteln('2 Calcul de valeurs de f(x)')  writelnwriteln('3 Graphes 
de fonctions')  writelnwriteln('4 Fin du programme')  writelnwriteln(' VOTRE CHO
IX ')  repeat  read(kbd,car)  until ((car'0') and (car'5'))  val(car,choix,resul
t)  menuchoix  end    function numfoncinteger  var jklinteger    begin  car' '  
repeat  read(kbd,car)  until ((car'0') and (car''))  writeln  val(car,jkl,result
)  numfoncjkl  end    procedure  graphe(revoirinteger)  forward    procedure bou
cle  var zinteger  begin  repeat  choixmenu  case choix of   1    begin         
write('No de la fonction (1 a 9)')         inumfonc         clrscrcar' '        
 lirfonction(fi)         simplif(fi)         tempo         end   2    begin     
    clrscrwrite('No de la fonction (1 a 9)')         inumfonc         if mi0 the
n         begin         for     fichier ALGEBRE.PAS      avec algebrique pour le
s produits         binome pour les puissances      Pour l'ecriture des fonctions
 derivees       fichier DERIVEE.PAS       ************* Menus, Graphes, Developp
ements limites ***************      Ces procedures n'ont que peu d'importance...
..............       ***********************************************************
***************    s(' ',f.valeur)0 do delete(f.valeur,1,1)        end        f.
nature'nombre'        f.gnilf.dnilresult1          end          else     if ((f.
valeur'*') and (f.d.nature'nombre') and (f.d.valeur'1'))             then begin 
                      ff.g                       simplif(f)result1              
     end         else     if ((f.valeur'*') and (f.g.nature'nombre') and (f.g.va
leur'1'))             then begin                       ff.d                     
  sfunction calcul(ffonctionxreal)real  forward    function oppose(var ffonction
)fonction  forward    function  tapefonction(ffonctionvchar)str200  forward    p
rocedure simplif(var ffonction)  var hfonctionnbrereal  begin  if fnil then    b
egin     if ((f.d.nature'nombre')and(f.g.nature'nombre')and(f.valeur'/'))      t
hen     begin           nbrecalcul(f,0)if frac(nbre)0 then str(round(nbre),f.val
eur)        else        begin        str(nbre83,f.valeur)        while po  NABCD
EFGHIs(' ',f.valeur)0 do delete(f.valeur,1,1)        end        f.nature'nombre'
        f.gnilf.dnilresult1          end          else     if ((f.valeur'*') and
 (f.d.nature'nombre') and (f.d.valeur'1'))             then begin               
        ff.g                       simplif(f)result1                   end      
   else     if ((f.valeur'*') and (f.g.nature'nombre') and (f.g.valeur'1'))     
        then begin                       ff.d                       simplif(f)re
sult1                   end         else     if (((f.valeur'*') or(f.valeur'/'))
and (((f.g.nature'nombre')      and (f.g.valeur'0')) or (f.gnil)))      then    
        begin                fnilresult1             end         else     if ((f
.valeur'*') and (((f.d.nature'nombre') and (f.d.valeur'0'))     or (f.dnil))) th
en            begin                fnilresult1             end         else     
if ((f.valeur'*') and (f.g.nature'nombre') and (f.d.valeur'*')     and (f.d.g.na
ture'nombre'))     then begin hf.df.df.gf.gh                hf.g.df.g.df.df.dhsi
mplif(f.d)simplif(f)                result1          end         else    if (((f
.nature'plus') or (f.nature'moins')) and ((f.dnil)    or (f.d.valeur'0')))    th
en      begin            ff.g            simplif(f)result1      end             
           else      if (((f.nature'plus') or (f.nature'moins')) and       ((f.g
nil) or (f.g.valeur'0')))      then         begin               if f.valeur'-' t
hen foppose(f.d) else               ff.d               simplif(f)result1        
 end                   else      if ((f.nature'puiss') and (f.d.nature'nombre') 
      and (f.d.valeur'1'))      then      begin            ff.g            simpl
if(f)result1       end       else      if ((f.nature'puiss')and(f.d.nature'nombr
e')and      (f.g.nature'puiss')and(f.g.d.nature'nombre')) then       begin      
     new(h)h.nature'multi'h.valeur'*'h.df.dh.gf.g.d           f.dhf.gf.g.gsimpli
f(f.d)result1       end       else       begin       if f.dnil then simplif(f.d)
       if f.gnil then simplif(f.g)     end     end   end    function   exposant(
k,lreal)real  forward    function   calcul  label fincalcul  var nbrerealresulta
tinteger  begin    if f.nature'nombre' then                                begin
                                val(f.valeur,nbre,resultat)                     
           calculnbre                                end                        
         else    if f.nature'param' then                                begin   
                             val(f.valeur,indice,resultat)                      
          calculpindice,i                                end                    
            else    if f.nature'variab' then calculx else    if f.nature'plus' t
hen calculcalcul(f.g,x)+calcul(f.d,x) else    if f.nature'moins' then calculcalc
ul(f.g,x)-calcul(f.d,x) else    if f.nature'multi' then calculcalcul(f.g,x)*calc
ul(f.d,x) else    if f.nature'puiss' then                       begin           
                   if frac(calcul(f.d,x))0 then                              cal
culexposant(calcul(f.g,x),calcul(f.d,x))                              else      
                      begin                              if calcul(f.g,x)0 then 
                                                  begin                         
                            definifalse                                         
            goto fincalcul                                                    en
d                                                       else                    
          calculexp((ln(calcul(f.g,x)))*calcul(f.d,x))                          
  end                       end                               else    if f.natur
e'divise' then                              begin                              i
f calcul(f.d,x)0 then begin                                                     
definifalse                                                     goto fincalcul  
                                                   end                          
                              else                               calculcalcul(f.
g,x)/calcul(f.d,x)                              end                             
  else    if f.nature'idfct' then                              begin            
                   nbrecalcul(f.d,x)             NABCDEFGHIprocedure drawr(x,yin
teger)  begin    inline($2A/x/$EB/$2A/y/$cd/$5a/$fc/$F9/$BB)  end    procedure d
raw(x,yinteger)  begin    inline($2A/x/$EB/$2A/y/$cd/$5a/$fc/$F6/$BB)  end    pr
ocedure grafmove(x,yinteger)  begin    inline($2A/x/$EB/$2A/y/$cd/$5a/$fc/$C0/$B
B)  end    procedure grafmover(x,yinteger)  begin    inline($2A/x/$EB/$2A/y/$cd/
$5a/$fc/$c3/$BB)  end    procedure plot(x,yinteger)  begin    inline($2A/x/$EB/$
2A/y/$cd/$5a/$fc/$EA/$BB)  end    procedure plotr(x,yinteger)  begin    inline($
2A/x/$EB/$2A/y/$cd/$5a/$fc/$ED/$BB)  end    procedure origin(x,yinteger)  begin 
   inline($2A/x/$EB/$2A/y/$cd/$5a/$fc/$C9/$BB)  end    procedure border(v1,v2byt
e)  begin    inline($3a/v1/$47/$3a/v2/$4f/$cd/$5a/$fc/$38/$bc)  end    function 
 test(x,yinteger)byte  var  btgbyte  begin  inline($2A/x/$EB/$2A/y/$CD/$5A/$FC/$
F0/$BB/$32/btg)  testbtg  end      procedure  vidage  var  x,y,j,ninteger  begin
  write(lst,chr(27),'',chr(27),'3',chr(21))  for y0 to 28 do    begin    write(l
st,chr(27),'*',chr(3),chr(0),chr(5))    for x0 to 639 do      begin      n0     
 for j0 to 6 do      nn*2+test(x,398-(y*7+j)*2)      write(lst,chr(n),chr(n))   
   end    write(lst,chr(13),chr(10))    end  write(lst,chr(13),chr(27),'')  end 
   l0 then begin ll+1exposant(1/k)*exposant(k,l) end  end      s(' ',f.valeur)0 
do delete(f.valeur,1,1)        end        f.nature'nombre'        f.gnilf.dnilre
sult1          end          else     if ((f.valeur'*') and (f.d.nature'nombre') 
and (f.d.valeur'1'))             then begin                       ff.g          
             simplif(f)result1                   end         else     if ((f.val
eur'*') and (f.g.nature'nombre') and (f.g.valeur'1'))             then begin    
                   ff.d                       s Copyright (C) 1985 BORLAND IncBZ
enithder CPC464/664P  Y  ELMKqp7#  ok!!"#($ +*!5!*!!(2!5(2!!!OO!*!!45(! +/0y0( d
!k5!5o&((  *"x2y(28!"9!!og2""22 9/4*9 Co&£ (!eA8Q0G x!w# ( (*(.(w. !h6# ((*((w# 
w# 8 ! .,*a ''72*B "og"22! ""*B"Ru*"#V##V#N#FO/o&9O/o&9!9( (G!9 w#Ew8OCA#0w#xo&9
xG7s#r#s#r#q#px!D9N#8y#(Ox!D9N##Vh&D9! 9! 9#Vh&D9!"x/o&9p#HR' RB0' RqRR!+R!+r!+r
!+r!#r!+TKB!z S))0  DMgojB07 Hz5a)az 0Ggo/g/o#o&KxAJSJDM!b"!6J"DM'd  R0 0w#$O! #
08) 8  ! 80T))  T)y&#9N8w!DB9+O#) W8(8J9To9yk-&9w&#9o&!T9K#C#y8O(#  !#!9RO8 (8wP
TOsOS!988xW8/oz88x8&8#(*BPOz(Ox8(*!9O!T9-fl&!T96#w!T9K#C#( x #  )   '   '  x  T(
0Dz, ( 0%, 7 (8x - r8x   ,-xGrM9r.#n0 - nx ,-(-G,-rM  NABCDEFGHI9.8 u+-(08x , 78
88ox!oGOWggzWyOxGgzWyOxGxyzxxx(r(r7 g£zWyOxG  x' /o   - 0- ,l8 4 x(  -8 -8, l8*!
 ! 4  ---   ,,,-xGg+2n*8t  z,-' x' .  ,   ! 4,-  o&0%,   gr.8cI$IL*x 0G,,-(- !I0
  o8 ' m.1pF,t6!wS.z%FXcur1x(8 !J0.O!s8 n  s    .n  0 - OT0j oD,j !I.8cI$IL!  I 
nn      nfVNF!DLTI!!53!r1!! x  #- ox(-  (x8(z,zi!' r)(DMbo88x(08W!Oz k68x(-(ay( 
z(.( E+(Dg-/ 0p## +0w#,- 60#ogM wD05.(z x0w#xG%%ZJDM% 65+w661#6r. p7#E(!90To&p( 
#+(- #6O#60 #WyOh(yDOyZy0 GD! !ws(    hx-Sx9+zzgZJDM0,7o #yO!9i&   #w#/w#w#!9! E
9!!9(+F!"9!(#2*" "2(  *w*6!$! (( #CONTRMKBDLSTCAUXUSR2i*0*(q##pZ*( x2*6#"v( * 26
"!"""2""v2"!"(!8O6*"w(6(2(-()(6 (8 0 (* y(#+ (( 66 #6 #"* yo p .##(.6w4. *##55 *
R8*#" £ *#w+#+*('k!0(k!8!-#827kwO$6s  #r$£6 k ((qk( (   k  *O ##.q4((*4q*##62*((
6-#RM8(G A#*'C! !TRUEFALSE!9N#Y#(G#     "(k((!0(!!2Sz0*6##ww#w$w#w ##N#F*B2w#w#s
#r"*-w#ww##""2ZR0*4#42ZR *4 #4(22*f(/G(##++ O x yC! Q*G(##..f*##w  +4 #4x 2G(""*
n*0SZR8*N#F#s#r,0)jS*##w+N#FBr+s2!T)j)00 R!#*#V#N#F##V20*6#-Nw#Fwq#p#6#w#w#w""!D
M!"*B!(2"!"2"*w#wx(9*O *-4 #4!*4 #4*-N#Fq#pV+Bq#pSZR&*s#r$s#rL*L!(!$22L!(*$(!3 1
!(7" 2"S"Ns#FrB(Z#(*"K! !*#"!x * *) 2""!"*  NABCDEFGHInf(HR0nf"  VMDnfutqp*s#r*s
#r"*uKB!0' #fo"*R0RnfR0KqputsrNF(VNFV*SutKqpR*R(wwnfut"6#K*K*!""*NFy(*"*B0Cnf*R*
"*RSs#r#V""6#O"w2x2*"!F""  &y*"*2"*"!F"""!* Nr!6go(R*s#r£2x(sx(TDMx(R0U(O/o&9q# 
(!F0#(  ( #(  ((#( i&T-a%o*!6o&2 2z2*KB" z C  User break+   I/O  Run-time error 
, PC*Not enough memory  Program aborted  '1!d!dBcfunction       derive(ffonction
)fonction  var  p,q,r,s,u,v,wfonction  xxxinteger  nbrereal  begin    new(p)deri
vep    if fnil then begin dispose(p)derivenil end      else    if ((f.nature'nom
bre') or (f.nature'param')) then                            begin               
             p.nature'nombre'                            p.valeur'0'            
                p.dnil                            p.gnil                        
    end                              else    if f.nature'variab' then           
                 begin                            p.nature'nombre'              
              p.valeur'1'                            p.dnil                     
       p.gnil                            end                              else  
  if ((f.nature'plus') or (f.nature'moins')) then                            beg
in                            p.naturef.nature                            p.vale
urf.valeur                            p.dderive(f.d)                            
p.gderive(f.g)                            end                              else 
   if f.nature'multi' then         begin          p.nature'plus'p.valeur'+'new(p
.g)          p.g.nature'multi'p.g.valeur'*'p.g.df.d          new(p.d)p.d.nature'
multi'p.d.valeur'*'p.d.gf.g          p.d.dderive(f.d)p.g.gderive(f.g)         en
d           else    if f.nature'divise' then        begin          new(u)new(v)n
ew(w)new(s)new(q)u.nature'moins'u.valeur'-'          u.gwu.dsv.nature'puiss'v.va
leur''          v.gf.dv.dqq.nature'nombre'q.valeur'2'          q.dnilq.gnilw.nat
ure'multi'w.valeur'*'w.df.d          w.gderive(f.g)          s.nature'multi's.va
leur'*'s.dderive(f.d)s.gf.g          p.nature'divise'p.valeur'/'p.gup.dv        
end          else    if f.nature'puiss' then       begin         if f.d.nature'n
ombre' then               begin                new(u)new(v)new(w)val(f.d.valeur,
nbre,result)qf.d                v.gf.gu.nature'multi'u.valeur'*'u.gq            
    u.dderive(f.g)v.nature'puiss'v.valeur''v.dw                w.nature'nombre'w
.gnilw.dnilnbrenbre-1                if frac(nbre)0 then str(round(nbre),w.valeu
r)                else begin                str(nbre83,w.valeur)                
while pos(' ',w.valeur)0 do delete(w.valeur,1,1)                     end        
        p.nature'multi'p.valeur'*'p.gup.dv               end         else       
      begin              new(u)u.nature'idfct'u.valeur'ln'u.gnilu.df.g          
 new(v)v.nature'multi'v.valeur'*'v.gderive(f.d)v.du          new(w)w.nature'mult
i'w.valeur'*'w.gderive(f.g)w.df.d           new(q)q.nature'divise'q.valeur'/'q.g
wq.df.g           new(r)r.nature'plus'r.valeur'+'r.gvr.dq                 p.natu
re'multi'p.valeur'*'p.grp.df         end       end      else    if f.nature'idfc
t' then      begin        if f.valeur'sin' then          begin           new(u)u
.nature'idfct'u.valeur'cos'u.gnilu.df.d           p.nature'multi'p.valeur'*'p.gd
erive(f.d)p.du          end           else        if f.valeur'cos' then         
 begin           new(v)v.nature'idfct'v.valeur'sin'v.gnilv.df.d           new(u)
u.natur  NABCDEFGHIe'multi'u.valeur'*'new(u.g)           u.g.nature'nombre'u.g.v
aleur'-1'u.g.dnil           u.g.gnilu.dv           p.nature'multi'p.valeur'*'p.g
derive(f.d)p.du          end           else        if f.valeur'tang' then       
   begin           new(s)s.nature'nombre's.valeur'2's.dnils.gnil           new(w
)w.nature'idfct'w.valeur'cos'w.gnilw.df.d           new(v)v.nature'puiss'v.valeu
r''v.gwv.ds           p.nature'divise'p.valeur'/'p.dvp.gderive(f.d)          end
            else        if f.valeur'ln' then          begin           p.nature'd
ivise'p.valeur'/'p.df.dp.gderive(f.d)          end            else        if f.v
aleur'exp' then          begin           new(u)u.nature'idfct'u.valeur'exp'u.gni
lu.df.d           p.nature'multi'p.valeur'*'p.gderive(f.d)p.du          end     
      else        if f.valeur'sqrt' then          begin            new(u)new(v)n
ew(w)w.nature'nombre'w.valeur'2'w.gnil            w.dnilv.nature'multi'v.valeur'
*'v.gwv.df            p.nature'divise'p.valeur'/'p.gderive(f.d)p.dv          end
          else        if f.valeur'sh' then          begin           new(u)u.natu
re'idfct'u.valeur'ch'u.gnilu.df.d           p.nature'multi'p.valeur'*'p.gderive(
f.d)p.du          end          else        if f.valeur'ch' then          begin  
         new(u)u.nature'idfct'u.valeur'sh'u.gnilu.df.d           p.nature'multi'
p.valeur'*'p.gderive(f.d)p.du          end          else        if f.valeur'th' 
then          begin  new(v)v.nature'nombre'v.valeur'2'v.dnilv.gnil           new
(u)u.nature'puiss'u.valeur''u.dvu.gf           new(w)w.nature'nombre'w.valeur'1'
w.dnilw.gnil           new(s)s.nature'moins's.valeur'-'s.gws.du           p.natu
re'multi'p.valeur'*'p.gderive(f.d)p.ds          end          else         if f.v
aleur'arctan' then          begin  new(v)v.nature'nombre'v.valeur'2'v.dnilv.gnil
           new(u)u.nature'puiss'u.valeur''u.dvu.gf.d           new(w)w.nature'no
mbre'w.valeur'1'w.dnilw.gnil           new(s)s.nature'plus's.valeur'+'s.gws.du  
         p.nature'divise'p.valeur'/'p.gderive(f.d)p.ds          end          els
e        if f.valeur'arcsin' then          begin  new(v)v.nature'nombre'v.valeur
'2'v.dnilv.gnil           new(u)u.nature'puiss'u.valeur''u.dvu.gf.d           ne
w(w)w.nature'nombre'w.valeur'1'w.dnilw.gnil           new(s)s.nature'moins's.val
eur'-'s.gws.du           new(r)r.nature'idfct'r.valeur'sqrt'r.gnilr.ds          
 p.nature'divise'p.valeur'/'p.gderive(f.d)p.dr          end          else       
 if f.valeur'arccos' then          begin  new(v)v.nature'nombre'v.valeur'2'v.dni
lv.gnil           new(u)u.nature'puiss'u.valeur''u.dvu.gf.d           new(w)w.na
ture'nombre'w.valeur'1'w.dnilw.gnil           new(s)s.nature'moins's.valeur'-'s.
gws.du           new(r)r.nature'idfct'r.valeur'sqrt'r.gnilr.ds           new(q)q
.nature'nombre'q.valeur'-1'q.gnilq.dnil       new(p.g)p.g.nature'multi'p.g.valeu
r'*'p.g.gderive(f.d)       p.g.dqp.nature'divise'p.valeur'/'p.dr          end   
       else          begin pnildefinifalse end     end     end        else      
  if f.valeur'cos' then          begin           new(v)v.nature'idfct'v.valeur's
in'v.gnilv.df.d           new(u)u.nature'multi'u.valeur'*'new(u.g)           u.g
.nature'nombre'u.g.valeur'-1'u.g.dn   N A B C D E F G H I Copyright (C) 1985 BOR
LAND IncBZenithder CPC464/664P  Y  ELMKqp7#  ok!!"#($ +*!5!*!!(2!5(2!!!OO!*!!45(
! +/0y0( d!k5!5o&((  *"x2y(28!"9!!og2""22 9/4*9 Co&£ (!eA8Q0G x!w# ( (*(.(w. !h6
# ((*((w# w# 8 ! .,*a ''72*B "og"22! ""*B"Ru*"#V##V#N#FO/o&9O/o&9!9( (G!9 w#Ew8O
CA#0w#xo&9xG7s#r#s#r#q#px!D9N#8y#(Ox!D9N##Vh&D9! 9! 9#Vh&D9!"x/o&9p#HR' RB0' RqR
R!+R!+r!+r!+r!#r!+TKB!z S))0  DMgojB07 Hz5a)az 0Ggo/g/o#o&KxAJSJDM!b"!6J"DM'd  R
0 0w#$O! #08) 8  ! 80T))  T)y&#9N8w!DB9+O#) W8(8J9To9yk-&9w&#9o&!T9K#C#y8O(#  !#
!9RO8 (8wPTOsOS!988xW8/oz88x8&8#(*BPOz(Ox8(*!9O!T9-fl&!T96#w!T9K#C#( x #  )   ' 
  '  x  T(0Dz, ( 0%, 7 (8x - r8x   ,-xGrM9r.#n0 - nx ,-(-G,-rM9.8 u+-(08x , 7888
ox!oGOWggzWyOxGgzWyOxGxyzxxx(r(r7 g£zWyOxG  x' /o   - 0- ,l8 4 x(  -8 -8, l8*! !
 4  ---   ,,,-xGg+2n*8t  z,-' x' .  ,   ! 4,-  o&0%,   gr.8cI$IL*x 0G,,-(- !I0  
o8 ' m.1pF,t6!wS.z%FXcur1x(8 !J0.O!s8 n  s    .n  0 - OT0j oD,j !I.8cI$IL!  I nn
      nfVNF!DLTI!!53!r1!! x  #- ox(-  (x8(z,zi!' r)(DMbo88x(08W!Oz k68x(-(ay( z(
.( E+(Dg-/ 0p## +0w#,- 60#ogM wD05.(z x0w#xG%%ZJDM% 65+w661#6r. p7#E(!90To&p( #+
(- #6O#60 #WyOh(yDOyZy0 GD! !ws(    hx-Sx9+zzgZJDM0,7o #yO!9i&  NABCDEFGHI   #w#
/w#w#!9! E9!!9(+F!"9!(#2*" "2(  *w*6!$! (( #CONTRMKBDLSTCAUXUSR2i*0*(q##pZ*( x2*
6#"v( * 26"!"""2""v2"!"(!8O6*"w(6(2(-()(6 (8 0 (* y(#+ (( 66 #6 #"* yo p .##(.6w
4. *##55 *R8*#" £ *#w+#+*('k!0(k!8!-#827kwO$6s  #r$£6 k ((qk( (   k  *O ##.q4((*
4q*##62*((6-#RM8(G A#*'C! !TRUEFALSE!9N#Y#(G#     "(k((!0(!!2Sz0*6##ww#w$w#w ##N
#F*B2w#w#s#r"*-w#ww##""2ZR0*4#42ZR *4 #4(22*f(/G(##++ O x yC! Q*G(##..f*##w  +4 
#4x 2G(""*n*0SZR8*N#F#s#r,0)jS*##w+N#FBr+s2!T)j)00 R!#*#V#N#F##V20*6#-Nw#Fwq#p#6
#w#w#w""!DM!"*B!(2"!"2"*w#wx(9*O *-4 #4!*4 #4*-N#Fq#pV+Bq#pSZR&*s#r$s#rL*L!(!$22
L!(*$(!3 1!(7" 2"S"Ns#FrB(Z#(*"K! !*#"!x * *) 2""!"*nf(HR0nf"  VMDnfutqp*s#r*s#r
"*uKB!0' #fo"*R0RnfR0KqputsrNF(VNFV*SutKqpR*R(wwnfut"6#K*K*!""*NFy(*"*B0Cnf*R*"*
RSs#r#V""6#O"w2x2*"!F""  &y*"*2"*"!F"""!* Nr!6go(R*s#r£2x(sx(TDMx(R0U(O/o&9q# (!
F0#(  ( #(  ((#( i&T-a%o*!6o&2 2z2*KB" z C  User break+   I/O  Run-time error , 
PC*Not enough memory  Program aborted  '1!d!B       if f.valeur'cos' then calcul
cos(nbre) else                  if f.valeur'sin' then calculsin(nbre) else      
            if f.valeur'tang' then begin                                        
  if cos(nbre)0 then begin                                             definifal
se                                             goto fincalcul                   
                          end else                                           cal
culsin(nbre)/cos(nbre)                                            end           
                                 else                  if f.valeur'int' then cal
culint(nbre) else                  if f.valeur'abs' then calculabs(nbre) else   
               if f.valeur'arctan' then calcularctan(nbre) else                 
 if f.valeur'exp' then calculexp(nbre) else                  if f.valeur'ln' the
n                                                   begin                       
                            if nbre0 then                                 NABCDE
FGHI                             begin                                          
                  definifalse                                                   
         goto fincalcul                                                         
   end                                                             else         
                                          calculln(nbre)                        
                           end                                                  
  else                               if f.valeur'sqrt' then                     
                              begin                                             
      if nbre0 then                                                            b
egin                                                            definifalse     
                                                       goto fincalcul           
                                                 end                            
                                  else                                          
         calculsqrt(nbre)                                                   end 
                                                   else                if f.vale
ur'sh' then calcul0.5*(exp(nbre)-exp(nbre*-1))         else   if f.valeur'ch' th
en calcul0.5*(exp(nbre)+exp(nbre*-1))         else   if f.valeur'th' then       
           calcul(exp(nbre)-exp(nbre*-1))/(exp(nbre)+exp(nbre*-1))         else 
  if f.valeur'arcsin' then begin                               if nbre-1 then ca
lcul-0.5*pi else                               if nbre1 then calcul0.5*pi else  
                             if ((nbre-1)or(nbre1)) then                        
       begin definifalsegoto fincalcul                               end  else  
            calcularctan(nbre/sqrt(1-nbre*nbre))              end         else  
               if f.valeur'arccos' then begin                               if n
bre-1 then calculpi else                               if nbre1 then calcul0 els
e                               if ((nbre-1)or(nbre1)) then                     
          begin definifalsegoto fincalcul                               end  els
e              calcul(pi/2)-arctan(nbre/sqrt(1-nbre*nbre))              end     
    else    erreur(10)                              end                         
     else    if fnil then calcul0    fincalcul  end    function  tapefonction  v
ar  www,wwxstr200  coeffrealresultatinteger  formatstr10  begin  if f.nature'idf
ct' then  tapefonctionf.valeur+'('+tapefonction(f.d,v)+')' else  if f.nature'nom
bre' then  tapefonctionf.valeur else  if f.nature'param' then  tapefonction'p('+
f.valeur+')' else  if f.nature'variab' then  tapefonctionv else  if ((f.nature'p
lus') or (f.nature'moins')) then      begin      wwwtapefonction(f.d,v)wwxtapefo
nction(f.g,v)      if (((f.d.valeur'+')or(f.d.valeur'-'))and(f.valeur'+')) then 
      begin       delete(www,1,1)delete(www,length(www),1)       end      ifn, !
"*#V!Eo!*!z!*s#r!*+)!s#r " !" Erreur de syntaxe a l'entree n. *!& !*+)"!!*+)! "!
!!D *&!  O*&! oE!*&" "!!*&e. !*&!0!9O!£!£oE"!!*&e. !j"!!!£!Rk !"!"!*&!(E#!x!#M"*
&!)E#!x!#*#VMparam*#V! *#V!s#r*#V!s#r!!!!*+)#V*E#!*+)*s#r!" !"*#VMvariab*#V!xe. 
*#V!s#r*#V!s#r! "* !w"*&e. !*&!a!zO!£!£oE$!!*&e. !t$!!!£!Rk !!Msin!Mcoso!Mtango!
Mexpo!Mlno!Marctano!Minto!Mabso!Msqrto!Msho!Mcho!Mtho!Marcsino!MarccosoE&*#VMidf
ct*#V! *#V!s#r*&!(E&!*#VO$*&!)E&!x!&!&!x!&!x! w"(!k"u!k!*k*u#Vs#r*k*us#r*u#VM   
N A B C D E F G H Ipuiss*u#V!e. *u#V!!*u#V&k"!"i*&e. !!02*&!0!9O!£! £oE'!!*&e. !
z'*&!.E5(!02*&!0!9O!£! £oE5(!!*&e. !'!!!£!Rk !!!!*!E(!x!(*i#VMnombre*i#V! *i#V!s
#r*i#V!s#r" !Q"Y*&pR)*Y")xR")*Y#)(RX)!*YO$*&!)ER)!x!U)!)+R)-R)0 RB)*YQ')aRB)yR)z
R)*YR$)!x!*&!E)*Y&) Q"!E"O*O&*&!*!/OE*!E!*E*O#Vs#r*E*Os#r*&!*Ej**O#VMmulti**O#VM
divise*O#V*&e. *O#V!!*O#V&)E"!9"C*C!*&!+!-OE+*&!+E-+*C#VMplusC+*C#VMmoins*C#V*&e
. *C#V!s#r*C#V!!*C#V)+*C)*&!+!-OEe,!9!*9*C#Vs#r*9*Cs#r*&!+E,*C#VMplus$,*C#VMmoin
s*C#V*&e. *C#V!!*C#V)+9" !/"7*7#V!E,*7"!Entrez votre fonction !*7O$*&! E,!x! /"!
' !!'appuyez une touche pour revenir au menu oED-5-'"86"D!"%*%#V!E,6*%#V#VMnombr
e*%#V#VMnombre£o*%#V!/e.£oE.*%#V!M-!!,4!E.!,!*%#V .!,!!*%#V ! e.*%#V!E.*%#V!!.*%
#VMnombre*%#V!s#r*%#V!s#r!",6*%#V!*e.*%#V#VMnombre£o*%#V#V!1e.£oEm/*%#V#V*%s#r*%
V-!",6*%#V!*e.*%#V#VMnombre£o*%#V#V!1e.£oE/*%#V#V*%s#r*%V-!",6*%#V!*e.*%#V!/e.o*
%#V#VMnombre*%#V#V!0e.£o*%#V#V!o£oE0!*%s#r!",6*%#V!*e.*%#V#VMnombre*%#V#V!0e.£o*
%#V#V!o£oE1!*%s#r!",6*%#V!*e.*%#V#VMnombre£o*%#V#V!*e.£o*%#V#V#VMnombre£oE2*%#V#
V"*%#V*%#V#Vs#r*%#V*s#r*%#V#V#V"*%#V#V*%#V#Vs#r*%#V*s#r*%#VV-*%V-!",6*%#VMplus*%
#VMmoinso*%#V#V!*%#V#V!0e.o£oE)3*%#V#V*%s#r*%V-!",6*%#VMplus*%#VMmoinso*%#V#V!*%
#V#V!0e.o£oE3*%#V!-e.E3*%#VP-*%s#r3*%#V#V*%s#r*%V-!",6*%#VMpuiss*%#V#VMnombre£o*
%#V#V!1e.£oE4*%#V#V*%s#r*%V-!",6*%#VMpuiss*%#V#VMnombre£o*%#V#VMpuiss£o*%#V#V#VM
z1 to mi do         begin         write('Valeur du parametre n.')write(z)write('
 ')readln(pz,i)         end         end         calculfonction(fi)         end  
 3    graphe(0)    end  until choix4  end    me')  writelnwriteln(' VOTRE CHOIX 
')  readln(choix)menuchoix  end    function numfoncinteger  var jinteger    begi
n  car' '  repeat  read(kbd,car)  until ((car'0') and (car''))  writeln(car)  va
l(car,j,result)  numfoncj  end      NABCDEFGHInombre£oE5!!Mmulti**!*e. **%#V#Vs#
r**%#V#V#Vs#r*%#V*s#r*%#V*%#V#V#Vs#r*%#VV-!",6*%#V#V!E6*%#VV-*%#V#V!E,6*%#VV-"&I
!!" * MnombreE6* !!!,!* MparamE6* !!!*+)))))*+)T),!* MvariabE7!,!* MplusEm7* #V!
,M-* #V!,M-!* MmoinsE7* #V!,M-* #V!,M-!* MmultiE#8* #V!,M-* #V!,M-!* MpuissE19* 
#V!,M-4!E8* #V!,M-* #V!,M-56!.9* #V!,M-!E8!2.9* #V!,M-+ * #V!,M- !* MdiviseE9* #
V!,M-!E9!29* #V!,M-* #V!,M-!* MidfctE* #V!,M-!* McosE)!,!* MsinEU!,!* MtangE!,!E
!2!,!,!* MintE!,!* MabsE!,!* MarctanEF!,F!* MexpEr!, !* MlnE!,!E!2!,+ !* MsqrtE!
,!E!2!,F!* MshE!!, !,! !* MchE!!, !,! !* MthE!, !,! !, !,! !* MarcsinE!,!E!!!I!!
,!E!!!I!!,!!,!oEA!2!,!!,!,FF!* MarccosE!,!E!!I!!,!E!!!,!!,!oE!2!!I!!,!!,!,FF!! x
!* !E!!!,"!2"*MidfctEE*!(e.*#V*&S-!)e.!D*MnombreEr*!D*MparamEMp(*!)e.!D*MvariabE
*&e.!D*Mplus*MmoinsoExC*#V*&S-!*#V*&S-!*#V!+e.*#V!-e.o*!+e.£oEA!!!!!£!*#V!+e.*#V
!-e.oE%B!!!!!£!!!*#VMnombreEnB*#V!!*#V!*e.*#V#VMnombre£oEB*#V#V!!*!+e.!,!£oEC!(!
!!)e.!uC!(!*!!)e.!D*Mdivise*Mmultio*MpuissoED*#V*&S-**#V*&S-!DM!!"!"*#V!*e.*#V#V
Mnombre£oED!!Mmulti**!*e. **#V#Vs#r**#VP-s#r*"I*#V!*e.*function calcul(ffonction
xreal)real  forward    function oppose(var ffonction)fonction  forward    functi
on  tapefonction(ffonctionvchar)str200  forward    procedure simplif(var ffoncti
on)  var hfonctionnbrereal  begin  if fnil then    begin     if ((f.d.nature'nom
bre')and(f.g.nature'nombre')and(f.valeur'/'))      then     begin           nbre
calcul(f,0)if frac(nbre)0 then str(round(nbre),f.valeur)        else        begi
n        str(nbre83,f.valeur)        while po  NABCDEFGHIs(' ',f.valeur)0 do del
ete(f.valeur,1,1)        end        f.nature'nombre'        f.gnilf.dnilresult1 
         end          else     if ((f.valeur'*') and (f.d.nature'nombre') and (f
.d.valeur'1'))             then begin                       ff.g                
       simplif(f)result1                   end         else     if ((f.valeur'*'
) and (f.g.nature'nombre') and (f.g.valeur'1'))             then begin          
             ff.d                       simplif(f)result1                   end 
        else     if (((f.valeur'*') or(f.valeur'/'))and (((f.g.nature'nombre')  
    and (f.g.valeur'0')) or (f.gnil)))      then            begin               
 fnilresult1             end         else     if ((f.valeur'*') and (((f.d.natur
e'nombre') and (f.d.valeur'0'))     or (f.dnil))) then            begin         
       fnilresult1             end         else     if ((f.valeur'*') and (f.g.n
ature'nombre') and (f.d.valeur'*')     and (f.d.g.nature'nombre'))     then begi
n hf.df.df.gf.gh                hf.g.df.g.df.df.dhsimplif(f.d)simplif(f)        
        result1          end         else    if (((f.nature'plus') or (f.nature'
moins')) and ((f.dnil)    or (f.d.valeur'0')))    then      begin            ff.
g            simplif(f)result1      end                        else      if (((f
.nature'plus') or (f.nature'moins')) and       ((f.gnil) or (f.g.valeur'0'))) i,
 !"£*£#V!En!*£!z!*£s#r!*)!s#r " !" Erreur de syntaxe a l'entree n. *!& !*)"!!*)!
 "!!!£D *£&!  O*£&! oE!*£&" "!!*£&e. !*£&!0!9O!£!£oE"!!*£&e. !g"!!!£!Rk !"!u"!*£
&!(E#!w!#J"*£&!)E7#!w!#*#VMparam*#V! *#V!s#r*#V!s#r!!u!!*)#V*uE#!*)*us#r!u" !k"s
*s#VMvariab*s#V!xe. *s#V!s#r*s#V!s#r! k"* !a"i*£&e. !*£&!a!zO!£!£oE$!!*£&e. !o$!
!!£!Rk !!Msin!Mcoso!Mtango!Mexpo!Mlno!Marctano!Minto!Mabso!Msqrto!Msho!Mcho!Mtho
!Marcsino!MarccosoE&*i#VMidfct*i#V! *i#V!s#r*£&!(E&!*i#VJ$*£&!)E&!w!&!&!w!&!w! a
"(!U"!U!*U*#Vs#r*U*s#r*#VMpuiss*#V!e. *#V!!*#V&U"!E"S*£&e. !!02£*£&!0!9O!£! £oE'
!!*£&e. !u'*£&!.E0(!02£*£&!0!9O!£! £oE0(!!*£&e. !'!!!£!Rk !!!E!*!E(!w!(*S#VMnomb
re*S#V! *S#V!s#r*S#V!s#rE" !"C*£&pR)*C")xR)*C#)(RS)!*CJ$*£&!)EM)!w!P)!)+Rw)-Rw)0
 RB)*CL')aRB)yR)zR)*CM$)!w!*£&!E)*C&) "!/"9*9&*£&!*!/OE*!/!*/*9#Vs#r*/*9s#r*£&!*
Ee**9#VMmulti**9#VMdivise*9#V*£&e. *9#V!!*9#V&)/"!#"-*-!*£&!+!-OE+*£&!+E(+*-#VMp
lus+*-#VMmoins*-#V*£&e. *-#V!s#r*-#V!!*-#V)+*-)*£&!+!-OE,!#!*#*-#Vs#r*#*-s#r*£&!
+E,*-#VMplus,*-#VMmoins*-#V*£&e. *-#V!!*-#V)+#" !"!*!#V!E,*!"!Entrez votre fonct
ion !*!J$*£&! E,!w! "! !!  NABCDEFGHI'appuyez une touche pour revenir au menu oE
-0-"36D!"*#V!E'6*#V#VMnombre*#V#VMnombre£o*#V!/e.£oE.*#V!H-!!,4!E5.!,!*#V .!,!!*
#V ! e.*#V!E.*#V!!V.*#VMnombre*#V!s#r*#V!s#r!"'6*#V!*e.*#V#VMnombre£o*#V#V!1e.£o
Eh/*#V#V*s#r*Q-!"'6*#V!*e.*#V#VMnombre£o*#V#V!1e.£oE/*#V#V*s#r*Q-!"'6*#V!*e.*#V!
/e.o*#V#VMnombre*#V#V!0e.£o*#V#V!o£oE0!*s#r!"'6*#V!*e.*#V#VMnombre*#V#V!0e.£o*#V
#V!o£oE1!*s#r!"'6*#V!*e.*#V#VMnombre£o*#V#V!*e.£o*#V#V#VMnombre£oE2*#V#V"*#V*#V#
Vs#r*#V*s#r*#V#V#V"*#V#V*#V#Vs#r*#V*s#r*#VQ-*Q-!"'6*#VMplus*#VMmoinso*#V#V!*#V#V
!0e.o£oE$3*#V#V*s#r*Q-!"'6*#VMplus*#VMmoinso*#V#V!*#V#V!0e.o£oE3*#V!-e.E3*#VK-*s
#r3*#V#V*s#r*Q-!"'6*#VMpuiss*#V#VMnombre£o*#V#V!1e.£oE4*#V#V*s#r*Q-!"'6*#VMpuiss
*#V#VMnombre£o*#V#VMpuiss£o*#V#V#VMnombre£oE5!!Mmulti**!*e. **#V#Vs#r**#V#V#Vs#r
*#V*s#r*#V*#V#V#Vs#r*#VQ-!"'6*#V#V!E5*#VQ-*#V#V!E'6*#VQ-"!H!!"*MnombreE6*!!!,!*M
paramE6*!!!*+))))))*)T),!*MvariabE7!,!*MplusEb7*#V!,H-*#V!,H-!*MmoinsE7*#V!,H-*#
V!,H-!*MmultiE8*#V!,H-*#V!,H-!*MpuissE&9*#V!,H-4!E8*#V!,H-*#V!,H-06!#9*#V!,H-!E8
!2#9*#V!,H-+ *#V!,H- !*MdiviseE9*#V!,H-!Ex9!29*#V!,H-*#V!,H-!*MidfctE*#V!,H-!*Mc
osE!,!*MsinEJ!,!*MtangE!,!E!2!,!,!*MintE!,!*MabsE!,!*MarctanE!,F!*MexpEg!, !*Mln
E!,!E!2!,+ !*MsqrtE!,!E!2!,F!*MshEp!!, !,! !*MchE!!, !,! !*MthEU!, !,!  procedur
e  graphe    var  xo,yo,xxd,xxa,ux,uy,pasreal  xp,yp,nbfonc,z,bk,index,choixbisi
nteger  precedeboolean  fx,fyarray1..10 of integer  ldaarray1..20 of real  begin
   clrscr    if revoir0 then    begin     writeln('1-Courbe yf(x)')writeln     w
riteln('2-Courbe xf(t)yf(t)')writeln     writeln('3-Courbe polaire rf(t)')writel
n     write('Votre choix ')     repeat     read(kbd,car)     until ((car'0') and
 (car'4'))     writeln     val(car,choix,result)     writeln    e  NABCDEFGHInd 
   writeln    write('Abscisse origine ')readln(xo)    write('Ordonnee origine ')
readln(yo)    write('Borne inferieure int d''etude ')readln(xxd)    write('Borne
 superieure int d''etude ')readln(xxa)    write('Unite abscisse ')readln(ux)    
write('Unite ordonnee ')readln(uy)    write('Pas d''etude ')readln(pas)    if re
voir0 then   begin    write('Nombre de graphes sur le meme ecran (1 a 9)')    nb
foncnumfonc    index0    for z1 to nbfonc do    begin     case choix of      1 b
e$A-  program     courbe  type   fonctionsommet   sommetrecord                na
turestring6                valeurstring10                d fonction             
   g fonction          end   str200string250   str10string10  const   filtreset 
of char'+','*','-','/','','.','(',')','a'..'z','0'..'9'    var   farray1..10 of 
fonction   carchar   idfstring10   i,j,resultinteger   indice,choixinteger   par
ray1..3,1..10 of real   marray1..10 of integer   definiboolean   x,resultatreal 
   $I lirefonc.pas  $I calculf.pas  $I algebre.pas  $I derivee.pas  $I menu.pas 
   begin  for i1 to 10 do begin finilmi0 end  boucle  end.  begin    new(u)u.nat
ure'multi'u.valeur'*'u.df.d    u.goppose(f.g)opposeu   end   else  if ((f.valeur
'x') or (f.valeur'')) then   begin    new(u)u.nature'multi'u.valeur'*'u.df    ne
w(v)v.nature'nombre'v.valeur !, !,! !*MarcsinEx!,!E!!!I!u!,!E!!!I!u!,!!,!oE6!2u!
,!!,!,FF!*MarccosE!,!E!!I!!,!E!!!,!!,!oE0!2!!I!!,!!,!,FF!! w!*!E!!!,"!2"*MidfctE
*!(e.*#V*&N-!)e.!D*MnombreEg*!D*MparamEMp(*!)e.!D*MvariabE*&e.!D*Mplus*MmoinsoEm
C*#V*&N-!*#V*&N-!*#V!+e.*#V!-e.o*!+e.£oEA!!!!!£!*#V!+e.*#V!-e.oEB!!!!!£!!!*#VMno
mbreEcB*#V!!*#V!*e.*#V#VMnombre£oEB*#V#V!!*!+e.!,!£oE2C!(!!!)e.!jC!(!*!!)e.!D*Md
ivise*Mmultio*MpuissoEC*#V*&N-**#V*&N-!DM!!"!"*#V!*e.*#V#VMnombre£oED!!Mmulti**!
*e. **#V#Vs#r**#VK-s#r*"H*#V!xe.*#V!e.oEE!!Mmulti**!*e. **#Vs#r!!Mnombre**M-1 *!
s#r*!s#r**s#r*"H*#VMnombreEF!!Mnombre**!s#r*!s#r*#V!!!,!!!,4!EF!,!* F!,! !* ! e.
*!EF*!!£F*"H*#V!+e.EnG!!Mplus**!+e. **#VK-s#r**#VK-s#r*"H*#V!-e.EG!!Mplus**!+e. 
**#VK-s#r**#V#Vs#r*"H*#V!EH!"*"!!!!,"!,!EyH!!ZI*!EH!!ZI*!EH!,!!!,!,!,06!ZI*!  NA
BCDEFGHIEZI!,!!!!,!,!,06!!," !" valeur de x  !r !2*!,H-!!,4!EI!,!! J!,!!! *&!EJ!
f"*!&!("!!) !,4!EJ!,!! J!,!!! !! J!f"*!&!("!!) n'est pas definie #1 Un autre x 2
 Retour au menu  !!£D *£&!1*£&!2oE)K*£&e.!! *!EI " !r  M E N U   1 Entree de la 
fonction  2 Calcul de valeurs de f(x)  3 Graphes de fonctions  4 Fin du programm
e   VOTRE CHOIX  !!£D *£&!0*£&!5£oEL*£&e.!!*"z*z r"!f! 2£!!£D *£&!0*£&!£oEM *£&e
.!f!*f"p*pf"Q !K"*RMNo de la fonction (1 a 9) L"! 2£!*)!!*)Q-,NRNNo de la foncti
on (1 a 9) L"!*)#V!EN!!*)#VfzN"Valeur du parametre n. *!&   !*+))))))*)T)r *#AN!
*)#VjINRN!eM*!EqM "!P"X"Z*Z*XZP"!D"L"N*N*LZD"!8""B*B*Z8"!,"4"6*6*4Z,"! "("****(Z
 "!""**Z"!""**Z" !22GOZ8 "!""**Z2*&2*&"!!!"!"!"!3"!" !!fzQ"!!"!*"!"!"!" !!fzQ"!"
!!fzaQ"*!*!*!*!RHP"*#Q!*"*" *#P!! "! " *#P!! "!"!" "!"*!ER1-Courbe yf(x)  2-Cour
be xf(t)yf(t)  3-Courbe polaire rf(t)   Votre choix  !!£D *£&!0*£&!4£oEzR *£&e.!
!  Abscisse origine  !r Ordonnee origine  !r Borne inferieure int d'etude  !r Bo
rne superieure int d'etude  !r Unite abscisse  !r Unite ordonnee  !r Pas d'etude
  !r *!EZ,Nombre de graphes sur le meme ecran (1 a 9) L"!"!*fzZ"*RUNo de la fonc
tion yf(x) n.*!&  !*+)Ls#r!!*+)#V)#V!E!U!!*+)#V)!!!*+)#V)!*)#Vs#r!!*+)#V)#V!EU!!
!*+)#V)#VfzU"*!"Valeur du parametre n.*!&  !*+)T)r *#jU£ZR6YNo de la fonction xf
(t) n.*!&  !*+)Ls#r!!*+)#V)#V!EV!!*+)#V)!!!*+)#V)!*)#Vs#r!!*+)#V)#V!EW!!!*+)#V)#
VfzW"*!"Valeur du parametre n.*!&  !*+)T)r *#VNo de la fonction yf(t) n.*!&  !u*
+)Ls#r!!u*+)#V)#V!EW!!u*+)#V)!!!u*+)#V)!*)#Vs#r!u*+)#V!*+)#VEX!u*+)!s#r!!)!!*+)#
V)#Vs#r!!)!!*+)#V)#Vs#r!!u*+)#V)#V!E3Y!!!u*+)#V)#Vfz3Y"*!"Valeur du parametre n.
* ((f.g.valeur'+')or(f.g.valeur'-')) then       begin       delete(wwx,1,1)delet
e(wwx,length(wwx),1)       endcoeff1       if f.d.nature'nombre' then val(f.d.va
leur,coeff,resultat)       if ((f.d.valeur'*')and (f.d.g.nature'nombre')) then  
     val(f.d.g.valeur,coeff,resultat)       if ((f.valeur'+') and (coeff0)) then
      tapefonction'('+wwx+www+')' else     tapefonction'('+wwx+f.valeur+www+')' 
    end     else  if ((f.nature'divise') or (f.nature'multi') or (f.nat  NABCDEF
GHIure'puiss'))  then tapefonctiontapefonction(f.g,v)+f.valeur+tapefonction(f.d,
v) else  tapefonction''  end    function oppose  var  u,vfonction  coeff,resulta
tinteger  coef2real  begin  if ((f.valeur'*') and (f.g.nature'nombre')) then   b
egin    new(u)u.nature'multi'u.valeur'*'u.df.d    u.goppose(f.g)opposeu   end   
else  if ((f.valeur'*') or (f.valeur'/') then   begin    new(u)u.nature'multi'u.
valeur'*'u.dfnew(u.g)    u.g.nature'nombre'u.g.valeur'-1'u.g.gnilu.g.dnil    opp
oseu   end   else  if ((f.valeur'x') or (f.valeur'')) then   begin    new(u)u.na
ture'multi'u.valeur'*'u.df    new(v)v.nature'nombre'v.valeur'-1'v.dnilv.gnil    
u.gvopposeu   end   else  if f.nature'nombre' then   begin    new(u)u.nature'nom
bre'u.dnilu.gnil    val(f.valeur,coef2,resultat)coef2coef2*(-1)    if frac(coef2
)0 then str(round(coef2),u.valeur)      else      begin      str(coef2105,u.vale
ur)      while pos(' ',u.valeur)0 do delete(u.valeur,1,1)      end    opposeu   
end   else  if f.valeur'+' then    begin new(u)u.nature'plus'u.valeur'+'    u.go
ppose(f.g)u.doppose(f.d)opposeu end   else  if f.valeur'-' then    begin new(u)u
.nature'plus'u.valeur'+'u.goppose(f.g)u.df.d    opposeu end    else  if fnil the
n opposenil  end        function  exposant  var  llinteger  begin  llround(l)  i
f k0 then exposant0 else  if ll0 th      QUELQUES PRECISIONS SUR CES PROGRAMMES 
D'ANALYSE      *************************************************      Ces progra
mmes sont ecrits en TURBO PASCAL.    Vous trouverez sur cette disquette les prog
rammes compiles (*.COM).      Il n'est donc pas necessaire de posseder TURBO PAS
CAL pour    les executer.      Cependant, les programmes sources sont a votre di
sposition (*.PAS)    sur la disquette, ainsi qu'un fichier d'explications que vo
us    pouvez lire ou imprimer ( sous CPM TYPE + CTRL P), ce fichier tres    deta
ille est nomme  SOURCES.DOC .      Ces programmes sont executables sous CPM plus
,    c'est a dire sur CPC 6128                 ou  CPC 464/664 avec RAM suppleme
ntaire+CPM plus.      La partie algebrique tourne fort bien                 sur 
PCW 256/512 mais il faudra rediger une                 bibliotheque graphique po
ur tracer les courbes.      Une version compatible IBM sous MS/DOS existe egalem
ent.        POUR DES RAISONS DE PLACE DISPONIBLE SOUS CPM+      Le programme est
 scinde en d     then         begin               if f.valeur'-' then foppose(f.
d) else               ff.d               simplif(f)result1         end          
         else      if ((f.nature'puiss') and (f.d.nature'nombre')       and (f.d
.valeur'1'))      then      begin            ff.g            simplif(f)result1  
     end       else      if ((f.nature'puiss')and(f.d.nature'nombre')and      (f
.g.nature'puiss')and(f.g.d.nature'nombre')) then       begin           new(h)h.n
ature'multi'h.valeur'*'h.df.dh.gf.g.d           f.dhf.gf.g.gsimplif(f.d)result1 
      end       else       begin       if f.dnil then simplif(f.d)       if f.gn
il then simplif(f.g)     end     end   end    function   exposant(k,lreal)real  
forward    function   calcul  label fincalcul  var nbrerealresultatinteger  begi
n    if f.nature'nombre' then                                begin              
                  val(f.valeur,nbre,resultat)                                cal
culnbre                                end                                 else 
   if f.nature'param' then                                begin                 
               val(f.valeur,indice,resultat)                                calc
ulpindice,i                                end                                el
se    if f.nature'variab' then calculx else    if f.nature'plus' then calculcalc
ul(f.g,x)+calcul(f.d,x) else    if f.nature'moins' then calculcalcul(f.g,x)-calc
ul(f.d,x) else    if f.nature'multi' then calculcalcul(f.g,x)*calcul(f.d,x) else
    if f.nature'puiss' then                       begin                         
     if frac(calcul(f.d,x))0 then                              calculexposant(ca
lcul(f.g,x),calcul(f.d,x))                              else                    
        begin                              if calcul(f.g,x)0 then               
                                    begin                                    NAB
CDEFGHI                   definifalse                                           
          goto fincalcul                                                    end 
                                                      else                      
        calculexp((ln(calcul(f.g,x)))*calcul(f.d,x))                            
end                       end                               else    if f.nature'
divise' then                              begin                              if 
calcul(f.d,x)0 then begin                                                     de
finifalse                                                     goto fincalcul    
                                                 end                            
                            else                               calculcalcul(f.g,
x)/calcul(f.d,x)                              end                               
else    if f.nature'idfct' then                              begin              
                 nbrecalcul(f.d,x)                  if f.valeur'cos' then calcul
cos(nbre) else                  if f.valeur'sin' then calculsin(nbre) else      
            if f.valeur'tang' then begin                                        
  if cos(nbre)0 then begin                                             definifal
se                                             goto fincalcul                   
                          end else                                           cal
culsin(nbre)/cos(nbre)                                            end           
                                 else                  if f.valeur'int' then cal
culint(nbre) else                  if f.valeur'abs' then calculabs(nbre) else   
               if f.valeur'arctan' then calcularctan(nbre) else                 
 if f.valeur'exp' then calculexp(nbre) else                  if f.valeur'ln' the
n                                                   begin                       
                            if nbre0 then                                       
                     begin                                                      
      definifalse                                                            got
o fincalcul                                                            end      
                                                       else                     
                              calculln(nbre)                                    
               end                                                    else      
                         if f.valeur'sqrt' then                                 
                  begin                                                   if nbr
e0 then                                                            begin        
                                                    definifalse                 
                                           goto fincalcul                       
                                     end                                        
                      else                                                   cal
culsqrt(nbre)                                                   end             
                                       else                if f.valeur'sh' then 
calcul0.5*(exp(nbre)-exp(nbre*-1))         else   if f.valeur'ch' then calcul0.5
*(exp(nbre)+exp(nbre*-1))         else   if f.valeur'th' then                  c
alcul(exp(nbre)-exp(nbre*-1))/(exp(nbre)+exp(nbre*-1))         else   if f.valeu
r'arcsin' then begin                               if nbre-1 then calcul-0.5*pi 
else                               if nbre1 then calcul0.5*pi else              
                 if ((nbre-1)or(nbre1)) then                               begin
 definifalsegoto fincalcul                               end  else              
calcularctan(nbre/sqrt(1-nbre*nbre))              end         else              
   if f.valeur'arccos' then begin                               if nbre-1 then c
alculpi else                               if nbre1 then calcul0 else           
                    if ((nbre-1)or(nbre1)) then                               be
gin definifalsegoto fincalcul                               end  else           
   calcul(pi/2)-arctan(nbre/sqrt(1-nbre*nbre))              end         else    
erreur(10)                              end                              else   
 if fnil then calcul0    fincalcul  end    function  tapefonction  var  www,wwxs
tr200  coeffrealresultatinteger  formatstr10  begin  if f.nature'idfct' t  NABCD
EFGHIhen  tapefonctionf.valeur+'('+tapefonction(f.d,v)+')' else  if f.nature'nom
bre' then  tapefonctionf.valeur else  if f.nature'param' then  tapefonction'p('+
f.valeur+')' else  if f.nature'variab' then  tapefonctionv else  if ((f.nature'p
lus') or (f.nature'moins')) then      begin      wwwtapefonction(f.d,v)wwxtapefo
nction(f.g,v)      if (((f.d.valeur'+')or(f.d.valeur'-'))and(f.valeur'+')) then 
      begin       delete(www,1,1)delete(www,length(www),1)       end      if ((f
.g.valeur'+')or(f.g.valeur'-')) then       begin       delete(wwx,1,1)delete(wwx
,length(wwx),1)       endcoeff1       if f.d.nature'nombre' then val(f.d.valeur,
coeff,resultat)       if ((f.d.valeur'*')and (f.d.g.nature'nombre')) then       
val(f.d.g.valeur,coeff,resultat)       if ((f.valeur'+') and (coeff0)) then     
 tapefonction'('+wwx+www+')' else     tapefonction'('+wwx+f.valeur+www+')'     e
nd     else  if ((f.nature'divise') or (f.nature'multi') or (f.nature'puiss'))  
then tapefonctiontapefonction(f.g,v)+f.valeur+tapefonction(f.d,v) else  tapefonc
tion''  end    function oppose  var  u,vfonction  coeff,resultatinteger  coef2re
al  begin  if ((f.valeur'*') and (f.g.nature'nombre')) then   begin    new(u)u.n
ature'multi'u.valeur'*'u.df.d    u.goppose(f.g)opposeu   end   else  if ((f.vale
ur'*') or (f.valeur'/')) then   begin    new(u)u.nature'multi'u.valeur'*'u.dfnew
(u.g)    u.g.nature'nombre'u.g.valeur'-1'u.g.gnilu.g.dnil    opposeu   end   els
e  if ((f.valeur'x') or (f.valeur'')) then   begin    new(u)u.nature'multi'u.val
eur'*'u.df    new(v)v.nature'nombre'v.valeur'-1'v.dnilv.gnil    u.gvopposeu   en
d   else  if f.nature'nombre' then   begin    new(u)u.nature'nombre'u.dnilu.gnil
    val(f.valeur,coef2,resultat)coef2coef2*(-1)    if frac(coef2)0 then str(roun
d(coef2),u.valeur)      else      begin      str(coef2105,u.valeur)      while p
os(' ',u.valeur)0 do delete(u.valeur,1,1)      end    opposeu   end   else  if f
.valeur'+' then    begin new(u)u.nature'plus'u.valeur'+'    u.goppose(f.g)u.dopp
ose(f.d)opposeu end   else  if f.valeur'-' then    begin new(u)u.nature'plus'u.v
aleur'+'u.goppose(f.g)u.df.d    opposeu end    else  if fnil then opposenil  end
        function  exposant  var  llinteger  begin  llround(l)  if k0 then exposa
nt0 else  if ll0 then exposant1 else  if ll0 then begin ll-1exposantk*exposant(k
,l) end else  if ll0 then begin ll+1exposant(1/k)*exposant(k,l) end  end      pr
ocedure    calculfonction(ffonction)  var  chx,chystr10  begin   clrscr   repeat
   write('valeur de x ')   readln(x)   definitrueresultatcalcul(f,x)   if frac(x
)0 then str(round(x),chx) else str(x83,chx)   if definitrue then                
      begin                      write('f',i,'(',chx,')')                      i
f frac(resultat)0 then str(round(resultat),chy) else                      str(re
sultat83,chy)                      writeln(chy)                      end        
              else                      begin                      writeln('f',i
,'(',chx,') n''est pas definie')                      end   writeln('1 Un autre 
x 2 Retour au menu ')     repeat     read(kbd,car)     until ((car'1') or (car'2
'))     val(car,choix,result)   writeln   until choix2  end      #V!/e.oEE!!Mmul
ti**!*e. **#Vs#r*!*#VMnombre*#VM-1 *#V!s#r*#V!s#r*"I*#V!xe.*#V!e.oEF!!Mmulti**!*
e. **#Vs#r!!Mnombre**M-1 *!s#r*!s#r**s#r*"I*#VMnombreEG!!Mnombre**!s#r*!s#r*#V!!
!,!!!,4!EG!,!* G!,! !* ! e.*!EG*!!G*"I*#V!+e.EsH!!Mplus**!+e. **#VP-s#r**#VP-s#r
*"I*#V!-e.EH!!Mplus**!+e. **#VP-s#r**#V#Vs#r*"I*  NABCDEFGHI#V!EI!"*"!!!!,"!,!EI
!!J*!EI!!J*!EI!,!!!,!,!,56!J*!EJ!,!!!!,!,!,56!!," !" valeur de x  !r !2*!,M-!!,4
!EJ!,!! K!,!!! *&!EK!f"*!&!("!!) !,4!EK!,!! K!,!!! !! K!f"*!&!("!!) n'est pas de
finie #1 Un autre x 2 Retour au menu  !!D *&!1*&!2oE.L*&e.!! *!EJ "jal!"*#V!*e.*
#V#V!+e.*#V#V!-e.o£o*#V#VMidfct£oEN*#V*#V#V*#V*#V#V !!Mmulti**!*e. **#V#V#Vs#r**
#V#Vs#r!!Mmulti**!*e. **#V#V#Vs#r**#V#Vs#r*#V*s#r*#V*s#r!"Q*#V!*e.*#V#V!+e.*#V#V
!-e.o£o*#V#VMidfct£oEkP*#V*#V#V*#V*#V#V !!Mmulti**!*e. **#V#Vs#r**#V#V#Vs#r!!Mmu
lti**!*e. **#V#Vs#r**#V#V#Vs#r*#V*s#r*#V*s#r!"Q*#V!e.*#V#V!2e.£o*#V#V!*e.£oE)Q*#
VMmulti*#V!*e. *#V*#V#Vs#r!"Q*#V#V!ETQ*#VL*#V#V!EQ*#VL"!v"*#V!+e.*#V!-e.o*#V#VL!
£o*#V#VL*#V#VL£oEhW*#V#V!*e.*#V#V!*e.£oEvT*#V#V#V!xe.*#V#V#V!xe.£o*#V#V#V!e.*#V#
V#V!e.£o*#V#V#V#V*#V#V#V#V£ooEsT!x!*#V*x*x*#V *#VMmulti*#V!*e. *x*#V#V#Vs#r*x*#V
#V#Vs#r*#V*xs#r*#V*#V#V#Vs#r*#VV-!"eW*#V#V!xe.*#V#V!e.*#V#V#V!xe.£ooEU!x!Mmulti*
x*x!*e. !v!Mnombre*v*v!1e. *v!s#r*v!s#r*x*vs#r*x*#V#Vs#r*#V*xs#r*Q!"W*#V#V!xe.*#
V#V!e.*#V#V#V!xe.£ooEW!x!Mmulti*x*x!*e. !v!Mnombre*v*v!1e. *v!s#r*v!s#r*x*vs#r*x
*#V#Vs#r*#V*xs#r*Q!"W*V-!"*#V#V!EW*#VQ*#V#V!EeW*#VQW*#V#V!EW*#VQ*#V#V!EW*#VQv"!h
"t*t#V!*e.Ea*t#VL*t#VL*tL*t#V#V!*e.*t#V#VMnombre£o*t#V#V#VMnombre£oERY!h!*h*t#V#
Vs#r*h*t#V#V#Vs#rMmulti*h*h!*e. *t#V*t#V#V#Vs#r*t#V*hs#r*t#VV-!"a*t#V#V!*e.*t#V#
V#VMnombre£o*t#V#VMnombre£oEZ!h!*h*t#V#V#Vs#r*h*t#V#Vs#rMmulti*h*h!*e. *t#V*t#V#
V#Vs#r*t#V*hs#r*t#VV-!"a*t#V#V!*e.*t#V#V!*e.£o*t#V#V#VMnombre£o*t  NABCDEFGHI#V#
V#VMnombre£oEZ!j!Mmulti*j*j!*e. *j*t#V#V#Vs#r*j*t#V#V#Vs#r!h!Mmulti*h*h!*e. *h*t
#V#V#Vs#r*h*t#V#V#Vs#r*t#V*js#r*t#V*hs#r*t#VV-!"a*t#V#V!xe.*t#V#V!e.*t#V#V#V!xe.
£oo*t#V#V!xe.*t#V#V!e.*t#V#V#V!xe.£oo£oEp*t#VMpuiss*t#V!e. !j!Mplus*j*j!+e. *t#V
#V!xe.E,!h!Mnombre*h*h!1e. *h!s#r*h!s#r*j*hs#rP*j*t#V#V#Vs#r*t#V#V!xe.E!h!Mnombr
e*h*h!1e. *h!s#r*h!s#r*j*hs#r*t#V*t#V#Vs#rD*j*t#V#V#Vs#r*t#V*t#V#V#Vs#r*t#V*js#r
*t#VV-!"a*t#V#V!*e.*t#V#V!xe.*t#V#V!e.o£oE*t#VL!j!Mmulti*j*j!*e. *j*t#V#Vs#r*j*t
#V#V#Vs#r*t#V*js#r*t#V*t#V#V#Vs#r*t#VW*tLa*t#V#V!E*t#VW*t#V#V!Ea*t#VWaa*t#V#V!E6
a*t#VW*t#V#V!Eaa*t#VWh"!"f*f#V!+e.*f#V!-e.oEk*f#V!-e.Eb*f#VMplus*f#V!+e. *f#V*f#
VP-s#r*f#V#V!+e.*f#V#V!-e.o*f#V#V!+e.*f#V#V!-e.o£oEe*f#VL*f#VL*f#V#V#VL!*f#V#V#V
L*f#V#V#VL£oEe*f#V#V!-e.Ec*f#V#VMplus*f#V#V!+e. *f#V#V*f#V#VP-s#r*f#V#V!-e.Ed*f#
V#VMplus*f#V#V!+e. *f#V#V*f#V#VP-s#r!!Mplus**!+e. *!*#VMplus*#V!+e. *#V*f#V#V#Vs
#r*#V*f#V#V#Vs#r*!*#V!+e. *#VMplus*#V*f#V#V#Vs#r*#V*f#V#V#Vs#r*f#V"!"k*f#V!+e.*f
#V!-e.o*f#V#V!+e.*f#V#V!-e.o£oEh*f#VL*f#V#V#VL!*f#V#V#VL*f#V#VL£oEh*f#V#V!-e.EYg
*f#V#VMplus*f#V#V!+e. *f#V#V*f#V#VP-s#r!!Mplus**!+e. **f#V#V#Vs#r**f#V#Vs#r*f#V*
f#V#V#Vs#r*f#V*s#r!"k*f#V!+e.*f#V!-e.o*f#V#V!+e.*f#V#V!-e.o£oEj*f#VL*f#V#VL!*f#V
#VL*f#V#V#VL£oEj*f#V#V!-e.Ei*f#V#VMplus*f#V#V!+e. *f#V#V*f#V#VP-s#r*f#V#V"*f#V*f
#V#V#Vs#r*f#V#V*s#r*f#VQ*f#V#V"*f#V*f#V#Vs#r*f#V*s#r!"k*f#V!+e.*f#V!-e.o*f#V#VL!
£o*f#V#VL*f#V#VL£oEk*f#V#V"*f#V*f#V#Vs#r*f#V*s#r!"l*f#V!*e.*f#V#V!xe.*f#V#V!e.*f
#V#V#V!xe.£oo£oEl*f#V!-e.El*f#VMplus*f#V!+e. *f#V*f#VP-s#r*f#V#V"*f#V*f#V#Vs#r*f
#V*s#r!"*f#V#V!El*f#VL*f#V#V!El*f#VL"!L"X*X!*e.E5n*X#VMnombr  NABCDEFGHIe*X#VMno
mbre£oE2m!"Z2n*X#VMnombre*X#V!xe.£oEm!"Z2n*X#VMnombre*X#V!e.£o*X#V#V!xe.£oE,n*X#
V#V!N!L*L!E#n*N"Z)n!"Z2n!"Zo*X!xe.EWn!"Zo*XMnombreExn!"Zo*X!e.*X#V!xe.£o*X#VMnom
bre£oEo*X#V!N!L*L!Eo*N"Z o!"Zo!"Z*ZL"!"J*J#V!Eu*J#V!+e.*J#V!-e.oEu*JQ*J#V#V!Eo*J
#VL*J#V#V!Eo*J#VL*J#V!-e.EIp*J#V!+e. *J#VMplus*J#V*J#VP-s#r*J#V#V!-e.Ep*J#V#V*J#
V#VP-s#r*J#V#V!+e. *J#V#VMplus*J#V#V!-e.Emq!&  !*+)T)r *#X£ZR£ZNo de la fonction
 rf(t) n.*!&  !*+)Ls#r!!*+)#V)#V!EY!!*+)#V)!!!*+)#V)!*)#Vs#r!!*+)#V)#V!E£Z!!!*+)
#V)#Vfz£Z"*!"Valeur du parametre n.*!&  !*+)T)r *#Z*#XT!,!,O!!IO!!,R!N!!N!!IO!!!
,RN!!pN!,!IO!!N!!N!!,IO!!N!!N!"!*fzb"*R!,!!2!!*+)#V)#V!EW!!!*+)#V)#VfzW"*!"!*+))
))))!*+)#V)T)!*+)T),*#!,!,E!2!*+)#V"!!*+)#V)#V!,H-!*&!!,!£oEU!,!,"!,!,"*&!E**OK*
*O!2!2!,!,!WbR!,!!2!!*+)#V)#V!EF!!!*+)#V)#VfzF"*!"!*+))))))!*+)#V)T)!*+)T),*#!!u
*+)#V)#V!E!!!u*+)#V)#Vfz"*!"!*+))))))!u*+)#V)T)!*+)T),*#!,!,E!2!*+)#V"!!*+)#V)#V
!,H-!*&!!,!£oEf!,!,"!u*+)#V"!!u*+)#V)#V!,H-!*&!!,!£oE!,!,"*&!EG**OR**O!2c!2m!2!,
!,!bRb!,!!2!!*+)#V)#V!EWa!!!*+)#V)#VfzWa"*!"!*+))))))!*+)#V)T)!*+)T),*#!,!,Eb!2!
*+)#V"!!*+)#V)#V!,H-!*&!!,!£oEb!,!,!,"!,!,!,"*&!Efb**Oqb**O!2b!2!,!,!Wa*#!!*1 Im
primer 2 Revoir 3 Retour au menu !!£D *£&!0*£&!4£oEb*£&e.!!*!Ec!!+              
                              !!OP*!E£c!eM"!! fzc"!*)!s#r!*)!s#r*#c! ! PhM     o
rigin(0,0)vidage     end    if choixbis2 then    graphe(1)  end begin         cl
rscrwrite('No de la fonction (1 a 9)')         inumfonc         if mi0 then     
    begin         for gin        write('No de la fonction yf(x) n.',z,' ')fxznum
fonc        if ffxznil then         begin          lirfonction(ffxz)          mf
xzmi        end        if mfxz0 then        begin for bk1 to mfxz do           b
egin indexindex+1write('Valeur du parametre n.',bk,' ')           readln(ldainde
x)           end        end       end      2 begin        write('No de la foncti
on xf(t) n.',z,' ')fxznumfonc        if ffxznil then        begin       NABCDEFG
HI     lirfonction(ffxz)          mfxzmi       end        if mfxz0 then        b
egin for bk1 to mfxz do           begin  indexindex+1write('Valeur du parametre 
n.',bk,' ')           readln(ldaindex)           end        end        write('No
 de la fonction yf(t) n.',z,' ')fyznumfonc        if ffyznil then         begin 
          lirfonction(ffyz)           mfyzmi        end        if fyzfxz then   
     begin          fyz0          f0ffxz          m0mfxz        end        if mf
yz0 then        begin for bk1 to mfyz do           begin  indexindex+1write('Val
eur du parametre n.',bk,' ')           readln(ldaindex)           end        end
      end      3 begin       write('No de la fonction rf(t) n.',z,' ')fxznumfonc
       if ffxznil then         begin           lirfonction(ffxz)           mfxzm
i         end       if mfxz0 then       begin for bk1 to mfxz do           begin
  indexindex+1write('Valeur du parametre n.',bk,' ')           readln(ldaindex) 
          end       end       end      end     end   end    clrscr    origin(rou
nd(xo),round(yo))    grafmove(0,0)drawr(640-round(xo),0)drawr(-640,0)    grafmov
e(0,0)drawr(0,400-round(yo))drawr(0,-400)    grafmove(round(ux),0)drawr(0,5)draw
r(0,-10)    grafmove(0,round(uy))drawr(5,0)drawr(-10,0)    index0    for z1 to n
bfonc do    begin    case choix of    1 begin    xxxdprecedefalse      if mfxz0 
then       begin for bk1 to mfxz do           begin           indexindex+1pbk,fx
zldaindex           end       end    while xxxa do    begin    definitrueifxz   
        resultatcalcul(ffxz,x)           if ((definitrue) and (abs(resultat)1000
)) then begin                                xpround(x*ux)                      
          ypround(resultat*uy)                                if precedefalse th
en plot(xp,yp)                                else draw(xp,yp)                  
              precedetrue                               end                     
          else                               precedefalse          xx+pas       
end      end     2 begin     xxxdprecedefalse      if mfxz0 then      begin for 
bk1 to mfxz do           begin           indexindex+1pbk,fxzldaindex           e
nd      end      if mfyz0 then      begin for bk1 to mfyz do           begin    
       indexindex+1pbk,fyzldaindex           end      end     while xxxa do     
begin     definitrueifxz            resultatcalcul(ffxz,x)            if ((defin
itrue) and (abs(resultat)1000)) then begin            xpround(resultat*ux)ifyz  
          resultatcalcul(ffyz,x)            if ((definitrue) and (abs(resultat)1
000)) then begin            ypround(resultat*uy)            if precedefalse then
 plot(xp,yp) else draw(xp,yp)            precedetrue            end            e
lse precedefalse            end            else precedefalse         xx+pas     
  end     end    3begin    xxxdprecedefalse     if mfxz0 then     begin  for bk1
 to mfxz do           begin           indexindex+1pbk,fxzldaindex           end 
    end    while xxxa do    begin     definitrueifxz           resultatcalcul(ff
xz,x)           if ((definitrue) and (abs(resultat)1000)) then           begin  
           xpround(resultat*cos(x)*ux)        procedure  ordre(var ffonction)  f
orward    function  monome(ffonction)integer  forward    procedure  develop(var 
ffonction)  var  u,vfonction  begin   if ((f.valeur'*') and ((f.g.valeur'+') or 
(f.g.valeur'-'))   and (f.d.nature'idfct')) then     begin f.naturef.g.naturef.v
aleurf.g.valeur           new(v)v.nature'multi'v.valeur'*'v.gf.g.gv.df.d        
   new(u)u.nature'multi'u.valeur'*'u.gf.g.du.df.d           f.gvf.du           r
esult1     end     else    if ((f.valeur'*') and ((f.d.valeur'+') or (f.d.valeur
'-'))    and (f.g.nature'idfct')) then     begin f.naturef.d.naturef.valeurf.d.v
aleur           new(v)v.nature'multi'v.valeur'*'v.gf.gv.df.d.g           new(u)u
.nature'multi'u.valeur'*'u.gf.gu.df.d.d           f.duf.gv           result1    
  end      else    if ((f.valeur'')and(f.d.valeur'2')and(f.g.valeur'*')) then   
   begin f.nature'm  NABCDEFGHIulti'f.valeur'*'f.df.gresult1      end      else 
     begin      if f.gnil then develop(f.g)if f.dnil then develop(f.d)      end 
 end    procedure  reduire(var ffonction)  var  u,vfonction  begin   if (((f.val
eur'+')or(f.valeur'-'))and(monome(f.d)0)and   (monome(f.d)monome(f.g))) then   b
egin     if ((f.d.valeur'*')and(f.g.valeur'*')) then    begin     if (((f.g.d.va
leur'x') and (f.d.d.valeur'x')) or    ((f.g.d.valeur'')and(f.d.d.valeur'')and   
 (f.g.d.d.valeurf.d.d.d.valeur)))     then       begin        new(u)u.naturef.na
tureu.valeurf.valeur        f.nature'multi'f.valeur'*'        u.df.d.gu.gf.g.gf.
guf.df.d.dsimplif(f.g)        result1       end      end      else    begin     
  if ((f.d.valeur'x')or((f.d.valeur'')and(f.d.g.valeur'x')))        then begin n
ew(u)u.nature'multi'u.valeur'*'                   new(v)v.nature'nombre'v.valeur
'1'                    v.dnilv.gnilu.gvu.df.df.du                   reduire(f)re
sult1            end            else       if ((f.g.valeur'x')or((f.g.valeur'')a
nd(f.g.g.valeur'x')))       then begin new(u)u.nature'multi'u.valeur'*'         
         new(v)v.nature'nombre'v.valeur'1'                  v.dnilv.gnilu.gvu.df
.gf.gu                 reduire(f)result1           end           else           
begin                 simplif(f)result1           end    if f.dnil then reduire(
f.d)if f.gnil then reduire(f.g)    end  end   else   begin    if f.dnil then red
uire(f.d)if f.gnil then reduire(f.g)   end  end    procedure  produit(var ffonct
ion)  var  u,vfonction   begin    if f.valeur'*' then    begin    ordre(f.d)ordr
e(f.g)ordre(f)   if ((f.d.valeur'*')and(f.g.nature'nombre')and(f.d.g.nature'nomb
re'))     then       begin       new(v)v.df.gv.gf.d.gv.nature'multi'v.valeur'*' 
      f.df.d.df.gvsimplif(f.g)result1       end       else   if ((f.g.valeur'*')
and(f.g.g.nature'nombre')and(f.d.nature'nombre'))     then      begin       new(
v)v.gf.g.gv.df.dv.nature'multi'v.valeur'*'       f.df.g.df.gvsimplif(f.g)result1
      end       else     if ((f.d.valeur'*')and(f.g.valeur'*')and(f.g.g.nature'n
ombre')     and (f.d.g.nature'nombre'))     then      begin       new(u)u.nature
'multi'u.valeur'*'u.gf.g.gu.df.d.g       new(v)v.nature'multi'v.valeur'*'v.gf.g.
dv.df.d.d       f.guf.dvsimplif(f.g)result1      end       else     if (((f.g.va
leur'x') or ((f.g.valeur'') and (f.g.g.valeur'x')))     and ((f.d.valeur'x') or 
((f.d.valeur'') and (f.d.g.valeur'x'))))     then        begin        f.nature'p
uiss'f.valeur''        new(u)u.nature'plus'u.valeur'+'        if f.g.valeur'x' t
hen begin new(v)v.nature'nombre'        v.valeur'1'v.dnilv.gnilu.gv end        e
lse u.gf.g.d        if f.d.valeur'x' then begin new(v)v.nature'nombre'        v.
valeur'1'v.gnilv.dnilu.dvf.gf.d end        else begin u.df.d.df.gf.d.g end      
  f.dusimplif(f.d)result1        end     else     if ((f.g.valeur'*') and ((f.d.
valeur'x') or (f.d.valeur'')))     then     begin  ordre(f.g)new(u)u.nature'mult
i'u.valeur'*'     u.df.du.gf.g.df.duf.gf.g.gproduit(f.d)ordre(f)     end     els
e   begin    if f.gnil then produit(f.g)if f.dnil then produit(f.d)  end  end   
else   begin    if f.gnil then produit(f.g)if f.dnil then produit(f.d)   end  en
d      procedure ordre  var  ufonction  begin    if ((f.valeur'+')or(f.valeur'-'
)) then    begin       if f.valeur'-' then begin f.nature'plus'f.valeur'+'      
                f.doppose(f.d)end    if (((f.g.valeur'+')or (f.g.valeur'-'))    
and((f.d.valeur'+')or(f.d.valeur'-'))) then    begin     ordre(f.d)ordre(f.g)   
  if ((monome(f.g.d)0)and(monome(f.g.d)monome(f.d.g))) then      begin      if f
.g.valeur'-' then begin f.g.nature'plus'f.g.valeur'+'                      f.g.d
oppose(f.g.d)end      if f.d.valeur'-' then begin f.d.nature'plus'f.d.valeur'+' 
                     f.d.doppose(f.d.d) end      new(u)u.nature'plus'u.valeur'+'
new(u.d)u.d.nature'plus'      u.d.valeur'+'u.d.df.d.du.d.gf.g.dnew(u.g)  NABCDEF
GHI      u.g.valeur'+'u.g.nature'plus'u.g.gf.g.gu.g.df.d.g      ufresult1      e
nd    end    else  if ((f.valeur'+')or(f.valeur'-'))and((f.g.valeur'+')or(f.g.va
leur'-'))   then begin    ordre(f.g)    if ((monome(f.g.d)0)and (monome(f.g.d)mo
nome(f.d))) then     begin     if f.g.valeur'-' then begin f.g.nature'plus'f.g.v
aleur'+'                      f.g.doppose(f.g.d) end     new(u)u.nature'plus'u.v
aleur'+'u.gf.g.gu.df.d     f.df.g.df.guresult1     end     end     else     if (
(f.valeur'+')or(f.valeur'-'))and((f.d.valeur'+')or(f.d.valeur'-'))   then begin 
   ordre(f.d)    if ((monome(f.g)0)and (monome(f.g)monome(f.d.g))) then     begi
n     if f.d.valeur'-' then begin f.d.nature'plus'f.d.valeur'+'                 
     f.d.doppose(f.d.d) end     uf.gf.gf.d.gf.d.gureduire(f.d)     uf.df.df.gf.g
uresult1     end     end     else    if (((f.valeur'+')or(f.valeur'-'))and (mono
me(f.g)0)    and (monome(f.g)monome(f.d))) then     begin      uf.df.df.gf.gures
ult1    end    end    else      if  ((f.valeur'*') and ((f.g.valeur'x') or ((f.g
.valeur'') and    (f.g.g.valeur'x')))) then     begin      if f.valeur'-' then b
egin f.nature'plus'f.valeur'+'                      f.doppose(f.d)end      uf.df
.df.gf.guresult1    end    if f.dnil then ordre(f.d)    if f.gnil then ordre(f.g
)  end      function    monome  var  degre,resultatinteger  begin    if f.valeur
'*' then     begin      if ((f.g.nature'nombre') and (f.d.nature'nombre')) then 
     monome0      else      if ((f.g.nature'nombre') and (f.d.valeur'x')) then  
    monome1      else      if ((f.g.nature'nombre') and (f.d.valeur'') and (f.d.
g.valeur'x'))      then       begin        val(f.d.d.valeur,degre,resultat)     
   if resultat0 then monomedegre else monome-1       end      else       monome-
1     end      else    if f.valeur'x' then monome1      else    if f.nature'nomb
re' then monome0      else    if ((f.valeur'') and (f.g.valeur'x') and (f.d.natu
re'nombre')) then     begin       val(f.d.valeur,degre,resultat)       if result
at0 then monomedegre else monome-1     end      else     monome-1   end    proce
dure   polynome(var ffonction)  var  u,vfonction  begin   if fnil then   begin  
 if ((f.valeur'+') or (f.valeur'-')) then   begin   reduire(f)if f.dnil then ord
re(f.d)if f.gnil then ordre(f.g)   if f.valeur'-' then begin f.valeur'+'f.nature
'plus'                               f.doppose(f.d)end   if f.d.valeur'-' then b
egin f.d.doppose(f.d.d)f.d.valeur'+'                   f.d.nature'plus' end    i
f f.g.valeur'-' then begin      f.g.doppose(f.g.d)f.g.nature'plus'f.g.valeur'+' 
end   if (((f.d.valeur'+') or (f.d.valeur'-')) and   ((f.g.valeur'+') or (f.g.va
leur'-'))) then    begin    new(u)u.naturef.natureu.valeurf.valeuru.gf.gu.df.d.g
    f.guf.df.d.dresult1polynome(f.g)    end    else    if ((f.g.valeur'+') or (f
.g.valeur'-')) then    begin     if ((monome(f.d)0) and (monome(f.d)monome(f.g.d
))) then     begin      uf.df.df.g.gf.g.guuf.gf.gf.df.du      reduire(f.d)result
1     end    end    else    if (((f.d.valeur'+') or (f.d.valeur'-'))and(monome(f
.g)0)and    (monome(f.g)monome(f.d.g))) then    begin     uf.df.df.gf.guordre(f.
g)result1polynome(f)    end    else    begin    if f.dnil then polynome(f.d)    
if f.gnil then polynome(f.g)    end    end    if f.dnil then polynome(f.d)    if
 f.gnil then polynome(f.g)  end  end    procedure algebrique(var ffonction)  beg
in  repeat  result0simplif(f)  until result0  repeat  result0develop(f)  until r
esult0  repeat  result0  produit(f)  until result0  repeat  result0ordre(f)polyn
ome(f)  until result0  repeat  result0  simplif(f)  until result0  end    proced
ure  binome(var ffonction)  var u,v,wfonction  coeffreal  resultatinteger  begin
  if ((f.valeur'')and((f.g.valeur'+')or(f.g.valeur'-'))and  (f.d.nature'nombre')
) then    begin     val(f.d.valeur,coeff,resultat)     if ((frac(coeff)0) and (c
oeff2)) then        begin        if coeff2 then begin                        f.n
ature'multi'f.valeur'*'f.df.g                      NABCDEFGHI    algebrique(f)  
                      end                        else                begin      
          new(u)u.nature'puiss'u.valeur''u.gf.g                new(v)v.nature'no
mbre'coeffcoeff-1                str(round(coeff),v.valeur)                v.dni
lv.gnilu.dvf.df.gf.gu                binome(f.g)f.nature'multi'f.valeur'*'      
          algebrique(f)                end          end       end       else    
   begin       if f.dnil then binome(f.d)       if f.gnil then binome(f.g)      
 end    end    (f.d.valeur'-'))   then begin    ordre(f.d)    if ((monome(f.g)0)
and (monome(f.g)monome(f.d.g))) then     begin     if f.d.valeur'-' then begin f
.d.nature'plus'f.d.valeur'+'                      f.d.doppose(f.d.d) end     uf.
gf.gf.d.gf.d.gureduire(f.d)     uf.df.df.gf.guresult1     end     end     else  
  if (((f.v     ypround(resultat*sin(x)*uy)             if precedefalse then plo
t(xp,yp) else draw(xp,yp)             precedetrue           end           else  
         precedefalse         xx+pas      end     end    end    end    gotoxy(1,
24)write('1 Imprimer 2 Revoir 3 Retour au menu')    repeat    read(kbd,car)    u
ntil ((car'0') and (car'4'))    val(car,choixbis,result)    if choixbis1 then   
  begin     gotoxy(1,24)write('                                           ')    
 origin(0,0)vidage     end    if choixbis2 then    graphe(1)  endffLLp EIn5%A1A$
A*Ro$A*R $!/e.!, x  function   menuinteger    begin  clrscr  writelnwriteln('   
   M E N U ')  writelnwriteln('  1 Entree de la fonction')  writelnwriteln('  2 
Developper des produits')  writelnwriteln('  3 Developper des puissances entiere
s')  writelnwriteln('  4 Calcul de valeurs de f(x)')  writelnwriteln('  5 Derive
es de la fonction')  writelnwriteln('  6 Developpements limites')  writelnwritel
n('  7 Fin du programme')  writelnwriteln('    VOTRE CHOIX ')  repeat  read(kbd,
car)  until ((car'0') and (car'8'))  val(car,choix,result)  menuchoix  end    fu
nction   numfoncinteger  var jinteger    begin  car' '  repeat         read(kbd,
car)         until ((car'0') and (car''))         writeln(car)         val(car,j
,result)  numfoncj  end    procedure  devlim  label findevlim  var zintegerareal
      coef1,coef2real    begin  clrscrwrite('N. de la fonction (1 a 9)')  inumfo
nc  if finil then lirfonction(fi)  write('Developpement au voisinage de a')re$A-
  program     courbe  type   fonctionsommet   sommetrecord                nature
string6                valeurstring10                d fonction                g
 fonction          end   str200string250   str10string10  const   filtreset of c
har'+','*','-','/','','.','(',')','a'..'z','0'..'9'    var   farray0..10 of fonc
tion   carchar   idfstring10   i,j,resultinteger   indice,choixinteger   parray1
..3,0..10 of real   marray0..10 of integer   definiboolean   x,resultatreal    $
I lirefonc.pas  $I calculf.pas  $I ecrif.pas  $I grafik3.inc  $I graphef.pas    
begin  for i0 to 10 do begin finilmi0 end  border(10,10)  boucle  end.adln(a)  w
rite ('Developpement a quel ordre (1 a 5)')  repeat  read(kbd,car)  until ((car'
0') and (car'6'))  writeln(car)  val(car,j,result)  writeln('f',i,'(x)',tapefonc
tion(fi,'x'))  writeln('Developpement limite au voisinage de a',a)  definitruere
sultatcalcul(fi,a)f0ficoef21  if definitrue then begin      if resultat0 then   
        begin                if resultat0 then write('+')                if frac
(resultat)0 then                write(round(resultat)) else wri  NABCDEFGHIte(re
sultat83)            end                end                else                b
egin                writeln('La fonction n''est pas definie en ',a)             
   goto findevlim                end  for z1 to j do         begin             f
0derive(f0)             repeat result0simplif(f0) until result0             coef
2coef2*z             definitrueresultatcalcul(f0,a)             if definitrue th
en begin             if resultat0 then              begin                  coef1
resultat/coef2                  if resultat0 then write('+')                  if
 frac(coef1)0 then                  write(round(coef1)) else               if fr
ac(resultat)0 then write(round(resultat),'/',round(coef2))           else  write
(resultat83,'/',round(coef2))               if a0 then write('x') else write('(x
-a)')               if z1 then  write('',z)               end                  e
nd                  else                  begin                writelnwriteln('L
a derivee',z,'ieme n''est pas definie en ',a)                goto findevlim     
           end         end  writeln  findevlim  tempo  end    procedure boucle  
var zinteger  begin  repeat  choixmenu  case choix of   1    begin         write
('No de la fonction (1 a 9)')         inumfonc         clrscrcar' '         lirf
onction(fi)         repeat         result0simplif(fi)         until result0     
    tempo         end   2    begin         clrscrwrite('No de la fonction (1 a 9
)')         inumfonc         if finil then lirfonction(fi)         writeln('f',i
,'(x)',tapefonction(fi,'x'))         algebrique(fi)         writeln('f',i,'(x)',
tapefonction(fi,'x'))         tempo         end   3    begin         clrscrwrite
('No de la fonction (1 a 9)')         inumfonc         if finil then lirfonction
(fi)         writeln('f',i,'(x)',tapefonction(fi,'x'))         binome(fi)       
  writeln('f',i,'(x)',tapefonction(fi,'x'))         tempo         end   4    beg
in         clrscrwrite('No de la fonction (1 a 9)')         inumfonc         if 
finil then lirfonction(fi)         if mi0 then         begin         for z1 to m
i do         begin         write('Valeur du parametre n.')write(z)write(' ')read
ln(pz,i)         end         end         calculfonction(fi)         end   5    b
egin         clrscrwrite('No de la fonction (1 a 9)')         inumfonc         i
f finil then lirfonction(fi)         writeln('f',i,'(x)',tapefonction(fi,'x'))  
       write('No de la derivee (1 a 9 et different du no fonction)')         jnu
mfonc       if ij then       begin         definitrue         fjderive(fi)mjmi  
       if definitrue then          begin           algebrique(fj)           writ
eln('Derivee de f',i,'(x)',tapefonction(fj,'x'))          end          else     
     writeln('La derivee n''est pas definie (INT ou ABS..)')         tempo      
 end       else        begin         writeln         writeln('Meme numero pour f
 et f''. Recommencez !!!')         tempo        end       end  6    devlim    en
d  until choix7  end    writeln     writeln('2-Courbe xf(t)yf(t)')writeln     wr
iteln('3-Courbe polaire rf(t)')writeln     write('Votre choix ')     repeat     
read(kbd,car)     until ((car'0') and (car'4'))     writeln     val(car,choix,re
sult)     writeln    een exposant1 else  if ll0 then begin ll-1exposantk*exposan
t(k,l) end else  if ll0 then begin ll+1exposant(1/k)*exposant(k,l) end  end     
 procedure    calculfonction(ffonction)  var  chx,chystr10  begin   clrscr   rep
eat   write('valeur de x ')   readln(x)   definitrueresultatcalcul(f,x)   if fra
c(x)0 then str(round(x),chx) else str(x83,chx)   if definitrue then             
         begin                      write('f',i,'(',chx,')')                    
  if frac(resultat)0 then str(round(resultat),chy) else                      str
(resultat83,chy)                      writeln(chy)                      end     
                 else                      begin                      writeln('f
',i,'(',chx,') n''est pas definie')                      end   writeln('1 Un aut
re x 2 Retour au menu ')     repeat     read(kbd,car)     until ((car'1') or (ca
r'2'))     val(car,choix,result)   writeln   until choix2  end        NABCDEFGHI
*J#V#V*J#V#VP-s#r*J#V#VMplus*J#V#V!+e. *J#V#V!+e.*J#V#V!-e.o*J#V#V!+e.*J#V#V!-e.
o£oEr!!*J#V***J#V **J#V#Vs#r**J#V#V#Vs#r*J#V*s#r*J#V*J#V#V#Vs#r!"*J#V#ou*J#V#V!+
e.*J#V#V!-e.oE"t*J#V#VL!*J#V#VL*J#V#V#VL£oEt*J#V#V"*J#V*J#V#V#Vs#r*J#V#V*s#r*J#V
#V"*J#V*J#V#Vs#r*J#V*s#r*J#VQ!"u*J#V#V!+e.*J#V#V!-e.o*J#V#VL!£o*J#V#VL*J#V#V#VL£
oE)u*J#V#V"*J#V*J#V#Vs#r*J#V*s#r*J#VL!"*J#ou*J#V#V!ETu*J#V#o*J#V#V!Eu*J#V#o*J#V#
V!Eu*J#V#o*J#V#V!Eu*J#V#o" !4"!"*V-*!Eu!"*L*!Ev!"*W*!E)v!"*L*#o*!EFv!"*V-*!Ejv 4
"!"2*2#V!e.*2#V#V!+e.*2#V#V!-e.o£o*2#V#VMnombre£oEAy*2#V#V!!!,4!!,!£oEy!,!Ew*2#V
Mmulti*2#V!*e. *2#V*2#V#Vs#r*2uy!(!Mpuiss*(*(!e. *(*2#V#Vs#r!&!Mnombre*&!,!!!,!*
& *&!s#r*&!s#r*(*&s#r*2#V*2#V#Vs#r*2#V*(s#r*2#Vv*2#VMmulti*2#V!*e. *2uy*2#V#V!El
y*2#Vv*2#V#V!Ey*2#Vv""!"!!*"*!Ey!!z!"*Mnombre*MparamoEzMnombre**!0e. *!s#r*!s#r*
MvariabEzMnombre**!1e. *!s#r*!s#r*Mplus*MmoinsoEJ**** **#Vys#r**#Vys#r*MmultiEMp
lus**!+e. *!*#VMmulti*#V!*e. *#V*#Vs#r*!*#VMmulti*#V!*e. *#V*#Vs#r*#V*#Vys#r*#V*
#Vys#r*MdiviseE!!!!!!!!!!Mmoins**!-e. **s#r**s#rMpuiss**!e. **#Vs#r**s#rMnombre*
*!2e. *!s#r*!s#rMmulti**!*e. **#Vs#r**#Vys#rMmulti**!*e. **#Vys#r**#Vs#rMdivise*
*!/e. **s#r**s#r*MpuissE*#VMnombreE!!!!!!*#V!!*#V"**#Vs#rMmulti**!*e. **s#r**#Vy
s#rMpuiss**!e. **s#rMnombre**!s#r*!s#r!,!!!,4!E!,!* !,!!* ! e.*!E*!!yMmulti**!*e
. **s#r**s#r!!Midfct**Mln *!s#r**#Vs#r!!Mmulti**!*e. **#Vys#r**s#r!!Mmulti**!*e.
 **#Vys#r**#Vs#r!!Mdivise**!/e. **s#r**#Vs#r! !Mplus* * !+e. * *s#r* *s#rMmulti*
*!*e. ** s#r**s#r*  NABCDEFGHIMidfctE*MsinE!!Midfct**Mcos *!s#r**#Vs#rMmulti**!*
e. **#Vys#r**s#r*McosEK!!Midfct**Msin *!s#r**#Vs#r!!Mmulti**!*e. *!*#VMnombre*#V
M-1 *#V!s#r*#V!s#r**s#rMmulti**!*e. **#Vys#r**s#r*MtangE!!Mnombre**!2e. *!s#r*!s
#r!!Midfct**Mcos *!s#r**#Vs#r!!Mpuiss**!e. **s#r**s#rMdivise**!/e. **s#r**#Vys#r
*MlnE%Mdivise**!/e. **#Vs#r**#Vys#r*MexpE!!Midfct**Mexp *!s#r**#Vs#rMmulti**!*e.
 **#Vys#r**s#r*MsqrtE!!!!!!Mnombre**!2e. *!s#r*!s#rMmulti**!*e. **s#r**s#rMdivis
e**!/e. **#Vys#r**s#r*MshE!!Midfct**Mch *!s#r**#Vs#rMmulti**!*e. **#Vys#r**s#r*M
chE!!Midfct**Msh *!s#r**#Vs#rMmulti**!*e. **#Vys#r**s#r*MthE/!!Mnombre**!2e. *!s
#r*!s#r!!Mpuiss**!e. **s#r**s#r!!Mnombre**!1e. *!s#r*!s#r!!Mmoins**!-e. **s#r**s
#rMmulti**!*e. **#Vys#r**s#r*MarctanE!!Mnombre**!2e. *!s#r*!s#r!!Mpuiss**!e. **s
#r**#Vs#r!!Mnombre**!1e. *!s#r*!s#r!!Mplus**!+e. **s#r**s#rMdivise**!/e. **#Vys#
r**s#r*MarcsinE!!Mnombre**!2e. *!s#r*!s#r!!Mpuiss**!e. **s#r**#Vs#r!!Mnombre**!1
e. *!s#r*!s#r!!Mmoins**!-e. **s#r**s#r! !Midfct* * Msqrt * !s#r* *s#rMdivise**!/
e. **#Vys#r** s#r*MarccosE!!Mnombre**!2e. *!s#r*!s#r!!Mpuiss**!e. **s#r**#Vs#r!!
Mnombre**!1e. *!s#r*!s#r!!Mmoins**!-e. **s#r**s#r! !Midfct* * Msqrt * !s#r* *s#r
!!Mnombre**M-1 *!s#r*!s#r*!*#VMmulti*#V!*e. *#V*#Vys#r*#V*s#rMdivise**!/e. ** s#
r!"!2*"" !       M E N U     1 Entree de la fonction    2 Developper des produit
s  (  3 Developper des puissances entieres    4 Calcul de valeurs de f(x)    5 D
erivees de la fonction    6 Developpements limites    7 Fin du programme      VO
TRE CHOIX  !!D *&!0*&!8£oE*&e.!!*"* "!! 2!!D *&!0   N A B C D E F G H I*&!£oE*&"
 *&e.!!*"*"!N. de la fonction (1 a 9) "!*+)#V!E!*+)! Developpement au voisinage 
de a !r #Developpement a quel ordre (1 a 5) !!D *&!0*&!6£oE*&" *&e.!!!f"*!&(x)!*
+)#V!xS-! 'Developpement limite au voisinage de a!,!!y !2!*+)#V!,M-!!!+)!*+)#Vs#
r!!*&!E!,!E!,!E!+" !,4!E!,!& !,!!y 4!La fonction n'est pas definie en !,!!y !*fz
"!!+)!!+)#Vys#r!"!!+)V-*!El!,*!!2!!+)#V!,M-!*&!E!,!E!,!,!!,!EI!+" !,4!E!,!& !,4!
E!,!&!/"!,!& !,!!y!/"!,!& !,!E&!x" 5(x-a) *!E!"*!&   La derivee*!&ieme n'est pas
 definie en !,!!y *# ," !"*RjNo de la fonction (1 a 9) "! 2!*+)!!"!*+)V-*!E,RNo 
de la fonction (1 a 9) "!*+)#V!E!*+)!!f"*!&(x)!*+)#V!xS-! !*+)u!f"*!&(x)!*+)#V!x
S-! ,RPNo de la fonction (1 a 9) "!*+)#V!E!*+)!!f"*!&(x)!*+)#V!xS-! !*+)v!f"*!&(
x)!*+)#V!xS-! ,RvNo de la fonction (1 a 9) "!*+)#V!E!*+)!!*+)#V!E!!*+)#Vfz"Valeu
r du parametre n. *!&   !*+)))))*+)T)r *#!*+)#VoJRNo de la fonction (1 a 9) "!*+
)#V!E!*+)!!f"*!&(x)!*+)#V!xS-! 5No de la derivee (1 a 9 et different du no fonct
ion) "**E!2!*+)!*+)#Vys#r!*+)!*+)#Vs#r*&!E"!*+)uDerivee de f*!&(x)!*+)#V!xS-! Z+
La derivee n'est pas definie (INT ou ABS..) , )Meme numero pour f et f'. Recomme
ncez !!! ,RR*!E "!! fz"!*+)!s#r!*+)!s#r*# !!! ,RR*!E "!! fz"!*+)!s#r!*+)!'puiss'
u.valeur''u.dvu.gf.d           new(w)w.nature'nombre'w.valeur'1'w.dnilw.gnil    
       new(s)s.nature'moins's.valeur'-'s.gws.du           new(r)r.nature'idfct'r
.valeur'sqrt'r.gnilr.ds           p.nature'divise'p.valeur'/'p.gderive(f.d)p.dr 
         end          else        if f.valeur'arccos       if f.valeur'sqrt' the
n                                                   begin                       
                            if nbre0 then                                       
                     begin                                                      
      definifalse                                                            got
o fincalcul                                                            end      
                                                        else                    
                               calculsqrt(nbre)                                 
                  end                                                    else   
             if f.valeur'sh' then calcul0.5*(exp(nbre)-exp(nbre*-1))         els
e   if f.valeur'ch' then calcul0.5*(exp(nbre)+exp(nbre*-1))         else   if f.
valeur'th' then                  calcul(exp(nbre)-exp(nbre*-1))/(exp(nbre)+exp(n
bre*-1))         else   if f.valeur'arcsin' then begin                          
     if nbre  !N!A!B!C!D!E!F!G!H!I-1 then calcul-0.5*pi else                    
           if nbre1 then calcul0.5*pi else                               if ((nb
re-1)or(nbre1)) then                               begin definifalsegoto fincalc
ul                               end  else              calcularctan(nbre/sqrt(1
-nbre*nbre))              end         else                 if f.valeur'arccos' t
hen begin                               if nbre-1 then calculpi else            
                   if nbre1 then calcul0 else                               if (
(nbre-1)or(nbre1)) then                               begin definifalsegoto finc
alcul                               end  else              calcul(pi/2)-arctan(n
bre/sqrt(1-nbre*nbre))              end         else    erreur(10)              
                end                              else    if fnil then calcul0   
 fincalcul  end    function  tapefonction  var  www,wwxstr200  coeffrealresultat
integer  formatstr10  begin  if f.nature'idfct' then  tapefonctionf.valeur+'('+t
apefonction(f.d,v)+')' else  if f.nature'nombre' then  tapefonctionf.valeur else
  if f.nature'param' then  tapefonction'p('+f.valeur+')' else  if f.nature'varia
b' then  tapefonctionv else  if ((f.nature'plus') or (f.nature'moins')) then    
  begin      wwwtapefonction(f.d,v)wwxtapefonction(f.g,v)      if (((f.d.valeur'
+')or(f.d.valeur'-'))and(f.valeur'+')) then       begin       delete(www,1,1)del
ete(www,length(www),1)       end      if ((f.g.valeur'+')or(f.g.valeur'-')) then
       begin       delete(wwx,1,1)delete(wwx,length(wwx),1)       endcoeff1     
  if f.d.nature'nombre' then val(f.d.valeur,coeff,resultat)       if ((f.d.valeu
r'*')and (f.d.g.nature'nombre')) then       val(f.d.g.valeur,coeff,resultat)    
   if ((f.valeur'+') and (coeff0)) then      tapefonction'('+wwx+www+')' else   
  tapefonction'('+wwx+f.valeur+www+')'     end     else  if ((f.nature'divise') 
or (f.nature'multi') or (f.nature'puiss'))  then tapefonctiontapefonction(f.g,v)
+f.valeur+tapefonction(f.d,v) else  tapefonction''  end    function oppose  var 
 u,vfonction  coeff,resultatinteger  coef2real  begin  if ((f.valeur'*') and (f.
g.nature'nombre')) then   begin    new(u)u.nature'multi'u.valeur'*'u.df.d    u.g
oppose(f.g)opposeu   end   else  if ((f.valeur'x') or (f.valeur'')) then   begin
    new(u)u.nature'multi'u.valeur'*'u.df    new(v)v.nature'nombre'v.valeur'-1'v.
dnilv.gnil    u.gvopposeu   end   else  if f.nature'nombre' then   begin    new(
u)u.nature'nombre'u.dnilu.gnil    val(f.valeur,coef2,resultat)coef2coef2*(-1)   
 if frac(coef2)0 then str(round(coef2),u.valeur)      else      begin      str(c
oef2105,u.valeur)      while pos(' ',u.valeur)0 do delete(u.valeur,1,1)      end
    opposeu   end   else  if f.valeur'+' then    begin new(u)u.nature'plus'u.val
eur'+'    u.goppose(f.g)u.doppose(f.d)opposeu end   else  if f.valeur'-' then   
 begin new(u)u.nature'plus'u.valeur'+'u.goppose(f.g)u.df.d    opposeu end    els
e  if fnil then opposenil  end        function  exposant  var  llinteger  begin 
 llround(l)  if k0 then exposant0 else  if ll0 then exposant1 else  if ll0 then 
begin ll-1exposantk*exposant(k,l) end else  if ll0 then begin ll+1exposant(1/k)*
exposant(k,l) end  end      procedure    calculfonction(ffonction)  var  chx,chy
str10  begin   clrscr   repeat   write('valeur de x ')   readln(x)   definitruer
esultatcalcul(f,x)   if frac(x)0 then str(round(x),chx) else str(x83,chx)   if d
efinitrue then                      begin                      write('f',i,'(',c
hx,')')                      if frac(resultat)0 then str(round(resultat),chy) el
se                      str(resultat83,chy)                      writeln(chy)   
                   end                      else                      begin     
                 writeln('f',i,'(',chx,') n''est pas definie')                  
    end   writeln('1 Un autre x 2 Retour au menu ')     repeat     read(kbd,car)
     until ((car'1') or (car'2'))     val(car,choix,result)   writeln   until ch
oix2  end      e)-exp(nbre*-1))/(exp(nbre)+exp(nbre*-1))         else   if f.val
eur'arcsin' then begin                               if nbre  "N"A"B"C"D"E"F"G"H
"I Copyright (C) 1985 BORLAND IncBZenithder CPC464/664P  Y  ELMKqp7#  ok!!"#($ +
*!5!*!!(2!5(2!!!OO!*!!45(! +/0y0( d!k5!5o&((  *"x2y(28!"9!!og2""22 9/4*9 Co&£ (!
eA8Q0G x!w# ( (*(.(w. !h6# ((*((w# w# 8 ! .,*a ''72*B "og"22! ""*B"Ru*"#V##V#N#F
O/o&9O/o&9!9( (G!9 w#Ew8OCA#0w#xo&9xG7s#r#s#r#q#px!D9N#8y#(Ox!D9N##Vh&D9! 9! 9#V
h&D9!"x/o&9p#HR' RB0' RqRR!+R!+r!+r!+r!#r!+TKB!z S))0  DMgojB07 Hz5a)az 0Ggo/g/o
#o&KxAJSJDM!b"!6J"DM'd  R0 0w#$O! #08) 8  ! 80T))  T)y&#9N8w!DB9+O#) W8(8J9To9yk
-&9w&#9o&!T9K#C#y8O(#  !#!9RO8 (8wPTOsOS!988xW8/oz88x8&8#(*BPOz(Ox8(*!9O!T9-fl&!
T96#w!T9K#C#( x #  )   '   '  x  T(0Dz, ( 0%, 7 (8x - r8x   ,-xGrM9r.#n0 - nx ,-
(-G,-rM9.8 u+-(08x , 7888ox!oGOWggzWyOxGgzWyOxGxyzxxx(r(r7 g£zWyOxG  x' /o   - 0
- ,l8 4 x(  -8 -8, l8*! ! 4  ---   ,,,-xGg+2n*8t  z,-' x' .  ,   ! 4,-  o&0%,   
gr.8cI$IL*x 0G,,-(- !I0  o8 ' m.1pF,t6!wS.z%FXcur1x(8 !J0.O!s8 n  s    .n  0 - O
T0j oD,j !I.8cI$IL!  I nn      nfVNF!DLTI!!53!r1!! x  #- ox(-  (x8(z,zi!' r)(DMb
o88x(08W!Oz k68x(-(ay( z(.( E+(Dg-/ 0p## +0w#,- 60#ogM wD05.(z x0w#xG%%ZJDM% 65+
w661#6r. p7#E(!90To&p( #+(- #6O#60 #WyOh(yDOyZy0 GD! !ws(    hx-Sx9+zzgZJDM0,7o 
#yO!9i&  #N#A#B#C#D#E#F#G#H#I   #w#/w#w#!9! E9!!9(+F!"9!(#2*" "2(  *w*6!$! (( #C
ONTRMKBDLSTCAUXUSR2i*0*(q##pZ*( x2*6#"v( * 26"!"""2""v2"!"(!8O6*"w(6(2(-()(6 (8 
0 (* y(#+ (( 66 #6 #"* yo p .##(.6w4. *##55 *R8*#" £ *#w+#+*('k!0(k!8!-#827kwO$6
s  #r$£6 k ((qk( (   k  *O ##.q4((*4q*##62*((6-#RM8(G A#*'C! !TRUEFALSE!9N#Y#(G#
     "(k((!0(!!2Sz0*6##ww#w$w#w ##N#F*B2w#w#s#r"*-w#ww##""2ZR0*4#42ZR *4 #4(22*f
(/G(##++ O x yC! Q*G(##..f*##w  +4 #4x 2G(""*n*0SZR8*N#F#s#r,0)jS*##w+N#FBr+s2!T
)j)00 R!#*#V#N#F##V20*6#-Nw#Fwq#p#6#w#w#w""!DM!"*B!(2"!"2"*w#wx(9*O *-4 #4!*4 #4
*-N#Fq#pV+Bq#pSZR&*s#r$s#rL*L!(!$22L!(*$(!3 1!(7" 2"S"Ns#FrB(Z#(*"K! !*#"!x * *)
 2""!"*nf(HR0nf"  VMDnfutqp*s#r*s#r"*uKB!0' #fo"*R0RnfR0KqputsrNF(VNFV*SutKqpR*R
(wwnfut"6#K*K*!""*NFy(*"*B0Cnf*R*"*RSs#r#V""6#O"w2x2*"!F""  &y*"*2"*"!F"""!* Nr!
6go(R*s#r£2x(sx(TDMx(R0U(O/o&9q# (!F0#(  ( #(  ((#( i&T-a%o*!6o&2 2z2*KB" z C  U
ser break+   I/O  Run-time error , PC*Not enough memory  Program aborted  '1!d!d
dB       M E N U     1 Entree de la fonction    2 Developper des produits  (  3 
Developper des puissances entieres    4 Calcul de valeurs de f(x)    5 Derivees 
de la fonction    6 Developpements limites    7 Fin du pe('N. de la fonction (1 
a 9)')  inumfonc  if finil then lirfonction(fi)  write('Developpement au voisina
ge de a')re  $N$A$B$C$D$E$F$G$H$I  function   menuinteger    begin  clrscr  writ
elnwriteln(' M E N U ')  writelnwriteln('1 Entree de la fonction')  writelnwrite
ln('2 Calcul de valeurs de f(x)')  writelnwriteln('3 Graphes de fonctions')  wri
telnwriteln('4 Fin du programme')  writelnwriteln(' VOTRE CHOIX ')  readln(choix
)menuchoix  end    function numfoncinteger  var jinteger    begin  car' '  repea
t  read(kbd,car)  until ((car'0') and (car''))  writeln  val(car,j,result)  numf
oncj  end    procedure  graphe(revoirinteger)  forward    procedure boucle  var 
zinteger  begin  repeat  choixmenu  case choix of   1    begin         write('No
 de la fonction (1 a 9)')         inumfonc         clrscrcar' '         lirfonct
ion(fi)         simplif(fi)         tempo         end   2    begin         clrsc
rwrite('No de la fonction (1 a 9)')         inumfonc         if mi0 then        
 begin         for z1 to mi do         begin         write('Valeur du parametre 
n.')write(z)write(' ')readln(pz,i)         end         end         calculfonctio
n(fi)         end   3    graphe(0)    end  until choix4  end    amille de courbe
s.     Pour entrer les parametres p(i), i etant le numero du parametre,    i dev
ant etre compris entre 1 et 3.          SI VOUS N'ENTREZ PAS CORRECTEMENT VOTRE 
FONCTION VOUS AUREZ    UN MESSAGE D'ERREUR ET UN NUMERO      erreur n.1 p n'e  p
rocedure  graphe    var  xo,yo,xxd,xxa,ux,uy,pasreal  xp,yp,nbfonc,z,bk,index,ch
oixbisinteger  precedeboolean  fx,fyarray1..10 of integer  ldaarray1..20 of real
  begin   clrscr    if revoir0 then    begin     writeln('1-Courbe yf(x)')writel
n     writeln('2-Courbe xf(t)yf(t)')writeln     writeln('3-Courbe polaire rf(t)'
)writeln     write('Votre choix ')     repeat     read(kbd,car)     until ((car'
0') and (car'4'))     writeln     val(car,choix,result)     writeln    end    wr
iteln    write('Abscisse origine ')readln(xo)    write('Ordonnee origine ')readl
n(yo)    write('Borne inferieure int d''etude ')readln(xxd)    write('Borne supe
rieure int d''etude ')readln(xxa)    write('Unite abscisse ')readln(ux)    write
('Unite ordonnee ')readln(uy)    write('Pas d''etude ')readln(pas)    if revoir0
 then   begin    write('Nombre de graphes sur le meme ecran (1 a 9)')    nbfoncn
umfonc    index0    for z1 to nbfonc do    begin     case choix of      1 begin 
       write('No de la fonction yf(x) n.',z,' ')fxznumfonc        if ffxznil the
n lirfonction(ffxz)        if mfxz0 then        begin for bk1 to mfxz do        
   begin indexindex+1write('Valeur du parametre n.',bk,' ')           readln(lda
index)           end        end       end      2 begin        write('No de la fo
nction xf(t) n.',z,' ')fxznumfonc        if ffxznil then lirfonction(ffxz)      
  if mfxz0 then        begin for bk1 to mfxz do           begin  indexindex+1wri
te('Valeur du parametre n.',bk,' ')           readln(ldaindex)           end    
    end        write('No de la fonction yf(t) n.',z,' ')fyznumfonc        if ffy
znil then lirfonction(ffyz)        if mfyz0 then        begin for bk1 to mfyz do
           begin  indexindex+1write('Valeur du parametre n.',bk,' ')           r
eadln(ldaindex)           end        end      end      3 begin       write('No d
e la fonction rf(t) n.',z,' ')fxznumfonc       if ffxznil then lirfonction(ffxz)
       if mfxz0 then       begin for bk1 to mfxz do           begin  indexindex+
1write('Valeur du parametre n.',bk,' ')           readln(ldaindex)           end
       end       end      end     end   end    clrscr    origin(round(xo),round(
yo))    grafmove(0,0)drawr(640-round(xo),0)drawr(-640,0)    grafmove(0,0)drawr(0
,400-round(yo))drawr(0,-400)    grafmove(round(ux),0)drawr(0,5)drawr(0,-10)    %
N%A%B%C%D%E%F%G%H%I  grafmove(0,round(uy))drawr(5,0)drawr(-10,0)    index0    fo
r z1 to nbfonc do    begin    case choix of    1 begin    xxxdprecedefalse    if
 revoir0 then    begin      if mfxz0 then       begin for bk1 to mfxz do        
   begin           indexindex+1pbk,fxzldaindex           end       end    end   
 while xxxa do    begin    definitrueifxz           resultatcalcul(ffxz,x)      
     if ((definitrue) and (abs(resultat)1000)) then begin                       
         xpround(x*ux)                                ypround(resultat*uy)      
                          if precedefalse then plot(xp,yp)                      
          else draw(xp,yp)                                precedetrue           
                    end                               else                      
         precedefalse          xx+pas       end      end     2 begin     xxxdpre
cedefalse     if revoir0 then     begin      if mfxz0 then      begin for bk1 to
 mfxz do           begin           indexindex+1pbk,fxzldaindex           end    
  end      if mfyz0 then      begin for bk1 to mfyz do           begin          
 indexindex+1pbk,fyzldaindex           end      end     end     while xxxa do   
  begin     definitrueifxz            resultatcalcul(ffxz,x)            if ((def
initrue) and (abs(resultat)1000)) then begin            xpround(resultat*ux)ifyz
            resultatcalcul(ffyz,x)            if ((definitrue) and (abs(resultat
)1000)) then begin            ypround(resultat*uy)            if precedefalse th
en plot(xp,yp) else draw(xp,yp)            precedetrue            end           
 else precedefalse            end            else precedefalse         xx+pas   
    end     end    3begin    xxxdprecedefalse    if revoir0 then    begin     if
 mfxz0 then     begin  for bk1 to mfxz do           begin           indexindex+1
pbk,fxzldaindex           end     end    end    while xxxa do    begin     defin
itrueifxz           resultatcalcul(ffxz,x)           if ((definitrue) and (abs(r
esultat)1000)) then           begin             xpround(resultat*cos(x)*ux)     
        ypround(resultat*sin(x)*uy)             if precedefalse then plot(xp,yp)
 else draw(xp,yp)             precedetrue           end           else          
 precedefalse         xx+pas      end     end    end    end    gotoxy(1,24)eux m
odules         -- FONCTION.COM pour ce qui est calcul formel, derivation et     
     developpements limites.         -- COURBE.COM pour ce qui est etude graphiq
ue.        Les barrieres aux entrees sont tres limitees, vous pouvez       plant
er tout a loisir ces programmes...       ************* Les entrees de fonctions 
**************************     Vous devez entrer TOUS les symboles operatoires  
  *,+,-,/, avec les parentheses indispensables.     Exemple 3*x2-cos(2*x) ou (2*
x+1)2 ou (x-1)-2              (2*x+1)/(3*x-5)     Les fonctions suivantes sont d
efinies        ln  logaritme neperien,        exp fonction exponentielle,       
 sin sinus, cos cosinus, tang tangente,        (les arcs sont exprimes en RADIAN
S)        sqrt radical ou racine carree,        sh   sinus hyperbolique, ch cosi
nus hyperbolique,        th   tangente hyperbolique,        arcsin arcsinus, fon
ction reciproque de sinus,        arccos arccosinus reciproque de cosinus,      
  arctan arctangente reciproque de tangente,       Toutes ces fonctions sont der
ivables formellement.     Deux fonctions supplementaires qu'il vaut mieux eviter
 de deriver        int partie entiere,        abs valeur absolue.     Vous pouve
z entrer des parametres tres utiles pour l'etude graphique   d'une famille de co
urbes.     Pour entrer les parametres p(i), i etant le numero du parametre,    i
 devant etre compris entre 1 et 3.          SI VOUS N'ENTREZ PAS CORRECTEMENT VO
TRE FONCTION VOUS AUREZ    UN MESSAGE D'ERREUR ET UN NUMERO      erreur n.1 p n'
est pas suivi de (    erreur n.2 p(i n'est pas suivi de )    erreur n.3 par exem
ple cos(3*x n'est pas suivi de )    erreur n.4 vous n'avez pas ouvert de parenth
ese apres une fonction                ex cos3    erreur n.5 l'identificateur de 
fonction est inconnu, ex log(..,    erreur n.6 le nombre que vous avez entre ne 
peut etre interprete                ex 0.1.2    erreur n.7 vous ne fermez pas la
 parenthese ouverte pour un facteur,    erreur n.8 vous commencez un facteur de 
maniere  &N&A&B&C&D&E&F&G&H&I incorrecte,    erreur n.9 vous entrez une expressi
on incorrecte,                ex ((3*x+1)/(x-2) puis ENTER        LES LIMITES DE
S DIMENSIONNEMENTS DE VARIABLES      Une fonction ne peut comporter plus de 250 
caracteres...    Vous pouvez entrer a la fois 10 fonctions numerotees de 1 a 10,
    le numero 0 etant reserve pour des usages internes aux programmes.    Pour l
es graphes, un maximum de 10 graphes sur le meme ecran.        ********** Le cal
cul algebrique *************************************      Deux options      deve
lopper les produits    exemple (3*x-2)*(x2-5*x+3) deviendra (3*x3-17*x2+19*x-6) 
   cette option est appliquee automatiquement aux derivees.      developper les 
puissances entieres    ex (x+2)3 deviendra (x3+6*x2+12*x+8)      ************* L
a derivation ****************************************      Vous pouvez avoir l'e
criture de la derivee de votre fonction,    (sauf si celle-ci contient INT ou AB
S)    cette derivee aura le numero de votre choix et vous pourrez lui    appliqu
er l'ensemble du menu, donc evidemment la deriver....        ************* Les c
alculs numeriques ******************************      Vous pouvez avoir la valeu
r numerique de votre fonction pour tout x,    si votre fonction contient un ou d
es parametres, il vous sera demande    leur(s) valeur(s).      Si la fonction n'
est pas definie, cela vous sera indique.    Ainsi si vous avez f1(x)sqrt(2-x) et
 si vous entrez x3    vous aurez le message f1(3) n'est pas definie.        ****
********* Les developpements limites ***************************      Vous aurez
 le developpement limite de votre fonction au voisinage    de x0 a l'ordre que v
ous desirez..    N'abusez pas  demander le developpement limite de       f1(x)ar
csin(3*x2-5*x) a l'ordre 6      vous amenera apres un temps certain le message  
     RUN-TIME ERROR FF, PC....       CELA VEUT DIRE QUE L'ESPACE ALLOUE AUX POIN
TEURS EST ENTRE EN    COLLISION AVEC L'ESPACE ALLOUE AUX PROCEDURES RECURSIVES  
    Les uns et les autres ne manquant pas dans ces programmes....       ********
**** Les graphes *******************************************     AU CHOIX     CO
URBES yf(x)     COURBES PARAMETRIQUES xf(t), yg(t)     COURBES EN COORDONNEES PO
LAIRES rf(t)     Pour chacun de ces choix il vous est demande    --- l'origine (
 centre de l'ecran 320,200 )    --- l'unite des abscisses et des ordonnes ( en p
oints-ecran )    --- l'intervalle d'etude pour x si yf(x) pour t dans les autres
 cas    --- le pas d'etude, intervalle entre le calcul de deux valeurs     PUIS 
    Le nombre de graphes sur le meme ecran     --- a partir de plusieurs fonctio
ns pour une etude comparative     --- une fonction et plusieurs valeurs du ou de
s parametre(s)     Le trace du ou des graphe(s) termine vous pouvez faire   une 
HARDCOPY de votre ecran sur imprimante compatible EPSON    *********** QUELQUES 
ASTUCES *****************************************     Pour gagner du temps      
  Pour les developpements limites       employer les exposants negatifs ou fract
ionnaires       ex (1+x)-1 au lieu de 1/(1+x)        ou (3-x)0.5 au lieu de sqrt
(3-x)        permettra une execution beaucoup plus rapide.        Pour developpe
r une puissance entiere       ex (x2-3*x+2)4       demander le developpement lim
ite de cette fonction       au voisinage de a0 et a l'ordre, degre du polynome (
ici 8)       donnera une execution tres rapide.      ********** POUR LES POSSESS
EURS DE TURBO PASCAL ***********************     Avec les programmes sources il 
est possible de     ++++ fractionner ces programmes pour les executer sous CPM 2
   ++++ enrichir le menu         par exemple resolution de f(x)0   ++++ enrichir
 le catalogue de fonctions definies         Argsh, Argch, Argth  ou encore log d
ecimal...   ++++ ecrire les fonctions sous la forme classique                   
            2        3*x2-5*x+3 devenant 3x -5x+3   ++++ personnaliser le menu .
     MAIS CELA N'EST POSSIBLE QU'EN ALLEGEANT LE MENU ACTUEL......    **********
*************************************************************  COPYRIGHT Michel 
HIRTZLER                                Decembre  1986  ************************
***********************************************!N!!,-O!!N!!N!"!*fz"*R!,!!2!,!,E!
2!*+)#V"!!*+)#V+)#V!,M-!*&!!,!£oEh!,  'N'A'B'C'D'E'F'G'H'Iwrite('1 Imprimer 2 Re
voir 3 Retour au menu')    repeat    read(kbd,car)    until ((car'0') and (car'4
'))    val(car,choixbis,result)    if choixbis1 then     begin     gotoxy(1,24)w
rite('                                           ')     origin(0,0)vidage     en
d    if choixbis2 then    graphe(1)  endVotre choix  !!D *&!0*&!4£oER *&e.!!  Ab
scisse!!,!£oEa!,!,!,"!,!,!,"*&!Ea**Oa**5O!2a!2!,!,!*#sZ!!*1 Imprimer 2 Revoir 3 
Retour au menu !!D *&!0*&!4£oE+b*&e.!!*!Eb!!+                                   
         !!PP*!Eb!pM"!! fz3c"!*+)!s#r!*+)!s#r*#b! ! 1PsM !PP*!E!pM"!! fz"choixbi
s,result)    if choixbis1 then     begin     gotoxy(1,24)write('                
                           ')     origin(0,0)vidage     end    if choixbis2 then
    graphe(1)  endVotre choix  !!D *&!0*&!4£oER *&e.!!  Abscisse Imprimer 2 Revo
ir 3 Retour au menu')    repeat    read(kbd,car)    until ((car'0') and (car'4')
)    val(car,choix,result)    if choix1 then     begin     gotoxy(1,24)write('  
                                         ')     origin(0,0)vidage     end    if 
choix2 then    graphe(1)  end              !!P*!b!pM "!! fzc"!*+)!s#"*+)!s#r*#
Tous droits réservés. Reproduction sans autorisation interdite. © Kukulcan