MAT
FILE INFORMATION
FILENAME(S): MAT
FILE TYPE(S): PRG
FILE SIZE: 15.6K
FIRST SEEN: 2025-11-02 16:39:16
APPEARS ON: 4 disk(s)
FILE HASH
f6a7bd4c8ac7862a6ecb6b5b2db8720cf1300315e7eba985a6015bbfbccb75a4
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MATHEMATIK I | MAT | PRG | Treasure Chest - Plattfuss | 27 | 6 | DOWNLOAD FILE |
| MATHEMATIK I | MAT | PRG | Treasure Chest - Plattfuss | 27 | 6 | DOWNLOAD FILE |
| L EHRNEN | MAT | PRG | Treasure Chest - Wolfgang Rauprich | 26 | 1 | DOWNLOAD FILE |
| FREESOFT DISK NR | MAT | PRG | Treasure Chest - Wolfgang Rauprich | 26 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 00 00 47 B2 31 30 3A 48 B2 31 30 3A |..&...G.10:H.10:|
00000010: 89 31 30 30 30 30 3A 20 8F 20 53 2E 20 43 48 49 |.10000: . S. CHI|
00000020: 50 20 31 2F 38 35 00 4E 08 01 00 8F 22 B0 C0 C0 |P 1/85.N...."...|
00000030: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000040: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 00 76 |...............v|
00000050: 08 02 00 8F 22 DD D5 C9 D5 C9 D5 C0 C9 C0 B2 C0 |...."...........|
00000060: 20 20 20 20 20 48 45 4E 52 59 20 53 54 52 41 55 | HENRY STRAU|
00000070: 53 53 20 20 20 DD 00 9E 08 03 00 8F 22 DD DD CA |SS ......."...|
00000080: CB DD AB C0 B3 20 DD 20 20 20 50 45 54 45 52 53 |..... . PETERS|
00000090: 49 4C 49 45 4E 53 54 52 2E 20 31 2D 33 DD 00 C6 |ILIENSTR. 1-3...|
000000A0: 08 04 00 8F 22 DD 20 20 20 20 20 20 20 20 20 20 |....". |
000000B0: 20 20 20 33 33 30 30 20 42 52 41 55 4E 53 43 48 | 3300 BRAUNSCH|
000000C0: 57 45 49 47 20 DD 00 EE 08 05 00 8F 22 DD 56 45 |WEIG .......".VE|
000000D0: 52 53 49 4F 4E 20 31 2E 33 20 20 20 54 45 4C 2E |RSION 1.3 TEL.|
000000E0: 20 30 35 33 31 2F 34 36 37 39 33 20 20 DD 00 16 | 0531/46793 ...|
000000F0: 09 06 00 8F 22 DD 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |....".----------|
00000100: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000110: 2D 2D 2D 2D 2D DD 00 3E 09 07 00 8F 22 DD 46 55 |-----..>....".FU|
00000120: 45 52 20 35 20 44 4D 20 45 52 48 41 4C 54 45 4E |ER 5 DM ERHALTEN|
00000130: 20 53 49 45 20 42 45 49 20 4D 49 52 20 DD 00 66 | SIE BEI MIR ..f|
00000140: 09 08 00 8F 22 DD 45 49 4E 45 20 33 30 2D 53 45 |....".EINE 30-SE|
00000150: 49 54 49 47 45 20 44 4F 4B 55 4D 45 4E 54 41 54 |ITIGE DOKUMENTAT|
00000160: 49 4F 4E 2E 20 DD 00 8E 09 09 00 8F 22 AD C0 C0 |ION. ......."...|
00000170: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000180: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 00 9A |................|
00000190: 09 0A 00 8F 20 4D 45 4E 55 45 00 BC 09 14 00 99 |.... MENUE......|
000001A0: 20 43 24 3B 53 24 3B 22 20 20 20 4D 41 54 52 49 | C$;S$;" MATRI|
000001B0: 5A 45 4E 2D 41 4C 47 45 42 52 41 22 00 CA 09 1E |ZEN-ALGEBRA"....|
000001C0: 00 81 20 49 B2 31 20 A4 20 37 00 E1 09 28 00 99 |.. I.1 . 7...(..|
000001D0: 3A 20 99 20 57 24 3B 49 3B 42 24 3B 4D 24 28 49 |: . W$;I;B$;M$(I|
000001E0: 29 00 E9 09 32 00 82 20 49 00 0A 0A 3C 00 A1 20 |)...2.. I...<.. |
000001F0: 4D 24 3A 20 8B 20 4D 24 B3 22 31 22 20 B0 20 4D |M$: . M$."1" . M|
00000200: 24 B1 22 37 22 20 89 20 36 30 00 2A 0A 46 00 4D |$."7" . 60.*.F.M|
00000210: 4F B2 C5 28 4D 24 29 3A 20 99 20 43 24 3B 53 24 |O..(M$): . C$;S$|
00000220: 3B 4D 24 28 4D 4F 29 3B 42 24 00 4E 0A 50 00 91 |;M$(MO);B$.N.P..|
00000230: 4D 4F 8D 31 30 30 2C 32 30 30 2C 33 30 30 2C 34 |MO.100,200,300,4|
00000240: 30 30 2C 35 30 30 2C 36 30 30 2C 37 30 30 00 5F |00,500,600,700._|
00000250: 0A 5A 00 8D 20 38 35 30 30 3A 20 89 20 31 30 00 |.Z.. 8500: . 10.|
00000260: 71 0A 64 00 8F 20 55 50 4E 2D 52 45 43 48 4E 45 |q.d.. UPN-RECHNE|
00000270: 52 00 89 0A 6E 00 99 20 57 24 3B 22 3E 3E 3E 20 |R...n.. W$;">>> |
00000280: 22 3B 3A 20 4F 24 B2 22 22 00 A1 0A 78 00 A1 20 |";: O$.""...x.. |
00000290: 45 24 3A 20 8B 20 45 24 B2 22 22 20 A7 20 31 32 |E$: . E$."" . 12|
000002A0: 30 00 B3 0A 82 00 8B 20 45 24 B2 44 24 20 A7 20 |0...... E$.D$ . |
000002B0: 31 33 35 00 C7 0A 83 00 99 20 45 24 3B 3A 20 4F |135...... E$;: O|
000002C0: 24 B2 4F 24 AA 45 24 00 DB 0A 84 00 8B 20 C3 28 |$.O$.E$...... .(|
000002D0: 4F 24 29 B2 33 20 A7 20 31 35 30 00 E5 0A 85 00 |O$).3 . 150.....|
000002E0: 89 20 31 32 30 00 F9 0A 87 00 8B 20 C3 28 4F 24 |. 120...... .(O$|
000002F0: 29 B3 31 20 A7 20 31 32 30 00 0E 0B 88 00 4F 24 |).1 . 120.....O$|
00000300: B2 C8 28 4F 24 2C C3 28 4F 24 29 AB 31 29 00 1D |..(O$,.(O$).1)..|
00000310: 0B 89 00 99 20 4C 24 22 20 22 4C 24 3B 00 27 0B |.... L$" "L$;.'.|
00000320: 8A 00 89 20 31 32 30 00 35 0B 96 00 99 20 42 24 |... 120.5.... B$|
00000330: 3A 20 4F B2 30 00 44 0B 97 00 81 20 49 B2 31 20 |: O.0.D.... I.1 |
00000340: A4 20 34 32 00 60 0B 98 00 8B 20 4F 24 B2 4F 24 |. 42.`.... O$.O$|
00000350: 28 49 29 20 A7 20 4F B2 49 3A 20 89 20 31 36 30 |(I) . O.I: . 160|
00000360: 00 68 0B 99 00 82 20 49 00 7B 0B 9A 00 8B 20 4F |.h.... I.{.... O|
00000370: 24 B2 22 52 45 54 22 20 A7 20 8E 00 8E 0B 9B 00 |$."RET" . ......|
00000380: 99 20 46 24 28 31 29 3A 20 89 20 31 30 30 00 A2 |. F$(1): . 100..|
00000390: 0B A0 00 49 B2 B5 28 28 4F AB 31 29 AD 31 32 29 |...I..((O.1).12)|
000003A0: AA 31 00 BE 0B A1 00 4A B2 B5 28 28 4F AB 31 32 |.1.....J..((O.12|
000003B0: AC 28 49 AB 31 29 AB 31 29 AD 33 29 AA 31 00 D7 |.(I.1).1).3).1..|
000003C0: 0B A2 00 4B B2 4F AB 31 32 AC 28 49 AB 31 29 AB |...K.O.12.(I.1).|
000003D0: 33 AC 28 4A AB 31 29 00 F1 0B A3 00 91 20 49 20 |3.(J.1)...... I |
000003E0: 89 20 31 36 34 2C 31 36 35 2C 31 36 36 2C 31 36 |. 164,165,166,16|
000003F0: 37 00 0B 0C A4 00 91 20 4A 20 89 20 31 36 38 2C |7...... J . 168,|
00000400: 31 36 39 2C 31 37 30 2C 31 37 31 00 25 0C A5 00 |169,170,171.%...|
00000410: 91 20 4A 20 89 20 31 37 32 2C 31 37 33 2C 31 37 |. J . 172,173,17|
00000420: 34 2C 31 37 35 00 3F 0C A6 00 91 20 4A 20 89 20 |4,175.?.... J . |
00000430: 31 37 36 2C 31 37 37 2C 31 37 38 2C 31 37 39 00 |176,177,178,179.|
00000440: 51 0C A7 00 91 20 4A 20 89 20 31 38 30 2C 31 38 |Q.... J . 180,18|
00000450: 31 00 71 0C A8 00 91 20 4B 20 8D 20 31 31 30 30 |1.q.... K . 1100|
00000460: 2C 31 32 30 30 2C 31 33 30 30 3A 20 89 20 31 30 |,1200,1300: . 10|
00000470: 30 00 91 0C A9 00 91 20 4B 20 8D 20 32 31 30 30 |0...... K . 2100|
00000480: 2C 32 32 30 30 2C 32 33 30 30 3A 20 89 20 31 30 |,2200,2300: . 10|
00000490: 30 00 B1 0C AA 00 91 20 4B 20 8D 20 33 31 30 30 |0...... K . 3100|
000004A0: 2C 33 32 30 30 2C 33 33 30 30 3A 20 89 20 31 30 |,3200,3300: . 10|
000004B0: 30 00 D1 0C AB 00 91 20 4B 20 8D 20 33 34 30 30 |0...... K . 3400|
000004C0: 2C 33 34 30 30 2C 33 35 30 30 3A 20 89 20 31 30 |,3400,3500: . 10|
000004D0: 30 00 F1 0C AC 00 91 20 4B 20 8D 20 33 36 30 30 |0...... K . 3600|
000004E0: 2C 33 36 30 30 2C 33 37 30 30 3A 20 89 20 31 30 |,3600,3700: . 10|
000004F0: 30 00 11 0D AD 00 91 20 4B 20 8D 20 34 31 30 30 |0...... K . 4100|
00000500: 2C 34 32 30 30 2C 34 33 30 30 3A 20 89 20 31 30 |,4200,4300: . 10|
00000510: 30 00 31 0D AE 00 91 20 4B 20 8D 20 34 34 30 30 |0.1.... K . 4400|
00000520: 2C 34 35 30 30 2C 34 36 30 30 3A 20 89 20 31 30 |,4500,4600: . 10|
00000530: 30 00 51 0D AF 00 91 20 4B 20 8D 20 35 31 30 30 |0.Q.... K . 5100|
00000540: 2C 35 32 30 30 2C 35 33 30 30 3A 20 89 20 31 30 |,5200,5300: . 10|
00000550: 30 00 71 0D B0 00 91 20 4B 20 8D 20 35 34 30 30 |0.q.... K . 5400|
00000560: 2C 35 35 30 30 2C 35 36 30 30 3A 20 89 20 31 30 |,5500,5600: . 10|
00000570: 30 00 91 0D B1 00 91 20 4B 20 8D 20 35 37 30 30 |0...... K . 5700|
00000580: 2C 36 31 30 30 2C 36 32 30 30 3A 20 89 20 31 30 |,6100,6200: . 10|
00000590: 30 00 B1 0D B2 00 91 20 4B 20 8D 20 36 33 30 30 |0...... K . 6300|
000005A0: 2C 36 34 30 30 2C 36 35 30 30 3A 20 89 20 31 30 |,6400,6500: . 10|
000005B0: 30 00 D1 0D B3 00 91 20 4B 20 8D 20 36 36 30 30 |0...... K . 6600|
000005C0: 2C 36 37 30 30 2C 36 38 30 30 3A 20 89 20 31 30 |,6700,6800: . 10|
000005D0: 30 00 F1 0D B4 00 91 20 4B 20 8D 20 37 31 30 30 |0...... K . 7100|
000005E0: 2C 37 32 30 30 2C 37 33 30 30 3A 20 89 20 31 30 |,7200,7300: . 10|
000005F0: 30 00 11 0E B5 00 91 20 4B 20 8D 20 37 34 30 30 |0...... K . 7400|
00000600: 2C 37 35 30 30 2C 37 36 30 30 3A 20 89 20 31 30 |,7500,7600: . 10|
00000610: 30 00 31 0E C8 00 8F 20 4C 49 4E 45 41 52 45 53 |0.1.... LINEARES|
00000620: 20 47 4C 45 49 43 48 55 4E 47 53 53 59 53 54 45 | GLEICHUNGSSYSTE|
00000630: 4D 00 55 0E CD 00 99 20 22 24 24 24 20 41 4E 5A |M.U.... "$$$ ANZ|
00000640: 41 48 4C 20 44 45 52 20 47 4C 45 49 43 48 55 4E |AHL DER GLEICHUN|
00000650: 47 45 4E 22 3B 00 60 0E CE 00 85 20 4E 28 30 29 |GEN";.`.... N(0)|
00000660: 00 84 0E CF 00 99 20 22 24 24 24 20 41 4E 5A 41 |...... "$$$ ANZA|
00000670: 48 4C 20 44 45 52 20 55 4E 42 45 4B 41 4E 4E 54 |HL DER UNBEKANNT|
00000680: 45 4E 22 3B 00 8F 0E D0 00 85 20 4D 28 30 29 00 |EN";...... M(0).|
00000690: AA 0E D1 00 8D 20 38 31 30 30 3A 20 91 20 4A 4E |..... 8100: . JN|
000006A0: 20 89 20 32 30 35 2C 32 31 30 00 C4 0E D2 00 99 | . 205,210......|
000006B0: 20 22 2A 2A 2A 20 45 49 4E 47 41 42 45 20 44 45 | "*** EINGABE DE|
000006C0: 52 20 22 3B 00 E1 0E D3 00 99 20 22 4B 4F 45 46 |R ";...... "KOEF|
000006D0: 46 49 5A 49 45 4E 54 45 4E 4D 41 54 52 49 58 3A |FIZIENTENMATRIX:|
000006E0: 22 00 00 0F D4 00 5A 5A B2 4D 5A 3A 20 4D 5A B2 |".....ZZ.MZ: MZ.|
000006F0: 30 3A 20 8D 20 31 31 32 31 3A 20 4D 5A B2 5A 5A |0: . 1121: MZ.ZZ|
00000700: 00 0B 0F D7 00 8D 20 36 31 30 30 00 20 0F DC 00 |...... 6100. ...|
00000710: 8D 20 35 32 30 3A 20 52 47 B2 53 4B 41 28 30 29 |. 520: RG.SKA(0)|
00000720: 00 2B 0F E1 00 8D 20 36 34 30 30 00 45 0F E6 00 |.+.... 6400.E...|
00000730: 99 20 22 2A 2A 2A 20 45 49 4E 47 41 42 45 20 44 |. "*** EINGABE D|
00000740: 45 52 20 22 3B 00 67 0F E7 00 99 20 22 52 45 43 |ER ";.g.... "REC|
00000750: 48 54 45 4E 20 53 45 49 54 45 3A 22 3A 20 4C 28 |HTEN SEITE:": L(|
00000760: 30 29 B2 4E 28 30 29 00 86 0F E8 00 5A 5A B2 56 |0).N(0).....ZZ.V|
00000770: 5A 3A 20 56 5A B2 30 3A 20 8D 20 31 32 33 31 3A |Z: VZ.0: . 1231:|
00000780: 20 56 5A B2 5A 5A 00 90 0F EB 00 48 4F 4D B2 31 | VZ.ZZ.....HOM.1|
00000790: 00 A1 0F EC 00 81 20 49 B2 31 20 A4 20 4E 28 30 |...... I.1 . N(0|
000007A0: 29 00 B9 0F ED 00 4D 41 54 28 30 2C 49 2C 30 29 |).....MAT(0,I,0)|
000007B0: B2 56 45 4B 28 30 2C 49 29 00 D3 0F EE 00 8B 20 |.VEK(0,I)...... |
000007C0: 56 45 4B 28 30 2C 49 29 B3 B1 30 20 A7 20 48 4F |VEK(0,I)..0 . HO|
000007D0: 4D B2 30 00 DB 0F EF 00 82 20 49 00 F1 0F F0 00 |M.0...... I.....|
000007E0: 8D 20 35 32 30 3A 20 52 4E 47 B2 53 4B 41 28 30 |. 520: RNG.SKA(0|
000007F0: 29 00 0A 10 FA 00 99 20 22 5C 5C 5C 20 53 59 53 |)...... "\\\ SYS|
00000800: 54 45 4D 20 49 53 54 20 22 3B 00 25 10 FB 00 8B |TEM IST ";.%....|
00000810: 20 52 4E 47 B2 52 47 20 B0 20 48 4F 4D B2 31 20 | RNG.RG . HOM.1 |
00000820: A7 20 32 35 33 00 43 10 FC 00 99 20 22 4E 49 43 |. 253.C.... "NIC|
00000830: 48 54 20 4C 4F 45 53 42 41 52 2E 22 3A 20 89 20 |HT LOESBAR.": . |
00000840: 32 35 35 00 60 10 FD 00 8B 20 48 4F 4D B2 30 20 |255.`.... HOM.0 |
00000850: B0 20 52 4E 47 B3 4D 28 30 29 20 A7 20 32 35 36 |. RNG.M(0) . 256|
00000860: 00 7D 10 FE 00 99 20 22 4E 55 52 20 54 52 49 56 |.}.... "NUR TRIV|
00000870: 49 41 4C 20 4C 4F 45 53 42 41 52 2E 22 00 8B 10 |IAL LOESBAR."...|
00000880: FF 00 8D 20 38 32 30 30 3A 20 8E 00 A0 10 00 01 |... 8200: ......|
00000890: 8B 20 52 4E 47 B3 4D 28 30 29 20 A7 20 32 35 39 |. RNG.M(0) . 259|
000008A0: 00 BB 10 01 01 99 20 22 45 49 4E 44 45 55 54 49 |...... "EINDEUTI|
000008B0: 47 20 4C 4F 45 53 42 41 52 3A 22 00 C5 10 02 01 |G LOESBAR:".....|
000008C0: 89 20 32 36 30 00 E6 10 03 01 99 20 22 4E 49 43 |. 260...... "NIC|
000008D0: 48 54 20 45 49 4E 44 45 55 54 49 47 20 4C 4F 45 |HT EINDEUTIG LOE|
000008E0: 53 42 41 52 3A 22 00 F8 10 04 01 8B 20 31 B1 52 |SBAR:"...... 1.R|
000008F0: 4E 47 20 A7 20 32 37 30 00 16 11 05 01 81 20 49 |NG . 270...... I|
00000900: B2 31 20 A4 20 52 4E 47 3A 20 43 B2 4D 41 54 28 |.1 . RNG: C.MAT(|
00000910: 30 2C 49 2C 49 29 00 32 11 06 01 4D 41 54 28 30 |0,I,I).2...MAT(0|
00000920: 2C 49 2C 30 29 B2 4D 41 54 28 30 2C 49 2C 30 29 |,I,0).MAT(0,I,0)|
00000930: AD 43 00 43 11 07 01 81 20 4A B2 49 20 A4 20 4D |.C.C.... J.I . M|
00000940: 28 30 29 00 5F 11 08 01 4D 41 54 28 30 2C 49 2C |(0)._...MAT(0,I,|
00000950: 4A 29 B2 4D 41 54 28 30 2C 49 2C 4A 29 AD 43 00 |J).MAT(0,I,J).C.|
00000960: 69 11 09 01 82 20 4A 2C 49 00 7B 11 0E 01 8B 20 |i.... J,I.{.... |
00000970: 52 4E 47 B3 32 20 A7 20 32 38 30 00 90 11 0F 01 |RNG.2 . 280.....|
00000980: 81 20 4A B2 52 4E 47 20 A4 20 32 20 A9 20 AB 31 |. J.RNG . 2 . .1|
00000990: 00 AE 11 10 01 81 20 49 B2 31 20 A4 20 4A AB 31 |...... I.1 . J.1|
000009A0: 3A 20 43 B2 4D 41 54 28 30 2C 49 2C 4A 29 00 D5 |: C.MAT(0,I,J)..|
000009B0: 11 11 01 4D 41 54 28 30 2C 49 2C 30 29 B2 4D 41 |...MAT(0,I,0).MA|
000009C0: 54 28 30 2C 49 2C 30 29 AB 43 AC 4D 41 54 28 30 |T(0,I,0).C.MAT(0|
000009D0: 2C 4A 2C 30 29 00 EC 11 12 01 8B 20 52 4E 47 AA |,J,0)...... RNG.|
000009E0: 31 B1 4D 28 30 29 20 A7 20 32 37 38 00 01 12 13 |1.M(0) . 278....|
000009F0: 01 81 20 4C B2 52 4E 47 AA 31 20 A4 20 4D 28 30 |.. L.RNG.1 . M(0|
00000A00: 29 00 28 12 14 01 4D 41 54 28 30 2C 49 2C 4C 29 |).(...MAT(0,I,L)|
00000A10: B2 4D 41 54 28 30 2C 49 2C 4C 29 AB 43 AC 4D 41 |.MAT(0,I,L).C.MA|
00000A20: 54 28 30 2C 4A 2C 4C 29 00 30 12 15 01 82 20 4C |T(0,J,L).0.... L|
00000A30: 00 3A 12 16 01 82 20 49 2C 4A 00 4C 12 18 01 8B |.:.... I,J.L....|
00000A40: 20 48 4F 4D B2 31 20 A7 20 32 38 35 00 5D 12 19 | HOM.1 . 285.]..|
00000A50: 01 81 20 4A B2 31 20 A4 20 4D 28 30 29 00 81 12 |.. J.1 . M(0)...|
00000A60: 1A 01 99 20 22 23 23 23 20 28 20 22 3B 4D 41 54 |... "### ( ";MAT|
00000A70: 28 30 2C 4D 41 54 28 30 2C 30 2C 4A 29 2C 30 29 |(0,MAT(0,0,J),0)|
00000A80: 3B 00 8F 12 1B 01 99 20 A3 32 30 29 22 29 22 00 |;...... .20)")".|
00000A90: 97 12 1C 01 82 20 4A 00 AE 12 1D 01 8B 20 52 4E |..... J...... RN|
00000AA0: 47 AA 31 B1 4D 28 30 29 20 A7 20 32 39 30 00 C3 |G.1.M(0) . 290..|
00000AB0: 12 1E 01 81 20 49 B2 52 4E 47 AA 31 20 A4 20 4D |.... I.RNG.1 . M|
00000AC0: 28 30 29 00 D8 12 1F 01 81 20 4A B2 52 4E 47 AA |(0)...... J.RNG.|
00000AD0: 31 20 A4 20 4D 28 30 29 00 ED 12 20 01 4D 41 54 |1 . M(0)... .MAT|
00000AE0: 28 30 2C 49 2C 4A 29 B2 28 49 B2 4A 29 00 F7 12 |(0,I,J).(I.J)...|
00000AF0: 21 01 82 20 4A 2C 49 00 0E 13 22 01 8B 20 52 4E |!.. J,I...".. RN|
00000B00: 47 AA 31 B1 4D 28 30 29 20 A7 20 32 39 39 00 23 |G.1.M(0) . 299.#|
00000B10: 13 23 01 8B 20 48 4F 4D B2 30 20 A7 20 8D 20 38 |.#.. HOM.0 . . 8|
00000B20: 33 30 30 00 38 13 24 01 81 20 4C B2 52 4E 47 AA |300.8.$.. L.RNG.|
00000B30: 31 20 A4 20 4D 28 30 29 00 49 13 25 01 81 20 49 |1 . M(0).I.%.. I|
00000B40: B2 31 20 A4 20 4D 28 30 29 00 6D 13 26 01 99 20 |.1 . M(0).m.&.. |
00000B50: 22 23 23 23 20 5B 20 22 3B 4D 41 54 28 30 2C 4D |"### [ ";MAT(0,M|
00000B60: 41 54 28 30 2C 30 2C 49 29 2C 4C 29 3B 00 7B 13 |AT(0,0,I),L);.{.|
00000B70: 27 01 99 20 A3 32 30 29 22 5D 22 00 93 13 28 01 |'.. .20)"]"...(.|
00000B80: 82 20 49 3A 20 8B 20 4C B2 4D 28 30 29 20 A7 20 |. I: . L.M(0) . |
00000B90: 32 39 38 00 9E 13 29 01 8D 20 38 33 30 30 00 A6 |298...).. 8300..|
00000BA0: 13 2A 01 82 20 4C 00 B4 13 2B 01 8D 20 38 32 30 |.*.. L...+.. 820|
00000BB0: 30 3A 20 8E 00 CF 13 2C 01 8F 20 49 4E 56 45 52 |0: ....,.. INVER|
00000BC0: 53 45 20 45 49 4E 45 52 20 4D 41 54 52 49 58 00 |SE EINER MATRIX.|
00000BD0: E9 13 2D 01 8B 20 4D 5A AA 31 B1 48 20 A7 20 99 |..-.. MZ.1.H . .|
00000BE0: 20 46 24 28 33 29 3A 20 8E 00 09 14 31 01 99 20 | F$(3): ....1.. |
00000BF0: 22 24 24 24 20 4F 52 44 4E 55 4E 47 20 44 45 52 |"$$$ ORDNUNG DER|
00000C00: 20 4D 41 54 52 49 58 22 3B 00 1F 14 32 01 85 20 | MATRIX";...2.. |
00000C10: 4E 28 30 29 3A 20 4D 28 30 29 B2 4E 28 30 29 00 |N(0): M(0).N(0).|
00000C20: 3A 14 33 01 8D 20 38 31 30 30 3A 20 91 20 4A 4E |:.3.. 8100: . JN|
00000C30: 20 89 20 33 30 35 2C 33 31 30 00 59 14 36 01 5A | . 305,310.Y.6.Z|
00000C40: 5A B2 4D 5A 3A 20 4D 5A B2 30 3A 20 8D 20 31 31 |Z.MZ: MZ.0: . 11|
00000C50: 32 30 3A 20 4D 5A B2 5A 5A 00 64 14 3B 01 8D 20 |20: MZ.ZZ.d.;.. |
00000C60: 36 31 30 30 00 83 14 40 01 8D 20 35 32 30 3A 20 |6100...@.. 520: |
00000C70: 8B 20 53 4B 41 28 30 29 B2 4E 28 30 29 20 A7 20 |. SKA(0).N(0) . |
00000C80: 33 33 30 00 9B 14 45 01 99 20 46 24 28 32 29 3A |330...E.. F$(2):|
00000C90: 20 8B 20 4D 4F B2 31 20 A7 20 8E 00 A9 14 46 01 | . MO.1 . ....F.|
00000CA0: 8D 20 38 32 30 30 3A 20 8E 00 C8 14 4A 01 81 20 |. 8200: ....J.. |
00000CB0: 49 B2 31 20 A4 20 4E 28 30 29 3A 20 81 20 4A B2 |I.1 . N(0): . J.|
00000CC0: 31 20 A4 20 4E 28 30 29 00 DE 14 4B 01 4D 41 54 |1 . N(0)...K.MAT|
00000CD0: 28 30 2C 49 2C 4A 29 B2 AB 28 49 B2 4A 29 00 E8 |(0,I,J)..(I.J)..|
00000CE0: 14 4C 01 82 20 4A 2C 49 00 FD 14 4D 01 8B 20 31 |.L.. J,I...M.. 1|
00000CF0: B1 4E 28 30 29 AB 31 20 A7 20 33 36 30 00 10 15 |.N(0).1 . 360...|
00000D00: 4E 01 81 20 4A B2 31 20 A4 20 4E 28 30 29 AB 31 |N.. J.1 . N(0).1|
00000D10: 00 2A 15 4F 01 50 B2 B6 28 4D 41 54 28 4D 5A 2C |.*.O.P..(MAT(MZ,|
00000D20: 4A 2C 4A 29 29 3A 20 52 B2 4A 00 3D 15 50 01 81 |J,J)): R.J.=.P..|
00000D30: 20 49 B2 4A AA 31 20 A4 20 4E 28 30 29 00 5B 15 | I.J.1 . N(0).[.|
00000D40: 51 01 8B 20 B6 28 4D 41 54 28 4D 5A 2C 49 2C 4A |Q.. .(MAT(MZ,I,J|
00000D50: 29 29 B3 B2 50 20 A7 20 33 33 39 00 75 15 52 01 |))..P . 339.u.R.|
00000D60: 50 B2 B6 28 4D 41 54 28 4D 5A 2C 49 2C 4A 29 29 |P..(MAT(MZ,I,J))|
00000D70: 3A 20 52 B2 49 00 7D 15 53 01 82 20 49 00 8D 15 |: R.I.}.S.. I...|
00000D80: 54 01 8B 20 52 B2 4A 20 A7 20 33 35 30 00 9E 15 |T.. R.J . 350...|
00000D90: 55 01 81 20 4C B2 31 20 A4 20 4E 28 30 29 00 AF |U.. L.1 . N(0)..|
00000DA0: 15 56 01 58 B2 4D 41 54 28 30 2C 52 2C 4C 29 00 |.V.X.MAT(0,R,L).|
00000DB0: C9 15 57 01 4D 41 54 28 30 2C 52 2C 4C 29 B2 4D |..W.MAT(0,R,L).M|
00000DC0: 41 54 28 30 2C 4A 2C 4C 29 00 DA 15 58 01 4D 41 |AT(0,J,L)...X.MA|
00000DD0: 54 28 30 2C 4A 2C 4C 29 B2 58 00 EC 15 59 01 58 |T(0,J,L).X...Y.X|
00000DE0: B2 4D 41 54 28 4D 5A 2C 52 2C 4C 29 00 08 16 5A |.MAT(MZ,R,L)...Z|
00000DF0: 01 4D 41 54 28 4D 5A 2C 52 2C 4C 29 B2 4D 41 54 |.MAT(MZ,R,L).MAT|
00000E00: 28 4D 5A 2C 4A 2C 4C 29 00 1A 16 5B 01 4D 41 54 |(MZ,J,L)...[.MAT|
00000E10: 28 4D 5A 2C 4A 2C 4C 29 B2 58 00 22 16 5C 01 82 |(MZ,J,L).X.".\..|
00000E20: 20 4C 00 35 16 5E 01 81 20 4B B2 4A AA 31 20 A4 | L.5.^.. K.J.1 .|
00000E30: 20 4E 28 30 29 00 53 16 5F 01 43 B2 4D 41 54 28 | N(0).S._.C.MAT(|
00000E40: 4D 5A 2C 4B 2C 4A 29 AD 4D 41 54 28 4D 5A 2C 4A |MZ,K,J).MAT(MZ,J|
00000E50: 2C 4A 29 00 66 16 60 01 81 20 4C B2 4A AA 31 20 |,J).f.`.. L.J.1 |
00000E60: A4 20 4E 28 30 29 00 8E 16 61 01 4D 41 54 28 4D |. N(0)...a.MAT(M|
00000E70: 5A 2C 4B 2C 4C 29 B2 4D 41 28 4D 5A 2C 4B 2C 4C |Z,K,L).MA(MZ,K,L|
00000E80: 29 AB 43 AC 4D 41 28 4D 5A 2C 4A 2C 4C 29 00 96 |).C.MA(MZ,J,L)..|
00000E90: 16 62 01 82 20 4C 00 A7 16 63 01 81 20 4C B2 31 |.b.. L...c.. L.1|
00000EA0: 20 A4 20 4E 28 30 29 00 CE 16 64 01 4D 41 54 28 | . N(0)...d.MAT(|
00000EB0: 30 2C 4B 2C 4C 29 B2 4D 41 54 28 30 2C 4B 2C 4C |0,K,L).MAT(0,K,L|
00000EC0: 29 AB 43 AC 4D 41 54 28 30 2C 4A 2C 4C 29 00 DA |).C.MAT(0,J,L)..|
00000ED0: 16 65 01 82 20 4C 2C 4B 2C 4A 00 FA 16 68 01 81 |.e.. L,K,J...h..|
00000EE0: 20 49 B2 31 20 A4 20 4E 28 30 29 3A 20 43 B2 4D | I.1 . N(0): C.M|
00000EF0: 41 54 28 4D 5A 2C 49 2C 49 29 00 0F 17 69 01 8B |AT(MZ,I,I)...i..|
00000F00: 20 49 AA 31 B1 4E 28 30 29 20 A7 20 33 36 35 00 | I.1.N(0) . 365.|
00000F10: 22 17 6A 01 81 20 4A B2 49 AA 31 20 A4 20 4E 28 |".j.. J.I.1 . N(|
00000F20: 30 29 00 40 17 6B 01 4D 41 54 28 4D 5A 2C 49 2C |0).@.k.MAT(MZ,I,|
00000F30: 4A 29 B2 4D 41 54 28 4D 5A 2C 49 2C 4A 29 AD 43 |J).MAT(MZ,I,J).C|
00000F40: 00 48 17 6C 01 82 20 4A 00 59 17 6D 01 81 20 4A |.H.l.. J.Y.m.. J|
00000F50: B2 31 20 A4 20 4E 28 30 29 00 75 17 6E 01 4D 41 |.1 . N(0).u.n.MA|
00000F60: 54 28 30 2C 49 2C 4A 29 B2 4D 41 54 28 30 2C 49 |T(0,I,J).MAT(0,I|
00000F70: 2C 4A 29 AD 43 00 7F 17 6F 01 82 20 4A 2C 49 00 |,J).C...o.. J,I.|
00000F80: 92 17 72 01 8B 20 4E 28 30 29 B3 32 20 A7 20 33 |..r.. N(0).2 . 3|
00000F90: 38 30 00 A8 17 73 01 81 20 4A B2 4E 28 30 29 20 |80...s.. J.N(0) |
00000FA0: A4 20 32 20 A9 20 AB 31 00 C7 17 74 01 81 20 49 |. 2 . .1...t.. I|
00000FB0: B2 31 20 A4 20 4A AB 31 3A 20 43 B2 4D 41 54 28 |.1 . J.1: C.MAT(|
00000FC0: 4D 5A 2C 49 2C 4A 29 00 D8 17 75 01 81 20 4C B2 |MZ,I,J)...u.. L.|
00000FD0: 31 20 A4 20 4E 28 30 29 00 FF 17 76 01 4D 41 54 |1 . N(0)...v.MAT|
00000FE0: 28 30 2C 49 2C 4C 29 B2 4D 41 54 28 30 2C 49 2C |(0,I,L).MAT(0,I,|
00000FF0: 4C 29 AB 43 AC 4D 41 54 28 30 2C 4A 2C 4C 29 00 |L).C.MAT(0,J,L).|
00001000: 0B 18 77 01 82 20 4C 2C 49 2C 4A 00 17 18 7C 01 |..w.. L,I,J...|.|
00001010: 4D 5A B2 4D 5A AB 31 00 26 18 81 01 8B 20 4D 4F |MZ.MZ.1.&.... MO|
00001020: B2 31 20 A7 20 8E 00 42 18 86 01 99 20 22 2A 2A |.1 . ..B.... "**|
00001030: 2A 20 49 4E 56 45 52 53 45 20 4D 41 54 52 49 58 |* INVERSE MATRIX|
00001040: 3A 22 00 61 18 87 01 5A 5A B2 4D 5A 3A 20 4D 5A |:".a...ZZ.MZ: MZ|
00001050: B2 30 3A 20 8D 20 32 31 31 31 3A 20 4D 5A B2 5A |.0: . 2111: MZ.Z|
00001060: 5A 00 6F 18 8B 01 8D 20 38 32 30 30 3A 20 8E 00 |Z.o.... 8200: ..|
00001070: 8F 18 90 01 8F 20 44 45 54 45 52 4D 49 4E 41 4E |..... DETERMINAN|
00001080: 54 45 20 45 49 4E 45 52 20 4D 41 54 52 49 58 00 |TE EINER MATRIX.|
00001090: AF 18 9A 01 99 20 22 24 24 24 20 4F 52 44 4E 55 |..... "$$$ ORDNU|
000010A0: 4E 47 20 44 45 52 20 4D 41 54 52 49 58 22 3B 00 |NG DER MATRIX";.|
000010B0: C5 18 9B 01 85 20 4E 28 30 29 3A 20 4D 28 30 29 |..... N(0): M(0)|
000010C0: B2 4E 28 30 29 00 E0 18 9F 01 8D 20 38 31 30 30 |.N(0)...... 8100|
000010D0: 3A 20 91 20 4A 4E 20 89 20 34 31 30 2C 34 32 30 |: . JN . 410,420|
000010E0: 00 FF 18 A4 01 5A 5A B2 4D 5A 3A 20 4D 5A B2 30 |.....ZZ.MZ: MZ.0|
000010F0: 3A 20 8D 20 31 31 32 30 3A 20 4D 5A B2 5A 5A 00 |: . 1120: MZ.ZZ.|
00001100: 09 19 AE 01 8D 20 39 30 30 00 24 19 B8 01 53 4B |..... 900.$...SK|
00001110: 41 28 30 29 B2 28 AB 31 29 AE 4D 41 54 28 30 2C |A(0).(.1).MAT(0,|
00001120: 30 2C 30 29 00 35 19 C2 01 81 20 49 B2 31 20 A4 |0,0).5.... I.1 .|
00001130: 20 4E 28 30 29 00 52 19 C3 01 53 4B 41 28 30 29 | N(0).R...SKA(0)|
00001140: B2 53 4B 41 28 30 29 AC 4D 41 54 28 30 2C 49 2C |.SKA(0).MAT(0,I,|
00001150: 49 29 00 5A 19 C4 01 82 20 49 00 69 19 CC 01 8B |I).Z.... I.i....|
00001160: 20 4D 4F B2 31 20 A7 20 8E 00 8B 19 D6 01 99 20 | MO.1 . ....... |
00001170: 22 23 23 23 20 44 45 54 45 52 4D 49 4E 41 4E 54 |"### DETERMINANT|
00001180: 45 20 3D 20 22 53 4B 41 28 30 29 00 99 19 E0 01 |E = "SKA(0).....|
00001190: 8D 20 38 32 30 30 3A 20 8E 00 B1 19 F4 01 8F 20 |. 8200: ....... |
000011A0: 52 41 4E 47 20 45 49 4E 45 52 20 4D 41 54 52 49 |RANG EINER MATRI|
000011B0: 58 00 D0 19 FE 01 5A 5A B2 4D 5A 3A 20 4D 5A B2 |X.....ZZ.MZ: MZ.|
000011C0: 30 3A 20 8D 20 31 31 31 30 3A 20 4D 5A B2 5A 5A |0: . 1110: MZ.ZZ|
000011D0: 00 DA 19 08 02 8D 20 39 30 30 00 E9 19 12 02 81 |...... 900......|
000011E0: 20 49 B2 31 20 A4 20 4E 4D 00 02 1A 13 02 8B 20 | I.1 . NM...... |
000011F0: 4D 41 54 28 30 2C 49 2C 49 29 B2 30 20 A7 20 35 |MAT(0,I,I).0 . 5|
00001200: 33 35 00 0A 1A 14 02 82 20 49 00 19 1A 17 02 53 |35...... I.....S|
00001210: 4B 41 28 30 29 B2 49 AB 31 00 28 1A 1C 02 8B 20 |KA(0).I.1.(.... |
00001220: 4D 4F B3 35 20 A7 20 8E 00 41 1A 26 02 99 20 22 |MO.5 . ..A.&.. "|
00001230: 23 23 23 20 52 41 4E 47 20 3D 22 53 4B 41 28 30 |### RANG ="SKA(0|
00001240: 29 00 4F 1A 30 02 8D 20 38 32 30 30 3A 20 8E 00 |).O.0.. 8200: ..|
00001250: 73 1A 58 02 8F 20 53 4B 41 4C 41 52 50 52 4F 44 |s.X.. SKALARPROD|
00001260: 55 4B 54 20 5A 57 45 49 45 52 20 56 45 4B 54 4F |UKT ZWEIER VEKTO|
00001270: 52 45 4E 00 8D 1A 59 02 8B 20 56 5A AA 31 B1 48 |REN...Y.. VZ.1.H|
00001280: 20 A7 20 99 20 46 24 28 33 29 3A 20 8E 00 A6 1A | . . F$(3): ....|
00001290: 62 02 99 20 22 24 24 24 20 41 4E 5A 41 48 4C 20 |b.. "$$$ ANZAHL |
000012A0: 44 45 52 20 22 3B 00 BF 1A 63 02 85 20 22 4B 4F |DER ";...c.. "KO|
000012B0: 4D 50 4F 4E 45 4E 54 45 4E 22 3B 4C 28 30 29 00 |MPONENTEN";L(0).|
000012C0: DA 1A 67 02 8D 20 38 31 30 30 3A 20 91 20 4A 4E |..g.. 8100: . JN|
000012D0: 20 89 20 36 31 30 2C 36 32 30 00 FD 1A 6C 02 99 | . 610,620...l..|
000012E0: 20 22 2A 2A 2A 20 45 49 4E 47 41 42 45 20 44 45 | "*** EINGABE DE|
000012F0: 53 20 31 2E 56 45 4B 54 4F 52 53 3A 22 00 1B 1B |S 1.VEKTORS:"...|
00001300: 6D 02 5A 5A B2 30 3A 20 56 5A B2 30 3A 20 8D 20 |m.ZZ.0: VZ.0: . |
00001310: 31 32 33 31 3A 20 56 5A B2 5A 5A 00 3E 1B 71 02 |1231: VZ.ZZ.>.q.|
00001320: 99 20 22 2A 2A 2A 20 45 49 4E 47 41 42 45 20 44 |. "*** EINGABE D|
00001330: 45 53 20 32 2E 56 45 4B 54 4F 52 53 3A 22 00 5E |ES 2.VEKTORS:".^|
00001340: 1B 72 02 56 5A B2 56 5A AA 31 3A 20 4C 28 56 5A |.r.VZ.VZ.1: L(VZ|
00001350: 29 B2 4C 28 30 29 3A 20 8D 20 31 32 33 31 00 6B |).L(0): . 1231.k|
00001360: 1B 76 02 53 4B 41 28 30 29 B2 30 00 7C 1B 77 02 |.v.SKA(0).0.|.w.|
00001370: 81 20 4B B2 31 20 A4 20 4C 28 30 29 00 A1 1B 78 |. K.1 . L(0)...x|
00001380: 02 53 4B 41 28 30 29 B2 53 4B 41 28 30 29 AA 56 |.SKA(0).SKA(0).V|
00001390: 45 4B 28 30 2C 4B 29 AC 56 45 4B 28 56 5A 2C 4B |EK(0,K).VEK(VZ,K|
000013A0: 29 00 B2 1B 79 02 82 20 4B 3A 20 56 5A B2 56 5A |)...y.. K: VZ.VZ|
000013B0: AB 31 00 C1 1B 80 02 8B 20 4D 4F B2 31 20 A7 20 |.1...... MO.1 . |
000013C0: 8E 00 E4 1B 8A 02 99 20 22 23 23 23 20 53 4B 41 |....... "### SKA|
000013D0: 4C 41 52 50 52 4F 44 55 4B 54 20 3D 20 22 53 4B |LARPRODUKT = "SK|
000013E0: 41 28 30 29 00 F2 1B 94 02 8D 20 38 32 30 30 3A |A(0)...... 8200:|
000013F0: 20 8E 00 0B 1C BC 02 8F 20 4E 4F 52 4D 20 45 49 | ....... NORM EI|
00001400: 4E 45 53 20 56 45 4B 54 4F 52 53 00 24 1C C6 02 |NES VEKTORS.$...|
00001410: 99 20 22 24 24 24 20 41 4E 5A 41 48 4C 20 44 45 |. "$$$ ANZAHL DE|
00001420: 52 20 22 3B 00 3D 1C C7 02 85 20 22 4B 4F 4D 50 |R ";.=.... "KOMP|
00001430: 4F 4E 45 4E 54 45 4E 22 3B 4C 28 30 29 00 58 1C |ONENTEN";L(0).X.|
00001440: CB 02 8D 20 38 31 30 30 3A 20 91 20 4A 4E 20 89 |... 8100: . JN .|
00001450: 20 37 31 30 2C 37 32 30 00 77 1C D0 02 5A 5A B2 | 710,720.w...ZZ.|
00001460: 56 5A 3A 20 56 5A B2 30 3A 20 8D 20 31 32 33 31 |VZ: VZ.0: . 1231|
00001470: 3A 20 56 5A B2 5A 5A 00 84 1C DA 02 53 4B 41 28 |: VZ.ZZ.....SKA(|
00001480: 30 29 B2 30 00 95 1C DB 02 81 20 4B B2 31 20 A4 |0).0...... K.1 .|
00001490: 20 4C 28 30 29 00 B9 1C DC 02 53 4B 41 28 30 29 | L(0).....SKA(0)|
000014A0: B2 53 4B 41 28 30 29 AA 56 45 4B 28 30 2C 4B 29 |.SKA(0).VEK(0,K)|
000014B0: AC 56 45 4B 28 30 2C 4B 29 00 C1 1C DD 02 82 20 |.VEK(0,K)...... |
000014C0: 4B 00 D6 1C DE 02 53 4B 41 28 30 29 B2 BA 28 53 |K.....SKA(0)..(S|
000014D0: 4B 41 28 30 29 29 00 E5 1C E4 02 8B 20 4D 4F B2 |KA(0))...... MO.|
000014E0: 31 20 A7 20 8E 00 FF 1C EE 02 99 20 22 23 23 23 |1 . ....... "###|
000014F0: 20 4E 4F 52 4D 20 3D 20 22 53 4B 41 28 30 29 00 | NORM = "SKA(0).|
00001500: 0D 1D F8 02 8D 20 38 32 30 30 3A 20 8E 00 2F 1D |..... 8200: ../.|
00001510: 84 03 8F 20 47 41 55 53 53 2D 45 4C 49 4D 49 4E |... GAUSS-ELIMIN|
00001520: 41 54 49 4F 4E 20 4D 49 54 20 50 49 56 4F 54 00 |ATION MIT PIVOT.|
00001530: 51 1D 8E 03 81 20 4A B2 30 20 A4 20 4D 28 30 29 |Q.... J.0 . M(0)|
00001540: 3A 20 4D 41 54 28 30 2C 30 2C 4A 29 B2 4A 3A 20 |: MAT(0,0,J).J: |
00001550: 82 00 72 1D 93 03 4E 4D B2 4E 28 30 29 3A 20 8B |..r...NM.N(0): .|
00001560: 20 4D 28 30 29 B3 4E 4D 20 A7 20 4E 4D B2 4D 28 | M(0).NM . NM.M(|
00001570: 30 29 00 81 1D 98 03 81 20 4A B2 31 20 A4 20 4E |0)...... J.1 . N|
00001580: 4D 00 9F 1D 99 03 50 B2 B6 28 4D 41 54 28 30 2C |M.....P..(MAT(0,|
00001590: 4A 2C 4A 29 29 3A 20 52 B2 4A 3A 20 53 B2 4A 00 |J,J)): R.J: S.J.|
000015A0: B2 1D 9A 03 8B 20 4A AA 31 B1 4E 4D 20 A7 20 39 |..... J.1.NM . 9|
000015B0: 33 30 00 C5 1D 9B 03 81 20 49 B2 4A AA 31 20 A4 |30...... I.J.1 .|
000015C0: 20 4E 28 30 29 00 E2 1D 9C 03 8B 20 B6 28 4D 41 | N(0)...... .(MA|
000015D0: 54 28 30 2C 49 2C 4A 29 29 B3 B2 50 20 A7 20 39 |T(0,I,J))..P . 9|
000015E0: 32 36 00 FB 1D 9D 03 50 B2 B6 28 4D 41 54 28 30 |26.....P..(MAT(0|
000015F0: 2C 49 2C 4A 29 29 3A 20 52 B2 49 00 03 1E 9E 03 |,I,J)): R.I.....|
00001600: 82 20 49 00 16 1E A2 03 8B 20 50 B1 31 45 AB 35 |. I...... P.1E.5|
00001610: 20 A7 20 39 37 30 00 27 1E AC 03 81 20 4B B2 4A | . 970.'.... K.J|
00001620: 20 A4 20 4E 28 30 29 00 3C 1E AD 03 8B 20 4A AA | . N(0).<.... J.|
00001630: 31 B1 4D 28 30 29 20 A7 20 39 34 36 00 4F 1E AE |1.M(0) . 946.O..|
00001640: 03 81 20 4C B2 4A AA 31 20 A4 20 4D 28 30 29 00 |.. L.J.1 . M(0).|
00001650: 6C 1E AF 03 8B 20 B6 28 4D 41 54 28 30 2C 4B 2C |l.... .(MAT(0,K,|
00001660: 4C 29 29 B3 B2 50 20 A7 20 39 34 35 00 8A 1E B0 |L))..P . 945....|
00001670: 03 50 B2 B6 28 4D 41 54 28 30 2C 4B 2C 4C 29 29 |.P..(MAT(0,K,L))|
00001680: 3A 20 52 B2 4B 3A 20 53 B2 4C 00 92 1E B1 03 82 |: R.K: S.L......|
00001690: 20 4C 00 AF 1E B2 03 8B 20 B6 28 4D 41 54 28 30 | L...... .(MAT(0|
000016A0: 2C 4B 2C 30 29 29 B3 B2 50 20 A7 20 39 34 38 00 |,K,0))..P . 948.|
000016B0: CD 1E B3 03 50 B2 B6 28 4D 41 54 28 30 2C 4B 2C |....P..(MAT(0,K,|
000016C0: 30 29 29 3A 20 52 B2 4B 3A 20 53 B2 30 00 D5 1E |0)): R.K: S.0...|
000016D0: B4 03 82 20 4B 00 E8 1E B6 03 8B 20 50 B1 31 45 |... K...... P.1E|
000016E0: AB 35 20 A7 20 39 36 30 00 00 1F BB 03 4D 41 54 |.5 . 960.....MAT|
000016F0: 28 30 2C 4A 2C 4A 29 B2 30 3A 20 89 20 39 39 30 |(0,J,J).0: . 990|
00001700: 00 11 1F C0 03 81 20 4B B2 30 20 A4 20 4E 28 30 |...... K.0 . N(0|
00001710: 29 00 22 1F C1 03 58 B2 4D 41 54 28 30 2C 4B 2C |)."...X.MAT(0,K,|
00001720: 53 29 00 3C 1F C2 03 4D 41 54 28 30 2C 4B 2C 53 |S).<...MAT(0,K,S|
00001730: 29 B2 4D 41 54 28 30 2C 4B 2C 4A 29 00 4D 1F C3 |).MAT(0,K,J).M..|
00001740: 03 4D 41 54 28 30 2C 4B 2C 4A 29 B2 58 00 55 1F |.MAT(0,K,J).X.U.|
00001750: C4 03 82 20 4B 00 71 1F C5 03 4D 41 54 28 30 2C |... K.q...MAT(0,|
00001760: 30 2C 30 29 B2 4D 41 54 28 30 2C 30 2C 30 29 AA |0,0).MAT(0,0,0).|
00001770: 31 00 81 1F CA 03 8B 20 52 B2 4A 20 A7 20 39 38 |1...... R.J . 98|
00001780: 30 00 92 1F CB 03 81 20 4C B2 30 20 A4 20 4D 28 |0...... L.0 . M(|
00001790: 30 29 00 A3 1F CC 03 58 B2 4D 41 54 28 30 2C 52 |0).....X.MAT(0,R|
000017A0: 2C 4C 29 00 BD 1F CD 03 4D 41 54 28 30 2C 52 2C |,L).....MAT(0,R,|
000017B0: 4C 29 B2 4D 41 54 28 30 2C 4A 2C 4C 29 00 CE 1F |L).MAT(0,J,L)...|
000017C0: CE 03 4D 41 54 28 30 2C 4A 2C 4C 29 B2 58 00 D6 |..MAT(0,J,L).X..|
000017D0: 1F CF 03 82 20 4C 00 F2 1F D0 03 4D 41 54 28 30 |.... L.....MAT(0|
000017E0: 2C 30 2C 30 29 B2 4D 41 54 28 30 2C 30 2C 30 29 |,0,0).MAT(0,0,0)|
000017F0: AA 31 00 07 20 D4 03 8B 20 4A AA 31 B1 4E 28 30 |.1.. ... J.1.N(0|
00001800: 29 20 A7 20 39 38 39 00 1A 20 D5 03 81 20 4B B2 |) . 989.. ... K.|
00001810: 4A AA 31 20 A4 20 4E 28 30 29 00 36 20 D6 03 43 |J.1 . N(0).6 ..C|
00001820: B2 4D 41 54 28 30 2C 4B 2C 4A 29 AD 4D 41 54 28 |.MAT(0,K,J).MAT(|
00001830: 30 2C 4A 2C 4A 29 00 4B 20 D7 03 8B 20 4A AA 31 |0,J,J).K ... J.1|
00001840: B1 4D 28 30 29 20 A7 20 39 38 37 00 5E 20 D8 03 |.M(0) . 987.^ ..|
00001850: 81 20 4C B2 4A AA 31 20 A4 20 4D 28 30 29 00 85 |. L.J.1 . M(0)..|
00001860: 20 D9 03 4D 41 54 28 30 2C 4B 2C 4C 29 B2 4D 41 | ..MAT(0,K,L).MA|
00001870: 54 28 30 2C 4B 2C 4C 29 AB 43 AC 4D 41 54 28 30 |T(0,K,L).C.MAT(0|
00001880: 2C 4A 2C 4C 29 00 8D 20 DA 03 82 20 4C 00 B4 20 |,J,L).. ... L.. |
00001890: DB 03 4D 41 54 28 30 2C 4B 2C 30 29 B2 4D 41 54 |..MAT(0,K,0).MAT|
000018A0: 28 30 2C 4B 2C 30 29 AB 43 AC 4D 41 54 28 30 2C |(0,K,0).C.MAT(0,|
000018B0: 4A 2C 30 29 00 BC 20 DC 03 82 20 4B 00 C4 20 DD |J,0).. ... K.. .|
000018C0: 03 82 20 4A 00 CA 20 DE 03 8E 00 D8 20 E8 03 8F |.. J.. ..... ...|
000018D0: 20 45 49 4E 47 41 42 45 00 EE 20 4C 04 8F 20 4D | EINGABE.. L.. M|
000018E0: 41 54 52 49 58 20 45 49 4E 47 45 42 45 4E 00 08 |ATRIX EINGEBEN..|
000018F0: 21 4D 04 8B 20 4D 5A AA 31 B1 48 20 A7 20 99 20 |!M.. MZ.1.H . . |
00001900: 46 24 28 33 29 3A 20 8E 00 14 21 51 04 4D 5A B2 |F$(3): ...!Q.MZ.|
00001910: 4D 5A AA 31 00 34 21 56 04 99 20 22 2A 2A 2A 20 |MZ.1.4!V.. "*** |
00001920: 47 52 4F 45 53 53 45 20 44 45 52 20 4D 41 54 52 |GROESSE DER MATR|
00001930: 49 58 3A 22 00 53 21 57 04 99 20 22 24 24 24 20 |IX:".S!W.. "$$$ |
00001940: 41 4E 5A 41 48 4C 20 44 45 52 20 5A 45 49 4C 45 |ANZAHL DER ZEILE|
00001950: 4E 22 3B 00 5F 21 58 04 85 20 4E 28 4D 5A 29 00 |N";._!X.. N(MZ).|
00001960: 7F 21 59 04 99 20 22 24 24 24 20 41 4E 5A 41 48 |.!Y.. "$$$ ANZAH|
00001970: 4C 20 44 45 52 20 53 50 41 4C 54 45 4E 22 3B 00 |L DER SPALTEN";.|
00001980: 8B 21 5A 04 85 20 4D 28 4D 5A 29 00 A8 21 5B 04 |.!Z.. M(MZ)..![.|
00001990: 8D 20 38 31 30 30 3A 20 91 20 4A 4E 20 89 20 31 |. 8100: . JN . 1|
000019A0: 31 31 30 2C 31 31 32 30 00 C9 21 60 04 99 20 22 |110,1120..!`.. "|
000019B0: 2A 2A 2A 20 5A 45 49 4C 45 4E 57 45 49 53 45 20 |*** ZEILENWEISE |
000019C0: 45 49 4E 47 41 42 45 3A 22 00 EA 21 61 04 81 20 |EINGABE:"..!a.. |
000019D0: 49 B2 31 20 A4 20 4E 28 4D 5A 29 3A 20 81 20 4A |I.1 . N(MZ): . J|
000019E0: B2 31 20 A4 20 4D 28 4D 5A 29 00 08 22 62 04 99 |.1 . M(MZ).."b..|
000019F0: 20 22 25 25 25 20 4D 41 54 20 28 22 49 22 2C 22 | "%%% MAT ("I","|
00001A00: 4A 22 29 20 3D 20 22 3B 00 1A 22 63 04 85 20 4D |J") = ";.."c.. M|
00001A10: 41 54 28 4D 5A 2C 49 2C 4A 29 00 24 22 64 04 82 |AT(MZ,I,J).$"d..|
00001A20: 20 4A 2C 49 00 41 22 6A 04 8D 20 38 31 30 30 3A | J,I.A"j.. 8100:|
00001A30: 20 91 20 4A 4E 20 89 20 31 31 34 30 2C 31 31 35 | . JN . 1140,115|
00001A40: 30 00 5E 22 74 04 99 20 22 2A 2A 2A 20 45 4C 45 |0.^"t.. "*** ELE|
00001A50: 4D 45 4E 54 20 41 4E 47 45 42 45 4E 3A 22 00 7B |MENT ANGEBEN:".{|
00001A60: 22 75 04 85 20 22 24 24 24 20 5A 45 49 4C 45 2C |"u.. "$$$ ZEILE,|
00001A70: 53 50 41 4C 54 45 22 3B 49 2C 4A 00 99 22 76 04 |SPALTE";I,J.."v.|
00001A80: 99 20 22 25 25 25 20 4D 41 54 20 28 22 49 22 2C |. "%%% MAT ("I",|
00001A90: 22 4A 22 29 20 3D 20 22 3B 00 AB 22 77 04 85 20 |"J") = ";.."w.. |
00001AA0: 4D 41 54 28 4D 5A 2C 49 2C 4A 29 00 B6 22 78 04 |MAT(MZ,I,J).."x.|
00001AB0: 89 20 31 31 33 30 00 BC 22 7E 04 8E 00 D2 22 B0 |. 1130.."~....".|
00001AC0: 04 8F 20 56 45 4B 54 4F 52 20 45 49 4E 47 45 42 |.. VEKTOR EINGEB|
00001AD0: 45 4E 00 EC 22 B1 04 8B 20 56 5A AA 31 B1 48 20 |EN.."... VZ.1.H |
00001AE0: A7 20 99 20 46 24 28 33 29 3A 20 8E 00 F8 22 B5 |. . F$(3): ...".|
00001AF0: 04 56 5A B2 56 5A AA 31 00 19 23 BA 04 99 20 22 |.VZ.VZ.1..#... "|
00001B00: 26 26 26 20 5A 45 49 4C 45 20 4F 44 45 52 20 53 |&&& ZEILE ODER S|
00001B10: 50 41 4C 54 45 3F 20 22 3B 00 33 23 BB 04 A1 20 |PALTE? ";.3#... |
00001B20: 45 24 3A 20 8B 20 45 24 B2 22 2A 22 20 A7 20 31 |E$: . E$."*" . 1|
00001B30: 32 31 39 00 47 23 BC 04 8B 20 45 24 B2 22 5A 22 |219.G#... E$."Z"|
00001B40: 20 A7 20 31 32 31 35 00 5B 23 BD 04 8B 20 45 24 | . 1215.[#... E$|
00001B50: B2 22 53 22 20 A7 20 31 32 31 37 00 66 23 BE 04 |."S" . 1217.f#..|
00001B60: 89 20 31 32 31 31 00 82 23 BF 04 99 20 22 5A 45 |. 1211..#... "ZE|
00001B70: 49 4C 45 22 3A 20 56 45 4B 28 56 5A 2C 30 29 B2 |ILE": VEK(VZ,0).|
00001B80: AB 31 00 8D 23 C0 04 89 20 31 32 32 30 00 AA 23 |.1..#... 1220..#|
00001B90: C1 04 99 20 22 53 50 41 4C 54 45 22 3A 20 56 45 |... "SPALTE": VE|
00001BA0: 4B 28 56 5A 2C 30 29 B2 AA 31 00 B5 23 C2 04 89 |K(VZ,0)..1..#...|
00001BB0: 20 31 32 32 30 00 CB 23 C3 04 99 20 45 24 3A 20 | 1220..#... E$: |
00001BC0: 56 45 4B 28 56 5A 2C 30 29 B2 30 00 E4 23 C4 04 |VEK(VZ,0).0..#..|
00001BD0: 99 20 22 24 24 24 20 41 4E 5A 41 48 4C 20 44 45 |. "$$$ ANZAHL DE|
00001BE0: 52 20 22 3B 00 FE 23 C5 04 85 20 22 4B 4F 4D 50 |R ";..#... "KOMP|
00001BF0: 4F 4E 45 4E 54 45 4E 22 3B 4C 28 56 5A 29 00 1B |ONENTEN";L(VZ)..|
00001C00: 24 C9 04 8D 20 38 31 30 30 3A 20 91 20 4A 4E 20 |$... 8100: . JN |
00001C10: 89 20 31 32 31 30 2C 31 32 33 30 00 3C 24 CE 04 |. 1210,1230.<$..|
00001C20: 99 20 22 2A 2A 2A 20 45 49 4E 47 41 42 45 20 44 |. "*** EINGABE D|
00001C30: 45 53 20 56 45 4B 54 4F 52 53 3A 22 00 4E 24 CF |ES VEKTORS:".N$.|
00001C40: 04 81 20 4B B2 31 20 A4 20 4C 28 56 5A 29 00 68 |.. K.1 . L(VZ).h|
00001C50: 24 D0 04 99 20 22 25 25 25 20 56 45 4B 20 28 22 |$... "%%% VEK ("|
00001C60: 4B 22 29 20 3D 20 22 3B 00 78 24 D1 04 85 20 56 |K") = ";.x$... V|
00001C70: 45 4B 28 56 5A 2C 4B 29 00 80 24 D2 04 82 20 4B |EK(VZ,K)..$... K|
00001C80: 00 9D 24 D8 04 8D 20 38 31 30 30 3A 20 91 20 4A |..$... 8100: . J|
00001C90: 4E 20 89 20 31 32 35 30 2C 31 32 36 30 00 BD 24 |N . 1250,1260..$|
00001CA0: E2 04 85 20 22 24 24 24 20 57 45 4C 43 48 45 20 |... "$$$ WELCHE |
00001CB0: 4B 4F 4D 50 4F 4E 45 4E 54 45 22 3B 4B 00 D7 24 |KOMPONENTE";K..$|
00001CC0: E3 04 99 20 22 25 25 25 20 56 45 4B 20 28 22 4B |... "%%% VEK ("K|
00001CD0: 22 29 20 3D 20 22 3B 00 E7 24 E4 04 85 20 56 45 |") = ";..$... VE|
00001CE0: 4B 28 56 5A 2C 4B 29 00 F2 24 E5 04 89 20 31 32 |K(VZ,K)..$... 12|
00001CF0: 34 30 00 F8 24 EC 04 8E 00 0E 25 14 05 8F 20 53 |40..$.....%... S|
00001D00: 4B 41 4C 41 52 20 45 49 4E 47 45 42 45 4E 00 28 |KALAR EINGEBEN.(|
00001D10: 25 15 05 8B 20 53 5A AA 31 B1 48 20 A7 20 99 20 |%... SZ.1.H . . |
00001D20: 46 24 28 33 29 3A 20 8E 00 34 25 19 05 53 5A B2 |F$(3): ..4%..SZ.|
00001D30: 53 5A AA 31 00 55 25 1E 05 99 20 22 2A 2A 2A 20 |SZ.1.U%... "*** |
00001D40: 45 49 4E 47 41 42 45 20 44 45 53 20 53 4B 41 4C |EINGABE DES SKAL|
00001D50: 41 52 53 3A 22 00 70 25 1F 05 85 20 22 25 25 25 |ARS:".p%... "%%%|
00001D60: 20 53 4B 41 20 3D 20 22 3B 53 4B 41 28 53 5A 29 | SKA = ";SKA(SZ)|
00001D70: 00 8D 25 28 05 8D 20 38 31 30 30 3A 20 91 20 4A |..%(.. 8100: . J|
00001D80: 4E 20 89 20 31 33 31 31 2C 31 33 33 30 00 93 25 |N . 1311,1330..%|
00001D90: 32 05 8E 00 A1 25 D0 07 8F 20 41 55 53 47 41 42 |2....%... AUSGAB|
00001DA0: 45 00 B7 25 34 08 8F 20 4D 41 54 52 49 58 20 41 |E..%4.. MATRIX A|
00001DB0: 55 53 47 45 42 45 4E 00 CF 25 35 08 8B 20 4D 5A |USGEBEN..%5.. MZ|
00001DC0: B3 31 20 A7 20 99 20 46 24 28 34 29 3A 20 8E 00 |.1 . . F$(4): ..|
00001DD0: E5 25 3E 08 99 20 22 2A 2A 2A 20 45 52 47 45 42 |.%>.. "*** ERGEB|
00001DE0: 4E 49 53 3A 22 00 F7 25 3F 08 81 20 49 B2 31 20 |NIS:"..%?.. I.1 |
00001DF0: A4 20 4E 28 4D 5A 29 00 09 26 40 08 81 20 4A B2 |. N(MZ)..&@.. J.|
00001E00: 31 20 A4 20 4D 28 4D 5A 29 00 27 26 41 08 99 20 |1 . M(MZ).'&A.. |
00001E10: 22 23 23 23 20 4D 41 54 20 28 22 49 22 2C 22 4A |"### MAT ("I","J|
00001E20: 22 29 20 3D 20 22 3B 00 39 26 42 08 99 20 4D 41 |") = ";.9&B.. MA|
00001E30: 54 28 4D 5A 2C 49 2C 4A 29 00 41 26 43 08 82 20 |T(MZ,I,J).A&C.. |
00001E40: 4A 00 56 26 44 08 8B 20 49 B2 4E 28 4D 5A 29 20 |J.V&D.. I.N(MZ) |
00001E50: A7 20 32 31 31 38 00 61 26 45 08 8D 20 38 33 30 |. 2118.a&E.. 830|
00001E60: 30 00 69 26 46 08 82 20 49 00 6F 26 48 08 8E 00 |0.i&F.. I.o&H...|
00001E70: 85 26 98 08 8F 20 56 45 4B 54 4F 52 20 41 55 53 |.&... VEKTOR AUS|
00001E80: 47 45 42 45 4E 00 9D 26 99 08 8B 20 56 5A B3 31 |GEBEN..&... VZ.1|
00001E90: 20 A7 20 99 20 46 24 28 34 29 3A 20 8E 00 B4 26 | . . F$(4): ...&|
00001EA0: A2 08 99 20 22 2A 2A 2A 20 45 52 47 45 42 4E 49 |... "*** ERGEBNI|
00001EB0: 53 20 22 3B 00 D7 26 A3 08 91 20 56 45 4B 28 56 |S ";..&... VEK(V|
00001EC0: 5A 2C 30 29 AA 32 20 89 20 32 32 31 32 2C 32 32 |Z,0).2 . 2212,22|
00001ED0: 31 33 2C 32 32 31 34 00 F0 26 A4 08 99 20 22 28 |13,2214..&... "(|
00001EE0: 5A 45 49 4C 45 29 3A 22 3A 20 89 20 32 32 31 35 |ZEILE):": . 2215|
00001EF0: 00 05 27 A5 08 99 20 22 28 2A 29 3A 22 3A 20 89 |..'... "(*):": .|
00001F00: 20 32 32 31 35 00 17 27 A6 08 99 20 22 28 53 50 | 2215..'... "(SP|
00001F10: 41 4C 54 45 29 3A 22 00 29 27 A7 08 81 20 4B B2 |ALTE):".)'... K.|
00001F20: 31 20 A4 20 4C 28 56 5A 29 00 4B 27 A8 08 99 20 |1 . L(VZ).K'... |
00001F30: 22 23 23 23 20 56 45 4B 20 28 22 4B 22 29 20 3D |"### VEK ("K") =|
00001F40: 20 22 56 45 4B 28 56 5A 2C 4B 29 00 53 27 A9 08 | "VEK(VZ,K).S'..|
00001F50: 82 20 4B 00 59 27 AC 08 8E 00 6F 27 FC 08 8F 20 |. K.Y'....o'... |
00001F60: 53 4B 41 4C 41 52 20 41 55 53 47 45 42 45 4E 00 |SKALAR AUSGEBEN.|
00001F70: 87 27 FD 08 8B 20 53 5A B3 31 20 A7 20 99 20 46 |.'... SZ.1 . . F|
00001F80: 24 28 34 29 3A 20 8E 00 9D 27 06 09 99 20 22 2A |$(4): ...'... "*|
00001F90: 2A 2A 20 45 52 47 45 42 4E 49 53 3A 22 00 B7 27 |** ERGEBNIS:"..'|
00001FA0: 07 09 99 20 22 23 23 23 20 53 4B 41 20 3D 20 22 |... "### SKA = "|
00001FB0: 53 4B 41 28 53 5A 29 00 BD 27 10 09 8E 00 D4 27 |SKA(SZ)..'.....'|
00001FC0: B8 0B 8F 20 4D 55 4C 54 49 50 4C 49 4B 41 54 49 |... MULTIPLIKATI|
00001FD0: 4F 4E 45 4E 00 EA 27 1C 0C 8F 20 4D 41 54 52 49 |ONEN..'... MATRI|
00001FE0: 58 20 2A 20 4D 41 54 52 49 58 00 02 28 1D 0C 8B |X * MATRIX..(...|
00001FF0: 20 4D 5A B3 32 20 A7 20 99 20 46 24 28 34 29 3A | MZ.2 . . F$(4):|
00002000: 20 8E 00 1D 28 26 0C 8B 20 4E 28 4D 5A 29 B2 4D | ...(&.. N(MZ).M|
00002010: 28 4D 5A AB 31 29 20 A7 20 33 31 32 30 00 2C 28 |(MZ.1) . 3120.,(|
00002020: 2B 0C 99 20 46 24 28 35 29 3A 20 8E 00 40 28 30 |+.. F$(5): ..@(0|
00002030: 0C 81 20 49 B2 31 20 A4 20 4E 28 4D 5A AB 31 29 |.. I.1 . N(MZ.1)|
00002040: 00 60 28 31 0C 81 20 4A B2 31 20 A4 20 4D 28 4D |.`(1.. J.1 . M(M|
00002050: 5A 29 3A 20 4D 41 54 28 30 2C 49 2C 4A 29 B2 30 |Z): MAT(0,I,J).0|
00002060: 00 72 28 32 0C 81 20 4B B2 31 20 A4 20 4E 28 4D |.r(2.. K.1 . N(M|
00002070: 5A 29 00 92 28 33 0C 58 B2 4D 41 54 28 4D 5A AB |Z)..(3.X.MAT(MZ.|
00002080: 31 2C 49 2C 4B 29 AC 4D 41 54 28 4D 5A 2C 4B 2C |1,I,K).MAT(MZ,K,|
00002090: 4A 29 00 AE 28 34 0C 4D 41 54 28 30 2C 49 2C 4A |J)..(4.MAT(0,I,J|
000020A0: 29 B2 4D 41 54 28 30 2C 49 2C 4A 29 AA 58 00 BA |).MAT(0,I,J).X..|
000020B0: 28 35 0C 82 20 4B 2C 4A 2C 49 00 D7 28 3A 0C 4E |(5.. K,J,I..(:.N|
000020C0: 28 30 29 B2 4E 28 4D 5A AB 31 29 3A 20 4D 28 30 |(0).N(MZ.1): M(0|
000020D0: 29 B2 4D 28 4D 5A 29 00 EB 28 44 0C 4D 5A B2 4D |).M(MZ)..(D.MZ.M|
000020E0: 5A AB 32 3A 20 8D 20 36 31 30 30 00 FA 28 4E 0C |Z.2: . 6100..(N.|
000020F0: 8B 20 4F B2 32 36 20 A7 20 8E 00 08 29 58 0C 8D |. O.26 . ...)X..|
00002100: 20 32 31 30 30 3A 20 8E 00 1E 29 80 0C 8F 20 4D | 2100: ...)... M|
00002110: 41 54 52 49 58 20 2A 20 56 45 4B 54 4F 52 00 36 |ATRIX * VEKTOR.6|
00002120: 29 81 0C 8B 20 4D 5A B3 31 20 A7 20 99 20 46 24 |)... MZ.1 . . F$|
00002130: 28 34 29 3A 20 8E 00 4E 29 82 0C 8B 20 56 5A B3 |(4): ..N)... VZ.|
00002140: 31 20 A7 20 99 20 46 24 28 34 29 3A 20 8E 00 68 |1 . . F$(4): ..h|
00002150: 29 8A 0C 8B 20 56 45 4B 28 56 5A 2C 30 29 B2 AA |)... VEK(VZ,0)..|
00002160: 31 20 A7 20 33 32 32 30 00 77 29 8F 0C 99 20 46 |1 . 3220.w)... F|
00002170: 24 28 36 29 3A 20 8E 00 90 29 94 0C 8B 20 4D 28 |$(6): ...)... M(|
00002180: 4D 5A 29 B2 4C 28 56 5A 29 20 A7 20 33 32 33 30 |MZ).L(VZ) . 3230|
00002190: 00 9F 29 99 0C 99 20 46 24 28 35 29 3A 20 8E 00 |..)... F$(5): ..|
000021A0: BD 29 9E 0C 81 20 4B B2 31 20 A4 20 4E 28 4D 5A |.)... K.1 . N(MZ|
000021B0: 29 3A 20 56 45 4B 28 30 2C 4B 29 B2 30 00 CF 29 |): VEK(0,K).0..)|
000021C0: 9F 0C 81 20 4A B2 31 20 A4 20 4D 28 4D 5A 29 00 |... J.1 . M(MZ).|
000021D0: EB 29 A0 0C 58 B2 4D 41 54 28 4D 5A 2C 4B 2C 4A |.)..X.MAT(MZ,K,J|
000021E0: 29 AC 56 45 4B 28 56 5A 2C 4A 29 00 03 2A A1 0C |).VEK(VZ,J)..*..|
000021F0: 56 45 4B 28 30 2C 4B 29 B2 56 45 4B 28 30 2C 4B |VEK(0,K).VEK(0,K|
00002200: 29 AA 58 00 0D 2A A2 0C 82 20 4A 2C 4B 00 29 2A |).X..*... J,K.)*|
00002210: A8 0C 4C 28 30 29 B2 4E 28 4D 5A 29 3A 20 56 45 |..L(0).N(MZ): VE|
00002220: 4B 28 30 2C 30 29 B2 AA 31 00 46 2A B2 0C 4D 5A |K(0,0)..1.F*..MZ|
00002230: B2 4D 5A AB 31 3A 20 56 5A B2 56 5A AB 31 3A 20 |.MZ.1: VZ.VZ.1: |
00002240: 8D 20 36 32 30 30 00 54 2A BC 0C 8D 20 32 32 30 |. 6200.T*... 220|
00002250: 30 3A 20 8E 00 6A 2A E4 0C 8F 20 56 45 4B 54 4F |0: ..j*... VEKTO|
00002260: 52 20 2A 20 4D 41 54 52 49 58 00 82 2A E5 0C 8B |R * MATRIX..*...|
00002270: 20 56 5A B3 31 20 A7 20 99 20 46 24 28 34 29 3A | VZ.1 . . F$(4):|
00002280: 20 8E 00 9A 2A E6 0C 8B 20 4D 5A B3 31 20 A7 20 | ...*... MZ.1 . |
00002290: 99 20 46 24 28 34 29 3A 20 8E 00 B4 2A EE 0C 8B |. F$(4): ...*...|
000022A0: 20 56 45 4B 28 56 5A 2C 30 29 B2 AB 31 20 A7 20 | VEK(VZ,0)..1 . |
000022B0: 33 33 32 30 00 C3 2A F3 0C 99 20 46 24 28 36 29 |3320..*... F$(6)|
000022C0: 3A 20 8E 00 DC 2A F8 0C 8B 20 4C 28 56 5A 29 B2 |: ...*... L(VZ).|
000022D0: 4E 28 4D 5A 29 20 A7 20 33 33 33 30 00 EB 2A FD |N(MZ) . 3330..*.|
000022E0: 0C 99 20 46 24 28 35 29 3A 20 8E 00 09 2B 02 0D |.. F$(5): ...+..|
000022F0: 81 20 4B B2 31 20 A4 20 4D 28 4D 5A 29 3A 20 56 |. K.1 . M(MZ): V|
00002300: 45 4B 28 30 2C 4B 29 B2 30 00 1B 2B 03 0D 81 20 |EK(0,K).0..+... |
00002310: 49 B2 31 20 A4 20 4E 28 4D 5A 29 00 37 2B 04 0D |I.1 . N(MZ).7+..|
00002320: 58 B2 56 45 4B 28 56 5A 2C 49 29 AC 4D 41 54 28 |X.VEK(VZ,I).MAT(|
00002330: 4D 5A 2C 49 2C 4B 29 00 4F 2B 05 0D 56 45 4B 28 |MZ,I,K).O+..VEK(|
00002340: 30 2C 4B 29 B2 56 45 4B 28 30 2C 4B 29 AA 58 00 |0,K).VEK(0,K).X.|
00002350: 59 2B 06 0D 82 20 49 2C 4B 00 75 2B 0C 0D 4C 28 |Y+... I,K.u+..L(|
00002360: 30 29 B2 4D 28 4D 5A 29 3A 20 56 45 4B 28 30 2C |0).M(MZ): VEK(0,|
00002370: 30 29 B2 AB 31 00 92 2B 16 0D 56 5A B2 56 5A AB |0)..1..+..VZ.VZ.|
00002380: 31 3A 20 4D 5A B2 4D 5A AB 31 3A 20 8D 20 36 32 |1: MZ.MZ.1: . 62|
00002390: 30 30 00 A0 2B 20 0D 8D 20 32 32 30 30 3A 20 8E |00..+ .. 2200: .|
000023A0: 00 B6 2B 48 0D 8F 20 53 4B 41 4C 41 52 20 2A 20 |..+H.. SKALAR * |
000023B0: 4D 41 54 52 49 58 00 CE 2B 49 0D 8B 20 53 5A B3 |MATRIX..+I.. SZ.|
000023C0: 31 20 A7 20 99 20 46 24 28 34 29 3A 20 8E 00 E6 |1 . . F$(4): ...|
000023D0: 2B 4A 0D 8B 20 4D 5A B3 31 20 A7 20 99 20 46 24 |+J.. MZ.1 . . F$|
000023E0: 28 34 29 3A 20 8E 00 07 2C 52 0D 81 20 49 B2 31 |(4): ...,R.. I.1|
000023F0: 20 A4 20 4E 28 4D 5A 29 3A 20 81 20 4A B2 31 20 | . N(MZ): . J.1 |
00002400: A4 20 4D 28 4D 5A 29 00 2B 2C 53 0D 4D 41 54 28 |. M(MZ).+,S.MAT(|
00002410: 4D 5A 2C 49 2C 4A 29 B2 53 4B 41 28 53 5A 29 AC |MZ,I,J).SKA(SZ).|
00002420: 4D 41 54 28 4D 5A 2C 49 2C 4A 29 00 35 2C 54 0D |MAT(MZ,I,J).5,T.|
00002430: 82 20 4A 2C 49 00 41 2C 5C 0D 53 5A B2 53 5A AB |. J,I.A,\.SZ.SZ.|
00002440: 31 00 4F 2C 66 0D 8D 20 32 31 30 30 3A 20 8E 00 |1.O,f.. 2100: ..|
00002450: 65 2C AC 0D 8F 20 56 45 4B 54 4F 52 20 2A 20 56 |e,... VEKTOR * V|
00002460: 45 4B 54 4F 52 00 7D 2C AD 0D 8B 20 56 5A B3 32 |EKTOR.},... VZ.2|
00002470: 20 A7 20 99 20 46 24 28 34 29 3A 20 8E 00 9C 2C | . . F$(4): ...,|
00002480: B1 0D 59 B2 56 45 4B 28 56 5A AB 31 2C 30 29 3A |..Y.VEK(VZ.1,0):|
00002490: 20 5A B2 56 45 4B 28 56 5A 2C 30 29 00 B0 2C B6 | Z.VEK(VZ,0)..,.|
000024A0: 0D 8B 20 59 AC 5A B2 AB 31 20 A7 20 33 35 32 30 |.. Y.Z..1 . 3520|
000024B0: 00 BF 2C BB 0D 99 20 46 24 28 37 29 3A 20 8E 00 |..,... F$(7): ..|
000024C0: DA 2C C0 0D 8B 20 4C 28 56 5A AB 31 29 B2 4C 28 |.,... L(VZ.1).L(|
000024D0: 56 5A 29 20 A7 20 33 35 33 30 00 E9 2C C5 0D 99 |VZ) . 3530..,...|
000024E0: 20 46 24 28 35 29 3A 20 8E 00 03 2D CA 0D 8B 20 | F$(5): ...-... |
000024F0: 56 45 4B 28 56 5A 2C 30 29 B2 AA 31 20 A7 20 33 |VEK(VZ,0)..1 . 3|
00002500: 35 35 30 00 1D 2D D4 0D 8B 20 4D 5A AA 31 B1 48 |550..-... MZ.1.H|
00002510: 20 A7 20 99 20 46 24 28 33 29 3A 20 8E 00 29 2D | . . F$(3): ..)-|
00002520: D5 0D 4D 5A B2 4D 5A AA 31 00 4A 2D D6 0D 81 20 |..MZ.MZ.1.J-... |
00002530: 49 B2 31 20 A4 20 4C 28 56 5A 29 3A 20 81 20 4A |I.1 . L(VZ): . J|
00002540: B2 31 20 A4 20 4C 28 56 5A 29 00 70 2D D7 0D 4D |.1 . L(VZ).p-..M|
00002550: 41 54 28 4D 5A 2C 49 2C 4A 29 B2 56 45 4B 28 56 |AT(MZ,I,J).VEK(V|
00002560: 5A AB 31 2C 49 29 AC 56 45 4B 28 56 5A 2C 4A 29 |Z.1,I).VEK(VZ,J)|
00002570: 00 7A 2D D8 0D 82 20 4A 2C 49 00 97 2D D9 0D 4E |.z-... J,I..-..N|
00002580: 28 4D 5A 29 B2 4C 28 56 5A 29 3A 20 4D 28 4D 5A |(MZ).L(VZ): M(MZ|
00002590: 29 B2 4C 28 56 5A 29 00 A3 2D DA 0D 56 5A B2 56 |).L(VZ)..-..VZ.V|
000025A0: 5A AB 32 00 B1 2D DB 0D 8D 20 32 31 30 30 3A 20 |Z.2..-... 2100: |
000025B0: 8E 00 CB 2D DE 0D 8B 20 53 5A AA 31 B1 48 20 A7 |...-... SZ.1.H .|
000025C0: 20 99 20 46 24 28 33 29 3A 20 8E 00 E2 2D DF 0D | . F$(3): ...-..|
000025D0: 53 5A B2 53 5A AA 31 3A 20 53 4B 41 28 53 5A 29 |SZ.SZ.1: SKA(SZ)|
000025E0: B2 30 00 F4 2D E0 0D 81 20 4B B2 31 20 A4 20 4C |.0..-... K.1 . L|
000025F0: 28 56 5A 29 00 10 2E E1 0D 58 B2 56 45 4B 28 56 |(VZ).....X.VEK(V|
00002600: 5A AB 31 2C 4B 29 AC 56 45 4B 28 56 5A 2C 4B 29 |Z.1,K).VEK(VZ,K)|
00002610: 00 26 2E E2 0D 53 4B 41 28 53 5A 29 B2 53 4B 41 |.&...SKA(SZ).SKA|
00002620: 28 53 5A 29 AA 58 00 2E 2E E3 0D 82 20 4B 00 3A |(SZ).X...... K.:|
00002630: 2E E4 0D 56 5A B2 56 5A AB 32 00 48 2E E5 0D 8D |...VZ.VZ.2.H....|
00002640: 20 32 33 30 30 3A 20 8E 00 5E 2E 10 0E 8F 20 53 | 2300: ..^.... S|
00002650: 4B 41 4C 41 52 20 2A 20 56 45 4B 54 4F 52 00 76 |KALAR * VEKTOR.v|
00002660: 2E 11 0E 8B 20 53 5A B3 31 20 A7 20 99 20 46 24 |.... SZ.1 . . F$|
00002670: 28 34 29 3A 20 8E 00 8E 2E 12 0E 8B 20 56 5A B3 |(4): ....... VZ.|
00002680: 31 20 A7 20 99 20 46 24 28 34 29 3A 20 8E 00 A8 |1 . . F$(4): ...|
00002690: 2E 1A 0E 8B 20 56 45 4B 28 56 5A 2C 30 29 B3 B1 |.... VEK(VZ,0)..|
000026A0: 30 20 A7 20 33 36 32 30 00 B7 2E 1F 0E 99 20 46 |0 . 3620...... F|
000026B0: 24 28 36 29 3A 20 8E 00 C9 2E 24 0E 81 20 4B B2 |$(6): ....$.. K.|
000026C0: 31 20 A4 20 4C 28 56 5A 29 00 E9 2E 25 0E 56 45 |1 . L(VZ)...%.VE|
000026D0: 4B 28 56 5A 2C 4B 29 B2 53 4B 41 28 53 5A 29 AC |K(VZ,K).SKA(SZ).|
000026E0: 56 45 4B 28 56 5A 2C 4B 29 00 F1 2E 26 0E 82 20 |VEK(VZ,K)...&.. |
000026F0: 4B 00 FD 2E 2E 0E 53 5A B2 53 5A AB 31 00 0B 2F |K.....SZ.SZ.1../|
00002700: 38 0E 8D 20 32 32 30 30 3A 20 8E 00 21 2F 74 0E |8.. 2200: ..!/t.|
00002710: 8F 20 53 4B 41 4C 41 52 20 2A 20 53 4B 41 4C 41 |. SKALAR * SKALA|
00002720: 52 00 39 2F 75 0E 8B 20 53 5A B3 32 20 A7 20 99 |R.9/u.. SZ.2 . .|
00002730: 20 46 24 28 34 29 3A 20 8E 00 59 2F 7E 0E 53 4B | F$(4): ..Y/~.SK|
00002740: 41 28 53 5A AB 31 29 B2 53 4B 41 28 53 5A AB 31 |A(SZ.1).SKA(SZ.1|
00002750: 29 AC 53 4B 41 28 53 5A 29 00 65 2F 88 0E 53 5A |).SKA(SZ).e/..SZ|
00002760: B2 53 5A AB 31 00 73 2F 92 0E 8D 20 32 33 30 30 |.SZ.1.s/... 2300|
00002770: 3A 20 8E 00 94 2F A0 0F 8F 20 41 44 44 49 54 49 |: .../... ADDITI|
00002780: 4F 4E 45 4E 20 26 20 53 55 42 54 52 41 4B 54 49 |ONEN & SUBTRAKTI|
00002790: 4F 4E 45 4E 00 AA 2F 04 10 8F 20 4D 41 54 52 49 |ONEN../... MATRI|
000027A0: 58 20 2B 20 4D 41 54 52 49 58 00 C2 2F 05 10 8B |X + MATRIX../...|
000027B0: 20 4D 5A B3 32 20 A7 20 99 20 46 24 28 34 29 3A | MZ.2 . . F$(4):|
000027C0: 20 8E 00 DD 2F 0E 10 8B 20 4E 28 4D 5A AB 31 29 | .../... N(MZ.1)|
000027D0: B2 4E 28 4D 5A 29 20 A7 20 34 31 32 30 00 EC 2F |.N(MZ) . 4120../|
000027E0: 13 10 99 20 46 24 28 35 29 3A 20 8E 00 07 30 18 |... F$(5): ...0.|
000027F0: 10 8B 20 4D 28 4D 5A AB 31 29 B2 4D 28 4D 5A 29 |.. M(MZ.1).M(MZ)|
00002800: 20 A7 20 34 31 33 30 00 16 30 1D 10 99 20 46 24 | . 4130..0... F$|
00002810: 28 35 29 3A 20 8E 00 37 30 22 10 81 20 49 B2 31 |(5): ..70".. I.1|
00002820: 20 A4 20 4E 28 4D 5A 29 3A 20 81 20 4A B2 31 20 | . N(MZ): . J.1 |
00002830: A4 20 4D 28 4D 5A 29 00 57 30 23 10 58 B2 4D 41 |. M(MZ).W0#.X.MA|
00002840: 54 28 4D 5A AB 31 2C 49 2C 4A 29 AA 4D 41 54 28 |T(MZ.1,I,J).MAT(|
00002850: 4D 5A 2C 49 2C 4A 29 00 6B 30 24 10 4D 41 54 28 |MZ,I,J).k0$.MAT(|
00002860: 4D 5A AB 31 2C 49 2C 4A 29 B2 58 00 75 30 25 10 |MZ.1,I,J).X.u0%.|
00002870: 82 20 4A 2C 49 00 81 30 2C 10 4D 5A B2 4D 5A AB |. J,I..0,.MZ.MZ.|
00002880: 31 00 8F 30 36 10 8D 20 32 31 30 30 3A 20 8E 00 |1..06.. 2100: ..|
00002890: A5 30 68 10 8F 20 56 45 4B 54 4F 52 20 2B 20 56 |.0h.. VEKTOR + V|
000028A0: 45 4B 54 4F 52 00 BD 30 69 10 8B 20 56 5A B3 32 |EKTOR..0i.. VZ.2|
000028B0: 20 A7 20 99 20 46 24 28 34 29 3A 20 8E 00 E0 30 | . . F$(4): ...0|
000028C0: 72 10 8B 20 56 45 4B 28 56 5A AB 31 2C 30 29 B2 |r.. VEK(VZ.1,0).|
000028D0: 56 45 4B 28 56 5A 2C 30 29 20 A7 20 34 32 32 30 |VEK(VZ,0) . 4220|
000028E0: 00 EF 30 77 10 99 20 46 24 28 37 29 3A 20 8E 00 |..0w.. F$(7): ..|
000028F0: 0A 31 7C 10 8B 20 4C 28 56 5A AB 31 29 B2 4C 28 |.1|.. L(VZ.1).L(|
00002900: 56 5A 29 20 A7 20 34 32 33 30 00 19 31 81 10 99 |VZ) . 4230..1...|
00002910: 20 46 24 28 35 29 3A 20 8E 00 2B 31 86 10 81 20 | F$(5): ..+1... |
00002920: 4B B2 31 20 A4 20 4C 28 56 5A 29 00 51 31 87 10 |K.1 . L(VZ).Q1..|
00002930: 56 45 4B 28 56 5A AB 31 2C 4B 29 B2 56 45 4B 28 |VEK(VZ.1,K).VEK(|
00002940: 56 5A AB 31 2C 4B 29 AA 56 45 4B 28 56 5A 2C 4B |VZ.1,K).VEK(VZ,K|
00002950: 29 00 59 31 88 10 82 20 4B 00 65 31 90 10 56 5A |).Y1... K.e1..VZ|
00002960: B2 56 5A AB 31 00 73 31 9A 10 8D 20 32 32 30 30 |.VZ.1.s1... 2200|
00002970: 3A 20 8E 00 89 31 CC 10 8F 20 53 4B 41 4C 41 52 |: ...1... SKALAR|
00002980: 20 2B 20 53 4B 41 4C 41 52 00 A1 31 CD 10 8B 20 | + SKALAR..1... |
00002990: 53 5A B3 32 20 A7 20 99 20 46 24 28 34 29 3A 20 |SZ.2 . . F$(4): |
000029A0: 8E 00 C1 31 D6 10 53 4B 41 28 53 5A AB 31 29 B2 |...1..SKA(SZ.1).|
000029B0: 53 4B 41 28 53 5A AB 31 29 AA 53 4B 41 28 53 5A |SKA(SZ.1).SKA(SZ|
000029C0: 29 00 CD 31 E0 10 53 5A B2 53 5A AB 31 00 DB 31 |)..1..SZ.SZ.1..1|
000029D0: EA 10 8D 20 32 33 30 30 3A 20 8E 00 F1 31 30 11 |... 2300: ...10.|
000029E0: 8F 20 4D 41 54 52 49 58 20 2D 20 4D 41 54 52 49 |. MATRIX - MATRI|
000029F0: 58 00 12 32 3A 11 81 20 49 B2 31 20 A4 20 4E 28 |X..2:.. I.1 . N(|
00002A00: 4D 5A 29 3A 20 81 20 4A B2 31 20 A4 20 4D 28 4D |MZ): . J.1 . M(M|
00002A10: 5A 29 00 2F 32 44 11 4D 41 54 28 4D 5A 2C 49 2C |Z)./2D.MAT(MZ,I,|
00002A20: 4A 29 B2 AB 4D 41 54 28 4D 5A 2C 49 2C 4A 29 00 |J)..MAT(MZ,I,J).|
00002A30: 39 32 4E 11 82 20 4A 2C 49 00 47 32 58 11 8D 20 |92N.. J,I.G2X.. |
00002A40: 34 31 30 30 3A 20 8E 00 5D 32 94 11 8F 20 56 45 |4100: ..]2... VE|
00002A50: 4B 54 4F 52 20 2D 20 56 45 4B 54 4F 52 00 6F 32 |KTOR - VEKTOR.o2|
00002A60: 9E 11 81 20 4B B2 31 20 A4 20 4C 28 56 5A 29 00 |... K.1 . L(VZ).|
00002A70: 88 32 A8 11 56 45 4B 28 56 5A 2C 4B 29 B2 AB 56 |.2..VEK(VZ,K)..V|
00002A80: 45 4B 28 56 5A 2C 4B 29 00 90 32 B2 11 82 20 4B |EK(VZ,K)..2... K|
00002A90: 00 9E 32 BC 11 8D 20 34 32 30 30 3A 20 8E 00 B4 |..2... 4200: ...|
00002AA0: 32 F8 11 8F 20 53 4B 41 4C 41 52 20 2D 20 53 4B |2... SKALAR - SK|
00002AB0: 41 4C 41 52 00 C9 32 02 12 53 4B 41 28 53 5A 29 |ALAR..2..SKA(SZ)|
00002AC0: B2 AB 53 4B 41 28 53 5A 29 00 D7 32 0C 12 8D 20 |..SKA(SZ)..2... |
00002AD0: 34 33 30 30 3A 20 8E 00 F1 32 88 13 8F 20 57 45 |4300: ...2... WE|
00002AE0: 49 54 45 52 45 20 4F 50 45 52 41 54 49 4F 4E 45 |ITERE OPERATIONE|
00002AF0: 4E 00 0C 33 EC 13 8F 20 4D 41 54 52 49 58 20 54 |N..3... MATRIX T|
00002B00: 52 41 4E 53 50 4F 4E 49 45 52 45 4E 00 24 33 ED |RANSPONIEREN.$3.|
00002B10: 13 8B 20 4D 5A B3 31 20 A7 20 99 20 46 24 28 34 |.. MZ.1 . . F$(4|
00002B20: 29 3A 20 8E 00 45 33 F6 13 81 20 49 B2 31 20 A4 |): ..E3... I.1 .|
00002B30: 20 4E 28 4D 5A 29 3A 20 81 20 4A B2 31 20 A4 20 | N(MZ): . J.1 . |
00002B40: 4D 28 4D 5A 29 00 60 33 00 14 4D 41 54 28 30 2C |M(MZ).`3..MAT(0,|
00002B50: 4A 2C 49 29 B2 4D 41 54 28 4D 5A 2C 49 2C 4A 29 |J,I).MAT(MZ,I,J)|
00002B60: 00 6A 33 0A 14 82 20 4A 2C 49 00 85 33 14 14 4E |.j3... J,I..3..N|
00002B70: 28 30 29 B2 4D 28 4D 5A 29 3A 20 4D 28 30 29 B2 |(0).M(MZ): M(0).|
00002B80: 4E 28 4D 5A 29 00 99 33 1E 14 4D 5A B2 4D 5A AB |N(MZ)..3..MZ.MZ.|
00002B90: 31 3A 20 8D 20 36 31 30 30 00 A7 33 28 14 8D 20 |1: . 6100..3(.. |
00002BA0: 32 31 30 30 3A 20 8E 00 C2 33 50 14 8F 20 56 45 |2100: ...3P.. VE|
00002BB0: 4B 54 4F 52 20 54 52 41 4E 53 50 4F 4E 49 45 52 |KTOR TRANSPONIER|
00002BC0: 45 4E 00 DA 33 51 14 8B 20 56 5A B3 31 20 A7 20 |EN..3Q.. VZ.1 . |
00002BD0: 99 20 46 24 28 34 29 3A 20 8E 00 F3 33 5A 14 56 |. F$(4): ...3Z.V|
00002BE0: 45 4B 28 56 5A 2C 30 29 B2 AB 56 45 4B 28 56 5A |EK(VZ,0)..VEK(VZ|
00002BF0: 2C 30 29 00 01 34 64 14 8D 20 32 32 30 30 3A 20 |,0)..4d.. 2200: |
00002C00: 8E 00 17 34 B4 14 8F 20 57 55 52 5A 45 4C 20 28 |...4... WURZEL (|
00002C10: 53 4B 41 4C 41 52 29 00 2F 34 B5 14 8B 20 53 5A |SKALAR)./4... SZ|
00002C20: B3 31 20 A7 20 99 20 46 24 28 34 29 3A 20 8E 00 |.1 . . F$(4): ..|
00002C30: 47 34 BE 14 8B 20 53 4B 41 28 53 5A 29 B1 B2 30 |G4... SKA(SZ)..0|
00002C40: 20 A7 20 35 33 32 30 00 56 34 C3 14 99 20 46 24 | . 5320.V4... F$|
00002C50: 28 38 29 3A 20 8E 00 6D 34 C8 14 53 4B 41 28 53 |(8): ..m4..SKA(S|
00002C60: 5A 29 B2 BA 28 53 4B 41 28 53 5A 29 29 00 7B 34 |Z)..(SKA(SZ)).{4|
00002C70: D2 14 8D 20 32 33 30 30 3A 20 8E 00 91 34 18 15 |... 2300: ...4..|
00002C80: 8F 20 53 4B 41 4C 41 52 20 5E 20 53 4B 41 4C 41 |. SKALAR ^ SKALA|
00002C90: 52 00 A9 34 19 15 8B 20 53 5A B3 32 20 A7 20 99 |R..4... SZ.2 . .|
00002CA0: 20 46 24 28 34 29 3A 20 8E 00 C3 34 22 15 8B 20 | F$(4): ...4".. |
00002CB0: 53 4B 41 28 53 5A AB 31 29 B1 B2 30 20 A7 20 35 |SKA(SZ.1)..0 . 5|
00002CC0: 34 33 30 00 E3 34 2C 15 8B 20 53 4B 41 28 53 5A |430..4,.. SKA(SZ|
00002CD0: 29 B2 B5 28 53 4B 41 28 53 5A 29 29 20 A7 20 35 |)..(SKA(SZ)) . 5|
00002CE0: 34 33 30 00 F2 34 31 15 99 20 46 24 28 38 29 3A |430..41.. F$(8):|
00002CF0: 20 8E 00 12 35 36 15 53 4B 41 28 53 5A AB 31 29 | ...56.SKA(SZ.1)|
00002D00: B2 53 4B 41 28 53 5A AB 31 29 AE 53 4B 41 28 53 |.SKA(SZ.1).SKA(S|
00002D10: 5A 29 00 1E 35 40 15 53 5A B2 53 5A AB 31 00 2C |Z)..5@.SZ.SZ.1.,|
00002D20: 35 4A 15 8D 20 32 33 30 30 3A 20 8E 00 42 35 7C |5J.. 2300: ..B5||
00002D30: 15 8F 20 4D 41 54 52 49 58 20 5E 20 53 4B 41 4C |.. MATRIX ^ SKAL|
00002D40: 41 52 00 5A 35 7D 15 8B 20 4D 5A B3 31 20 A7 20 |AR.Z5}.. MZ.1 . |
00002D50: 99 20 46 24 28 34 29 3A 20 8E 00 72 35 7E 15 8B |. F$(4): ..r5~..|
00002D60: 20 53 5A B3 31 20 A7 20 99 20 46 24 28 34 29 3A | SZ.1 . . F$(4):|
00002D70: 20 8E 00 8A 35 86 15 8B 20 53 4B 41 28 53 5A 29 | ...5... SKA(SZ)|
00002D80: B1 B2 30 20 A7 20 35 35 32 30 00 99 35 8B 15 99 |..0 . 5520..5...|
00002D90: 20 46 24 28 38 29 3A 20 8E 00 B9 35 90 15 8B 20 | F$(8): ...5... |
00002DA0: 53 4B 41 28 53 5A 29 B2 B5 28 53 4B 41 28 53 5A |SKA(SZ)..(SKA(SZ|
00002DB0: 29 29 20 A7 20 35 35 33 30 00 C8 35 95 15 99 20 |)) . 5530..5... |
00002DC0: 46 24 28 38 29 3A 20 8E 00 E1 35 9A 15 8B 20 4E |F$(8): ...5... N|
00002DD0: 28 4D 5A 29 B2 4D 28 4D 5A 29 20 A7 20 35 35 34 |(MZ).M(MZ) . 554|
00002DE0: 30 00 F0 35 9F 15 99 20 46 24 28 39 29 3A 20 8E |0..5... F$(9): .|
00002DF0: 00 07 36 A4 15 8B 20 53 4B 41 28 53 5A 29 B1 30 |..6... SKA(SZ).0|
00002E00: 20 A7 20 35 35 35 30 00 22 36 A9 15 53 4B 41 28 | . 5550."6..SKA(|
00002E10: 53 5A 29 B2 4E 28 4D 5A 29 3A 20 4D 5A B2 4D 5A |SZ).N(MZ): MZ.MZ|
00002E20: AB 31 00 30 36 AA 15 8D 20 37 36 30 30 3A 20 8E |.1.06... 7600: .|
00002E30: 00 47 36 AE 15 8B 20 53 4B 41 28 53 5A 29 B1 31 |.G6... SKA(SZ).1|
00002E40: 20 A7 20 35 35 36 30 00 5B 36 B3 15 53 5A B2 53 | . 5560.[6..SZ.S|
00002E50: 5A AB 31 3A 20 89 20 35 35 39 30 00 77 36 B8 15 |Z.1: . 5590.w6..|
00002E60: 8D 20 36 34 30 30 3A 20 4D 5A B2 4D 5A AA 31 3A |. 6400: MZ.MZ.1:|
00002E70: 20 8D 20 36 31 30 30 00 8D 36 C2 15 81 20 4E B2 | . 6100..6... N.|
00002E80: 31 20 A4 20 53 4B 41 28 53 5A 29 AB 31 00 A1 36 |1 . SKA(SZ).1..6|
00002E90: C3 15 8D 20 33 31 30 30 3A 20 4D 5A B2 4D 5A AA |... 3100: MZ.MZ.|
00002EA0: 31 00 A9 36 C4 15 82 20 4E 00 BE 36 CC 15 53 5A |1..6... N..6..SZ|
00002EB0: B2 53 5A AB 31 3A 20 4D 5A B2 4D 5A AB 31 00 CC |.SZ.1: MZ.MZ.1..|
00002EC0: 36 D6 15 8D 20 32 31 30 30 3A 20 8E 00 E2 36 E0 |6... 2100: ...6.|
00002ED0: 15 8F 20 53 4B 41 4C 41 52 20 2F 20 53 4B 41 4C |.. SKALAR / SKAL|
00002EE0: 41 52 00 FA 36 EA 15 8B 20 53 4B 41 28 53 5A 29 |AR..6... SKA(SZ)|
00002EF0: B3 B1 30 20 A7 20 35 36 32 30 00 09 37 EF 15 99 |..0 . 5620..7...|
00002F00: 20 46 24 28 38 29 3A 20 8E 00 1F 37 F4 15 53 4B | F$(8): ...7..SK|
00002F10: 41 28 53 5A 29 B2 31 AD 53 4B 41 28 53 5A 29 00 |A(SZ).1.SKA(SZ).|
00002F20: 2D 37 FE 15 8D 20 33 37 30 30 3A 20 8E 00 3E 37 |-7... 3700: ..>7|
00002F30: 44 16 8F 20 31 20 2F 20 53 4B 41 4C 41 52 00 56 |D.. 1 / SKALAR.V|
00002F40: 37 45 16 8B 20 53 5A B3 31 20 A7 20 99 20 46 24 |7E.. SZ.1 . . F$|
00002F50: 28 34 29 3A 20 8E 00 6E 37 4E 16 8B 20 53 4B 41 |(4): ..n7N.. SKA|
00002F60: 28 53 5A 29 B3 B1 30 20 A7 20 35 37 32 30 00 7D |(SZ)..0 . 5720.}|
00002F70: 37 53 16 99 20 46 24 28 38 29 3A 20 8E 00 93 37 |7S.. F$(8): ...7|
00002F80: 58 16 53 4B 41 28 53 5A 29 B2 31 AD 53 4B 41 28 |X.SKA(SZ).1.SKA(|
00002F90: 53 5A 29 00 A1 37 62 16 8D 20 32 33 30 30 3A 20 |SZ)..7b.. 2300: |
00002FA0: 8E 00 BC 37 70 17 8F 20 53 54 41 50 45 4C 4D 41 |...7p.. STAPELMA|
00002FB0: 4E 49 50 55 4C 41 54 49 4F 4E 45 4E 00 DC 37 D4 |NIPULATIONEN..7.|
00002FC0: 17 8F 20 4D 41 54 52 49 58 20 41 55 46 20 53 54 |.. MATRIX AUF ST|
00002FD0: 41 50 45 4C 20 42 52 49 4E 47 45 4E 00 F6 37 D5 |APEL BRINGEN..7.|
00002FE0: 17 8B 20 4D 5A AA 31 B1 48 20 A7 20 99 20 46 24 |.. MZ.1.H . . F$|
00002FF0: 28 33 29 3A 20 8E 00 02 38 DE 17 4D 5A B2 4D 5A |(3): ...8..MZ.MZ|
00003000: AA 31 00 1D 38 E8 17 4E 28 4D 5A 29 B2 4E 28 30 |.1..8..N(MZ).N(0|
00003010: 29 3A 20 4D 28 4D 5A 29 B2 4D 28 30 29 00 3C 38 |): M(MZ).M(0).<8|
00003020: F2 17 81 20 49 B2 31 20 A4 20 4E 28 30 29 3A 20 |... I.1 . N(0): |
00003030: 81 20 4A B2 31 20 A4 20 4D 28 30 29 00 57 38 F3 |. J.1 . M(0).W8.|
00003040: 17 4D 41 54 28 4D 5A 2C 49 2C 4A 29 B2 4D 41 54 |.MAT(MZ,I,J).MAT|
00003050: 28 30 2C 49 2C 4A 29 00 61 38 F4 17 82 20 4A 2C |(0,I,J).a8... J,|
00003060: 49 00 75 38 FC 17 8B 20 4F B2 32 39 20 A7 20 8D |I.u8... O.29 . .|
00003070: 20 36 37 30 30 00 7B 38 06 18 8E 00 9B 38 38 18 | 6700.{8.....88.|
00003080: 8F 20 56 45 4B 54 4F 52 20 41 55 46 20 53 54 41 |. VEKTOR AUF STA|
00003090: 50 45 4C 20 42 52 49 4E 47 45 4E 00 B5 38 39 18 |PEL BRINGEN..89.|
000030A0: 8B 20 56 5A AA 31 B1 48 20 A7 20 99 20 46 24 28 |. VZ.1.H . . F$(|
000030B0: 33 29 3A 20 8E 00 C1 38 42 18 56 5A B2 56 5A AA |3): ...8B.VZ.VZ.|
000030C0: 31 00 D0 38 4C 18 4C 28 56 5A 29 B2 4C 28 30 29 |1..8L.L(VZ).L(0)|
000030D0: 00 E1 38 56 18 81 20 4B B2 30 20 A4 20 4C 28 30 |..8V.. K.0 . L(0|
000030E0: 29 00 F8 38 57 18 56 45 4B 28 56 5A 2C 4B 29 B2 |)..8W.VEK(VZ,K).|
000030F0: 56 45 4B 28 30 2C 4B 29 00 00 39 58 18 82 20 4B |VEK(0,K)..9X.. K|
00003100: 00 14 39 60 18 8B 20 4F B2 33 30 20 A7 20 8D 20 |..9`.. O.30 . . |
00003110: 36 37 30 30 00 1A 39 6A 18 8E 00 3A 39 9C 18 8F |6700..9j...:9...|
00003120: 20 53 4B 41 4C 41 52 20 41 55 46 20 53 54 41 50 | SKALAR AUF STAP|
00003130: 45 4C 20 42 52 49 4E 47 45 4E 00 54 39 9D 18 8B |EL BRINGEN.T9...|
00003140: 20 53 5A AA 31 B1 48 20 A7 20 99 20 46 24 28 33 | SZ.1.H . . F$(3|
00003150: 29 3A 20 8E 00 60 39 A6 18 53 5A B2 53 5A AA 31 |): ..`9..SZ.SZ.1|
00003160: 00 73 39 B0 18 53 4B 41 28 53 5A 29 B2 53 4B 41 |.s9..SKA(SZ).SKA|
00003170: 28 30 29 00 87 39 BA 18 8B 20 4F B2 33 31 20 A7 |(0)..9... O.31 .|
00003180: 20 8D 20 36 37 30 30 00 8D 39 C4 18 8E 00 AB 39 | . 6700..9.....9|
00003190: 00 19 8F 20 4D 41 54 52 49 58 20 56 4F 4D 20 53 |... MATRIX VOM S|
000031A0: 54 41 50 45 4C 20 48 4F 4C 45 4E 00 C3 39 01 19 |TAPEL HOLEN..9..|
000031B0: 8B 20 4D 5A B3 31 20 A7 20 99 20 46 24 28 34 29 |. MZ.1 . . F$(4)|
000031C0: 3A 20 8E 00 E4 39 0A 19 81 20 49 B2 31 20 A4 20 |: ...9... I.1 . |
000031D0: 4E 28 4D 5A 29 3A 20 81 20 4A B2 31 20 A4 20 4D |N(MZ): . J.1 . M|
000031E0: 28 4D 5A 29 00 FF 39 0B 19 4D 41 54 28 30 2C 49 |(MZ)..9..MAT(0,I|
000031F0: 2C 4A 29 B2 4D 41 54 28 4D 5A 2C 49 2C 4A 29 00 |,J).MAT(MZ,I,J).|
00003200: 09 3A 0C 19 82 20 4A 2C 49 00 24 3A 14 19 4E 28 |.:... J,I.$:..N(|
00003210: 30 29 B2 4E 28 4D 5A 29 3A 20 4D 28 30 29 B2 4D |0).N(MZ): M(0).M|
00003220: 28 4D 5A 29 00 30 3A 1E 19 4D 5A B2 4D 5A AB 31 |(MZ).0:..MZ.MZ.1|
00003230: 00 44 3A 28 19 8B 20 4F B2 33 32 20 A7 20 8D 20 |.D:(.. O.32 . . |
00003240: 36 37 30 30 00 4A 3A 32 19 8E 00 68 3A 64 19 8F |6700.J:2...h:d..|
00003250: 20 56 45 4B 54 4F 52 20 56 4F 4D 20 53 54 41 50 | VEKTOR VOM STAP|
00003260: 45 4C 20 48 4F 4C 45 4E 00 80 3A 65 19 8B 20 56 |EL HOLEN..:e.. V|
00003270: 5A B3 31 20 A7 20 99 20 46 24 28 34 29 3A 20 8E |Z.1 . . F$(4): .|
00003280: 00 92 3A 6E 19 81 20 4B B2 30 20 A4 20 4C 28 56 |..:n.. K.0 . L(V|
00003290: 5A 29 00 A9 3A 6F 19 56 45 4B 28 30 2C 4B 29 B2 |Z)..:o.VEK(0,K).|
000032A0: 56 45 4B 28 56 5A 2C 4B 29 00 B1 3A 70 19 82 20 |VEK(VZ,K)..:p.. |
000032B0: 4B 00 C0 3A 78 19 4C 28 30 29 B2 4C 28 56 5A 29 |K..:x.L(0).L(VZ)|
000032C0: 00 CC 3A 82 19 56 5A B2 56 5A AB 31 00 E0 3A 8C |..:..VZ.VZ.1..:.|
000032D0: 19 8B 20 4F B2 33 33 20 A7 20 8D 20 36 37 30 30 |.. O.33 . . 6700|
000032E0: 00 E6 3A 96 19 8E 00 04 3B C8 19 8F 20 53 4B 41 |..:.....;... SKA|
000032F0: 4C 41 52 20 56 4F 4D 20 53 54 41 50 45 4C 20 48 |LAR VOM STAPEL H|
00003300: 4F 4C 45 4E 00 1C 3B C9 19 8B 20 53 5A B3 31 20 |OLEN..;... SZ.1 |
00003310: A7 20 99 20 46 24 28 34 29 3A 20 8E 00 2F 3B D2 |. . F$(4): ../;.|
00003320: 19 53 4B 41 28 30 29 B2 53 4B 41 28 53 5A 29 00 |.SKA(0).SKA(SZ).|
00003330: 3B 3B DC 19 53 5A B2 53 5A AB 31 00 4F 3B E6 19 |;;..SZ.SZ.1.O;..|
00003340: 8B 20 4F B2 33 34 20 A7 20 8D 20 36 37 30 30 00 |. O.34 . . 6700.|
00003350: 55 3B F0 19 8E 00 71 3B 2C 1A 8F 20 53 54 41 50 |U;....q;,.. STAP|
00003360: 45 4C 5A 45 49 47 45 52 20 41 55 53 47 45 42 45 |ELZEIGER AUSGEBE|
00003370: 4E 00 8B 3B 36 1A 99 20 22 2A 2A 2A 20 53 54 41 |N..;6.. "*** STA|
00003380: 50 45 4C 5A 45 49 47 45 52 3A 22 00 A6 3B 37 1A |PELZEIGER:"..;7.|
00003390: 99 20 22 40 40 40 20 28 4D 5A 2C 56 5A 2C 53 5A |. "@@@ (MZ,VZ,SZ|
000033A0: 29 20 3D 20 22 3B 00 BF 3B 38 1A 99 20 22 28 22 |) = ";..;8.. "("|
000033B0: 4D 5A 22 2C 22 56 5A 22 2C 22 53 5A 22 29 22 00 |MZ","VZ","SZ")".|
000033C0: C5 3B 40 1A 8E 00 E5 3B 90 1A 8F 20 4E 45 55 53 |.;@....;... NEUS|
000033D0: 54 41 52 54 20 44 45 53 20 55 50 4E 2D 52 45 43 |TART DES UPN-REC|
000033E0: 48 4E 45 52 53 00 02 3C 9A 1A 8D 20 38 31 30 30 |HNERS..<... 8100|
000033F0: 3A 20 91 20 4A 4E 20 89 20 36 38 33 30 2C 36 38 |: . JN . 6830,68|
00003400: 32 30 00 17 3C A4 1A 4D 5A B2 30 3A 20 56 5A B2 |20..<..MZ.0: VZ.|
00003410: 30 3A 20 53 5A B2 30 00 1D 3C AE 1A 8E 00 36 3C |0: SZ.0..<....6<|
00003420: 58 1B 8F 20 41 4E 44 45 52 45 20 4F 50 45 52 41 |X.. ANDERE OPERA|
00003430: 54 49 4F 4E 45 4E 00 44 3C BC 1B 8F 20 49 4E 56 |TIONEN.D<... INV|
00003440: 45 52 53 45 00 5C 3C BD 1B 8B 20 4D 5A B3 31 20 |ERSE.\<... MZ.1 |
00003450: A7 20 99 20 46 24 28 34 29 3A 20 8E 00 76 3C BE |. . F$(4): ..v<.|
00003460: 1B 8B 20 4D 5A AA 31 B1 48 20 A7 20 99 20 46 24 |.. MZ.1.H . . F$|
00003470: 28 33 29 3A 20 8E 00 8F 3C C6 1B 8B 20 4E 28 4D |(3): ...<... N(M|
00003480: 5A 29 B2 4D 28 4D 5A 29 20 A7 20 37 31 32 30 00 |Z).M(MZ) . 7120.|
00003490: 9E 3C CB 1B 99 20 46 24 28 39 29 3A 20 8E 00 B9 |.<... F$(9): ...|
000034A0: 3C D0 1B 8D 20 36 34 30 30 3A 20 4D 5A B2 4D 5A |<... 6400: MZ.MZ|
000034B0: AA 31 3A 20 8D 20 33 32 30 00 D0 3C D5 1B 8B 20 |.1: . 320..<... |
000034C0: 53 4B 41 28 30 29 B3 B1 4E 28 30 29 20 A7 20 8E |SKA(0)..N(0) . .|
000034D0: 00 E6 3C DA 1B 8D 20 36 31 30 30 3A 20 8D 20 32 |..<... 6100: . 2|
000034E0: 31 30 30 3A 20 8E 00 F9 3C 20 1C 8F 20 44 45 54 |100: ...< .. DET|
000034F0: 45 52 4D 49 4E 41 4E 54 45 00 11 3D 21 1C 8B 20 |ERMINANTE..=!.. |
00003500: 4D 5A B3 31 20 A7 20 99 20 46 24 28 34 29 3A 20 |MZ.1 . . F$(4): |
00003510: 8E 00 2A 3D 2A 1C 8B 20 4E 28 4D 5A 29 B2 4D 28 |..*=*.. N(MZ).M(|
00003520: 4D 5A 29 20 A7 20 37 32 32 30 00 39 3D 2F 1C 99 |MZ) . 7220.9=/..|
00003530: 20 46 24 28 39 29 3A 20 8E 00 4B 3D 34 1C 8D 20 | F$(9): ..K=4.. |
00003540: 36 34 30 30 3A 20 8D 20 34 33 30 00 61 3D 3E 1C |6400: . 430.a=>.|
00003550: 8D 20 36 33 30 30 3A 20 8D 20 32 33 30 30 3A 20 |. 6300: . 2300: |
00003560: 8E 00 6C 3D 84 1C 8F 20 52 41 4E 47 00 84 3D 85 |..l=... RANG..=.|
00003570: 1C 8B 20 4D 5A B3 31 20 A7 20 99 20 46 24 28 34 |.. MZ.1 . . F$(4|
00003580: 29 3A 20 8E 00 96 3D 8E 1C 8D 20 36 34 30 30 3A |): ...=... 6400:|
00003590: 20 8D 20 35 32 30 00 AC 3D 98 1C 8D 20 36 33 30 | . 520..=... 630|
000035A0: 30 3A 20 8D 20 32 33 30 30 3A 20 8E 00 C0 3D E8 |0: . 2300: ...=.|
000035B0: 1C 8F 20 53 4B 41 4C 41 52 50 52 4F 44 55 4B 54 |.. SKALARPRODUKT|
000035C0: 00 D8 3D E9 1C 8B 20 56 5A B3 32 20 A7 20 99 20 |..=... VZ.2 . . |
000035D0: 46 24 28 34 29 3A 20 8E 00 F7 3D ED 1C 59 B2 56 |F$(4): ...=..Y.V|
000035E0: 45 4B 28 56 5A AB 31 2C 30 29 3A 20 5A B2 56 45 |EK(VZ.1,0): Z.VE|
000035F0: 4B 28 56 5A 2C 30 29 00 0E 3E F2 1C 8B 20 59 B2 |K(VZ,0)..>... Y.|
00003600: 30 20 AF 20 5A B2 30 20 A7 20 37 34 32 30 00 1D |0 . Z.0 . 7420..|
00003610: 3E F7 1C 99 20 46 24 28 37 29 3A 20 8E 00 38 3E |>... F$(7): ..8>|
00003620: FC 1C 8B 20 4C 28 56 5A 29 B2 4C 28 56 5A AB 31 |... L(VZ).L(VZ.1|
00003630: 29 20 A7 20 37 34 33 30 00 47 3E 01 1D 99 20 46 |) . 7430.G>... F|
00003640: 24 28 35 29 3A 20 8E 00 59 3E 06 1D 8D 20 36 35 |$(5): ..Y>... 65|
00003650: 30 30 3A 20 8D 20 36 33 30 00 6F 3E 10 1D 8D 20 |00: . 630.o>... |
00003660: 36 33 30 30 3A 20 8D 20 32 33 30 30 3A 20 8E 00 |6300: . 2300: ..|
00003670: 7A 3E 4C 1D 8F 20 4E 4F 52 4D 00 92 3E 4D 1D 8B |z>L.. NORM..>M..|
00003680: 20 56 5A B3 31 20 A7 20 99 20 46 24 28 34 29 3A | VZ.1 . . F$(4):|
00003690: 20 8E 00 AB 3E 56 1D 8B 20 56 45 4B 28 56 5A 2C | ...>V.. VEK(VZ,|
000036A0: 30 29 B2 30 20 A7 20 37 35 32 30 00 BA 3E 5B 1D |0).0 . 7520..>[.|
000036B0: 99 20 46 24 28 36 29 3A 20 8E 00 CC 3E 60 1D 8D |. F$(6): ...>`..|
000036C0: 20 36 35 30 30 3A 20 8D 20 37 33 30 00 E2 3E 6A | 6500: . 730..>j|
000036D0: 1D 8D 20 36 33 30 30 3A 20 8D 20 32 33 30 30 3A |.. 6300: . 2300:|
000036E0: 20 8E 00 F7 3E B0 1D 8F 20 45 49 4E 48 45 49 54 | ...>... EINHEIT|
000036F0: 53 4D 41 54 52 49 58 00 11 3F B1 1D 8B 20 4D 5A |SMATRIX..?... MZ|
00003700: AA 31 B1 48 20 A7 20 99 20 46 24 28 33 29 3A 20 |.1.H . . F$(3): |
00003710: 8E 00 29 3F B2 1D 8B 20 53 5A B3 31 20 A7 20 99 |..)?... SZ.1 . .|
00003720: 20 46 24 28 34 29 3A 20 8E 00 35 3F BA 1D 4D 5A | F$(4): ..5?..MZ|
00003730: B2 4D 5A AA 31 00 49 3F C4 1D 81 20 49 B2 31 20 |.MZ.1.I?... I.1 |
00003740: A4 20 53 4B 41 28 53 5A 29 00 5D 3F C5 1D 81 20 |. SKA(SZ).]?... |
00003750: 4A B2 31 20 A4 20 53 4B 41 28 53 5A 29 00 74 3F |J.1 . SKA(SZ).t?|
00003760: C6 1D 4D 41 54 28 4D 5A 2C 49 2C 4A 29 B2 AB 28 |..MAT(MZ,I,J)..(|
00003770: 49 B2 4A 29 00 7E 3F C7 1D 82 20 4A 2C 49 00 9F |I.J).~?... J,I..|
00003780: 3F CE 1D 4E 28 4D 5A 29 B2 53 4B 41 28 53 5A 29 |?..N(MZ).SKA(SZ)|
00003790: 3A 20 4D 28 4D 5A 29 B2 53 4B 41 28 53 5A 29 00 |: M(MZ).SKA(SZ).|
000037A0: AB 3F D8 1D 53 5A B2 53 5A AB 31 00 B9 3F E2 1D |.?..SZ.SZ.1..?..|
000037B0: 8D 20 32 31 30 30 3A 20 8E 00 CC 3F 40 1F 8F 20 |. 2100: ...?@.. |
000037C0: 47 45 54 2D 52 4F 55 54 49 4E 45 4E 00 DA 3F A4 |GET-ROUTINEN..?.|
000037D0: 1F 8F 20 4A 41 2F 4E 45 49 4E 00 F5 3F A9 1F 99 |.. JA/NEIN..?...|
000037E0: 20 22 26 26 26 20 4B 4F 52 52 49 47 49 45 52 45 | "&&& KORRIGIERE|
000037F0: 4E 3F 20 22 3B 00 0E 40 AE 1F A1 20 45 24 3A 20 |N? ";..@... E$: |
00003800: 8B 20 45 24 B2 22 22 20 A7 20 38 31 31 30 00 22 |. E$."" . 8110."|
00003810: 40 AF 1F 8B 20 45 24 B2 22 4A 22 20 A7 20 38 31 |@... E$."J" . 81|
00003820: 32 30 00 36 40 B0 1F 8B 20 45 24 B2 22 4E 22 20 |20.6@... E$."N" |
00003830: A7 20 38 31 33 30 00 41 40 B1 1F 89 20 38 31 31 |. 8130.A@... 811|
00003840: 30 00 55 40 B8 1F 99 20 22 4A 41 22 3A 20 4A 4E |0.U@... "JA": JN|
00003850: B2 31 3A 20 8E 00 6B 40 C2 1F 99 20 22 4E 45 49 |.1: ..k@... "NEI|
00003860: 4E 22 3A 20 4A 4E B2 32 3A 20 8E 00 78 40 08 20 |N": JN.2: ..x@. |
00003870: 8F 20 52 45 54 55 52 4E 00 8D 40 12 20 99 20 22 |. RETURN..@. . "|
00003880: 21 21 21 20 3C 52 45 54 55 52 4E 3E 22 00 A7 40 |!!! <RETURN>"..@|
00003890: 1C 20 A1 20 45 24 3A 20 8B 20 45 24 B3 B1 52 24 |. . E$: . E$..R$|
000038A0: 20 A7 20 38 32 32 30 00 C8 40 26 20 99 20 22 2A | . 8220..@& . "*|
000038B0: 2A 2A 20 45 49 4E 45 4E 20 4D 4F 4D 45 4E 54 2C |** EINEN MOMENT,|
000038C0: 20 42 49 54 54 45 2E 22 00 CE 40 30 20 8E 00 DA | BITTE."..@0 ...|
000038D0: 40 6C 20 8F 20 53 50 41 43 45 00 EE 40 76 20 99 |@l . SPACE..@v .|
000038E0: 20 22 21 21 21 20 3C 53 50 41 43 45 3E 22 00 09 | "!!! <SPACE>"..|
000038F0: 41 80 20 A1 20 45 24 3A 20 8B 20 45 24 B3 B1 22 |A. . E$: . E$.."|
00003900: 20 22 20 A7 20 38 33 32 30 00 0F 41 8A 20 8E 00 | " . 8320..A. ..|
00003910: 32 41 34 21 8F 20 4C 4F 45 53 43 48 45 4E 20 44 |2A4!. LOESCHEN D|
00003920: 45 52 20 41 52 42 45 49 54 53 53 50 45 49 43 48 |ER ARBEITSSPEICH|
00003930: 45 52 00 57 41 3E 21 53 4B 41 28 30 29 B2 30 3A |ER.WA>!SKA(0).0:|
00003940: 20 4C 28 30 29 B2 30 3A 20 4D 28 30 29 B2 30 3A | L(0).0: M(0).0:|
00003950: 20 4E 28 30 29 B2 30 00 71 41 48 21 81 20 49 B2 | N(0).0.qAH!. I.|
00003960: 30 20 A4 20 47 3A 20 56 45 4B 28 30 2C 49 29 B2 |0 . G: VEK(0,I).|
00003970: 30 00 8D 41 52 21 81 20 4A B2 30 20 A4 20 47 3A |0..AR!. J.0 . G:|
00003980: 20 4D 41 54 28 30 2C 49 2C 4A 29 B2 30 00 97 41 | MAT(0,I,J).0..A|
00003990: 5C 21 82 20 4A 2C 49 00 9D 41 66 21 8E 00 A9 41 |\!. J,I..Af!...A|
000039A0: 28 23 8F 20 44 41 54 41 53 00 C6 41 8C 23 8F 20 |(#. DATAS..A.#. |
000039B0: 42 45 5A 45 49 43 48 4E 55 4E 47 45 4E 20 44 45 |BEZEICHNUNGEN DE|
000039C0: 52 20 4D 4F 44 49 00 D8 41 8D 23 83 20 55 50 4E |R MODI..A.#. UPN|
000039D0: 2D 52 45 43 48 4E 45 52 00 F8 41 8E 23 83 20 4C |-RECHNER..A.#. L|
000039E0: 49 4E 45 41 52 45 53 20 47 4C 45 49 43 48 55 4E |INEARES GLEICHUN|
000039F0: 47 53 53 59 53 54 45 4D 00 13 42 8F 23 83 20 49 |GSSYSTEM..B.#. I|
00003A00: 4E 56 45 52 53 45 20 45 49 4E 45 52 20 4D 41 54 |NVERSE EINER MAT|
00003A10: 52 49 58 00 33 42 90 23 83 20 44 45 54 45 52 4D |RIX.3B.#. DETERM|
00003A20: 49 4E 41 4E 54 45 20 45 49 4E 45 52 20 4D 41 54 |INANTE EINER MAT|
00003A30: 52 49 58 00 4B 42 91 23 83 20 52 41 4E 47 20 45 |RIX.KB.#. RANG E|
00003A40: 49 4E 45 52 20 4D 41 54 52 49 58 00 6F 42 92 23 |INER MATRIX.oB.#|
00003A50: 83 20 53 4B 41 4C 41 52 50 52 4F 44 55 4B 54 20 |. SKALARPRODUKT |
00003A60: 5A 57 45 49 45 52 20 56 45 4B 54 4F 52 45 4E 00 |ZWEIER VEKTOREN.|
00003A70: 88 42 93 23 83 20 4E 4F 52 4D 20 45 49 4E 45 53 |.B.#. NORM EINES|
00003A80: 20 56 45 4B 54 4F 52 53 00 A7 42 F0 23 8F 20 42 | VEKTORS..B.#. B|
00003A90: 45 46 45 48 4C 45 20 44 45 53 20 55 50 4E 2D 52 |EFEHLE DES UPN-R|
00003AA0: 45 43 48 4E 45 52 53 00 C5 42 F1 23 83 20 4D 41 |ECHNERS..B.#. MA|
00003AB0: 54 2C 56 45 4B 2C 53 4B 41 2C 4D 44 52 2C 56 44 |T,VEK,SKA,MDR,VD|
00003AC0: 52 2C 53 44 52 00 E3 42 F7 23 83 20 4D 2A 4D 2C |R,SDR..B.#. M*M,|
00003AD0: 4D 2A 56 2C 56 2A 4D 2C 53 2A 4D 2C 4D 2A 53 2C |M*V,V*M,S*M,M*S,|
00003AE0: 56 2A 56 00 01 43 FD 23 83 20 53 2A 56 2C 56 2A |V*V..C.#. S*V,V*|
00003AF0: 53 2C 53 2A 53 2C 4D 2B 4D 2C 56 2B 56 2C 53 2B |S,S*S,M+M,V+V,S+|
00003B00: 53 00 1F 43 03 24 83 20 4D 2D 4D 2C 56 2D 56 2C |S..C.$. M-M,V-V,|
00003B10: 53 2D 53 2C 4D 54 52 2C 56 54 52 2C 57 52 5A 00 |S-S,MTR,VTR,WRZ.|
00003B20: 3D 43 09 24 83 20 53 5E 53 2C 4D 5E 53 2C 53 2F |=C.$. S^S,M^S,S/|
00003B30: 53 2C 31 2F 53 2C 4D 53 54 2C 56 53 54 00 5B 43 |S,1/S,MST,VST.[C|
00003B40: 0F 24 83 20 53 53 54 2C 4D 4C 53 2C 56 4C 53 2C |.$. SST,MLS,VLS,|
00003B50: 53 4C 53 2C 53 54 5A 2C 4E 45 55 00 79 43 15 24 |SLS,STZ,NEU.yC.$|
00003B60: 83 20 49 4E 56 2C 44 45 54 2C 52 4E 47 2C 53 50 |. INV,DET,RNG,SP|
00003B70: 52 2C 4E 52 4D 2C 45 48 4D 00 8F 43 54 24 8F 20 |R,NRM,EHM..CT$. |
00003B80: 46 45 48 4C 45 52 4D 45 4C 44 55 4E 47 45 4E 00 |FEHLERMELDUNGEN.|
00003B90: B3 43 55 24 83 20 44 41 53 20 49 53 54 20 4B 45 |.CU$. DAS IST KE|
00003BA0: 49 4E 20 47 55 45 4C 54 49 47 45 52 20 42 45 46 |IN GUELTIGER BEF|
00003BB0: 45 48 4C 00 CE 43 56 24 83 20 4D 41 54 52 49 58 |EHL..CV$. MATRIX|
00003BC0: 20 49 53 54 20 53 49 4E 47 55 4C 41 45 52 00 E4 | IST SINGULAER..|
00003BD0: 43 57 24 83 20 53 54 41 50 45 4C 20 49 53 54 20 |CW$. STAPEL IST |
00003BE0: 56 4F 4C 4C 00 FA 43 58 24 83 20 53 54 41 50 45 |VOLL..CX$. STAPE|
00003BF0: 4C 20 49 53 54 20 4C 45 45 52 00 1A 44 59 24 83 |L IST LEER..DY$.|
00003C00: 20 44 49 4D 45 4E 53 49 4F 4E 45 4E 20 53 54 49 | DIMENSIONEN STI|
00003C10: 4D 4D 45 4E 20 4E 49 43 48 54 00 33 44 5A 24 83 |MMEN NICHT.3DZ$.|
00003C20: 20 56 45 4B 54 4F 52 20 50 41 53 53 54 20 4E 49 | VEKTOR PASST NI|
00003C30: 43 48 54 00 4F 44 5B 24 83 20 56 45 4B 54 4F 52 |CHT.OD[$. VEKTOR|
00003C40: 45 4E 20 50 41 53 53 45 4E 20 4E 49 43 48 54 00 |EN PASSEN NICHT.|
00003C50: 68 44 5C 24 83 20 53 4B 41 4C 41 52 20 50 41 53 |hD\$. SKALAR PAS|
00003C60: 53 54 20 4E 49 43 48 54 00 8B 44 5D 24 83 20 4D |ST NICHT..D]$. M|
00003C70: 41 54 52 49 58 20 49 53 54 20 4E 49 43 48 54 20 |ATRIX IST NICHT |
00003C80: 51 55 41 44 52 41 54 49 53 43 48 00 A7 44 10 27 |QUADRATISCH..D.'|
00003C90: 8F 20 43 4F 4D 4D 4F 44 4F 52 45 2D 45 49 47 45 |. COMMODORE-EIGE|
00003CA0: 4E 48 45 49 54 45 4E 00 C5 44 1A 27 43 24 B2 C7 |NHEITEN..D.'C$..|
00003CB0: 28 31 34 37 29 3A 20 8F 20 43 4C 45 41 52 20 53 |(147): . CLEAR S|
00003CC0: 43 52 45 45 4E 00 DD 44 24 27 44 24 B2 C7 28 32 |CREEN..D$'D$..(2|
00003CD0: 30 29 3A 20 20 8F 20 44 45 4C 45 54 45 00 FA 44 |0): . DELETE..D|
00003CE0: 2E 27 4C 24 B2 C7 28 31 35 37 29 3A 20 8F 20 43 |.'L$..(157): . C|
00003CF0: 55 52 53 4F 52 20 4C 45 46 54 00 12 45 38 27 52 |URSOR LEFT..E8'R|
00003D00: 24 B2 C7 28 31 33 29 3A 20 20 8F 20 52 45 54 55 |$..(13): . RETU|
00003D10: 52 4E 00 29 45 42 27 53 24 B2 C7 28 31 34 34 29 |RN.)EB'S$..(144)|
00003D20: 3A 20 8F 20 42 4C 41 43 4B 00 40 45 4C 27 57 24 |: . BLACK.@EL'W$|
00003D30: B2 C7 28 35 29 3A 20 20 20 8F 20 57 48 49 54 45 |..(5): . WHITE|
00003D40: 00 56 45 56 27 42 24 B2 C7 28 33 31 29 3A 20 20 |.VEV'B$..(31): |
00003D50: 8F 20 42 4C 55 45 00 71 45 60 27 97 20 35 33 32 |. BLUE.qE`'. 532|
00003D60: 38 30 2C 31 34 3A 20 97 20 35 33 32 38 31 2C 31 |80,14: . 53281,1|
00003D70: 34 00 93 45 74 27 8F 20 44 49 4D 45 4E 53 49 4F |4..Et'. DIMENSIO|
00003D80: 4E 49 45 52 45 4E 20 55 4E 44 20 45 49 4E 4C 45 |NIEREN UND EINLE|
00003D90: 53 45 4E 00 B4 45 7E 27 86 20 4D 41 54 28 48 2C |SEN..E~'. MAT(H,|
00003DA0: 47 2C 47 29 2C 56 45 4B 28 48 2C 47 29 2C 53 4B |G,G),VEK(H,G),SK|
00003DB0: 41 28 48 29 00 C9 45 88 27 86 20 4C 28 48 29 2C |A(H)..E.'. L(H),|
00003DC0: 4D 28 48 29 2C 4E 28 48 29 00 E2 45 92 27 86 20 |M(H),N(H)..E.'. |
00003DD0: 4D 24 28 37 29 2C 4F 24 28 34 32 29 2C 46 24 28 |M$(7),O$(42),F$(|
00003DE0: 39 29 00 FC 45 9C 27 81 20 49 B2 31 20 A4 20 37 |9)..E.'. I.1 . 7|
00003DF0: 3A 20 87 20 4D 24 28 49 29 3A 20 82 00 17 46 A6 |: . M$(I): ...F.|
00003E00: 27 81 20 49 B2 31 20 A4 20 34 32 3A 20 87 20 4F |'. I.1 . 42: . O|
00003E10: 24 28 49 29 3A 20 82 00 25 46 B0 27 81 20 49 B2 |$(I): ..%F.'. I.|
00003E20: 31 20 A4 20 39 00 48 46 BA 27 87 20 46 24 28 49 |1 . 9.HF.'. F$(I|
00003E30: 29 3A 20 46 24 28 49 29 B2 22 3F 3F 3F 20 22 AA |): F$(I)."??? ".|
00003E40: 46 24 28 49 29 AA 22 2E 00 50 46 C4 27 82 20 49 |F$(I)."..PF.'. I|
00003E50: 00 59 46 D8 27 89 20 31 30 00 00 00 |.YF.'. 10... |
..&...G.10:H.10:.10000: . S. CHIP 1/85.N
...."..................................V
....".UIUIU.I... HENRY STRAUSS ...
...."..JK.... . PETERSILIENSTR. 1-3..F
....". 3300 BRAUNSCHWEIG ...
....".VERSION 1.3 TEL. 0531/46793 ...
....".-------------------------------..>
....".FUER 5 DM ERHALTEN SIE BEI MIR ..F
....".EINE 30-SEITIGE DOKUMENTATION. ...
...."...................................
.... MENUE...... C$;S$;" MATRIZEN-ALGE
BRA".J.... I.1 . 7...(..: . W$;I;B$;M$(I
)...2.. I...<.. M$: . M$."1" . M$."7" .
60.*.F.MO.E(M$): . C$;S$;M$(MO);B$.N.P..
MO.100,200,300,400,500,600,700._.Z.. 850
0: . 10.Q.D.. UPN-RECHNER...N.. W$;">>>
";: O$.""...X.. E$: . E$."" . 120......
E$.D$ . 135.G.... E$;: O$.O$.E$...... C(
O$).3 . 150...... 120...... C(O$).1 . 12
0.....O$.H(O$,C(O$).1)...... L$" "L$;.'.
... 120.5.... B$: O.0.D.... I.1 . 42.`..
.. O$.O$(I) . O.I: . 160.H.... I.{.... O
$."RET" . ....... F$(1): . 100... .I..((
O.1).12).1.....J..((O.12.(I.1).1).3).1.W
...K.O.12.(I.1).3.(J.1)...... I . 164,16
5,166,167...... J . 168,169,170,171.%...
. J . 172,173,174,175.?.... J . 176,177,
178,179.Q.... J . 180,181.Q.... K . 1100
,1200,1300: . 100...... K . 2100,2200,23
00: . 100...... K . 3100,3200,3300: . 10
0.Q.... K . 3400,3400,3500: . 100......
K . 3600,3600,3700: . 100...... K . 4100
,4200,4300: . 100.1.... K . 4400,4500,46
00: . 100.Q.... K . 5100,5200,5300: . 10
0.Q.... K . 5400,5500,5600: . 100......
K . 5700,6100,6200: . 100...... K . 6300
,6400,6500: . 100.Q.... K . 6600,6700,68
00: . 100...... K . 7100,7200,7300: . 10
0...... K . 7400,7500,7600: . 100.1.H..
LINEARES GLEICHUNGSSYSTEM.U.M.. "$$$ ANZ
AHL DER GLEICHUNGEN";.`.N.. N(0)...O.. "
$$$ ANZAHL DER UNBEKANNTEN";...P.. M(0).
..Q.. 8100: . JN . 205,210.D.R.. "*** EI
NGABE DER ";...S.. "KOEFFIZIENTENMATRIX:
"...T.ZZ.MZ: MZ.0: . 1121: MZ.ZZ...W.. 6
100. .... 520: RG.SKA(0).+.... 6400.E...
. "*** EINGABE DER ";.G.... "RECHTEN SEI
TE:": L(0).N(0).....ZZ.VZ: VZ.0: . 1231:
VZ.ZZ.....HOM.1...... I.1 . N(0).....MA
T(0,I,0).VEK(0,I).S.... VEK(0,I)..0 . HO
M.0...... I...... 520: RNG.SKA(0)......
"\\\ SYSTEM IST ";.%.... RNG.RG . HOM.1
. 253.C.... "NICHT LOESBAR.": . 255.`...
. HOM.0 . RNG.M(0) . 256.}.... "NUR TRIV
IAL LOESBAR."...... 8200: .. .... RNG.M(
0) . 259...... "EINDEUTIG LOESBAR:".E...
. 260...... "NICHT EINDEUTIG LOESBAR:"..
.... 1.RNG . 270...... I.1 . RNG: C.MAT(
0,I,I).2...MAT(0,I,0).MAT(0,I,0).C.C....
J.I . M(0)._...MAT(0,I,J).MAT(0,I,J).C.
I.... J,I.{.... RNG.2 . 280...... J.RNG
. 2 . .1...... I.1 . J.1: C.MAT(0,I,J).U
...MAT(0,I,0).MAT(0,I,0).C.MAT(0,J,0)...
... RNG.1.M(0) . 278...... L.RNG.1 . M(0
).(...MAT(0,I,L).MAT(0,I,L).C.MAT(0,J,L)
.0.... L.:.... I,J.L.... HOM.1 . 285.]..
.. J.1 . M(0)...... "### ( ";MAT(0,MAT(0
,0,J),0);...... .20)")"...... J...... RN
G.1.M(0) . 290.C.... I.RNG.1 . M(0).X...
. J.RNG.1 . M(0)... .MAT(0,I,J).(I.J)...
!.. J,I...".. RNG.1.M(0) . 299.#.#.. HOM
.0 . . 8300.8.$.. L.RNG.1 . M(0).I.%.. I
.1 . M(0).M.&.. "### [ ";MAT(0,MAT(0,0,I
),L);.{.'.. .20)"]"...(.. I: . L.M(0) .
298...).. 8300...*.. L...+.. 8200: ..O.,
.. INVERSE EINER MATRIX...-.. MZ.1.H . .
F$(3): ....1.. "$$$ ORDNUNG DER MATRIX"
;...2.. N(0): M(0).N(0).:.3.. 8100: . JN
. 305,310.Y.6.ZZ.MZ: MZ.0: . 1120: MZ.Z
Z.D.;.. 6100...@.. 520: . SKA(0).N(0) .
330...E.. F$(2): . MO.1 . ....F.. 8200:
..H.J.. I.1 . N(0): . J.1 . N(0)...K.MAT
(0,I,J)..(I.J)...L.. J,I...M.. 1.N(0).1
. 360...N.. J.1 . N(0).1.*.O.P..(MAT(MZ,
J,J)): R.J.=.P.. I.J.1 . N(0).[.Q.. .(MA
T(MZ,I,J))..P . 339.U.R.P..(MAT(MZ,I,J))
: R.I.}.S.. I...T.. R.J . 350...U.. L.1
. N(0)...V.X.MAT(0,R,L).I.W.MAT(0,R,L).M
AT(0,J,L).Z.X.MAT(0,J,L).X...Y.X.MAT(MZ,
R,L)...Z.MAT(MZ,R,L).MAT(MZ,J,L)...[.MAT
(MZ,J,L).X.".\.. L.5.^.. K.J.1 . N(0).S.
_.C.MAT(MZ,K,J).MAT(MZ,J,J).F.`.. L.J.1
. N(0)...A.MAT(MZ,K,L).MA(MZ,K,L).C.MA(M
Z,J,L)...B.. L...C.. L.1 . N(0).N.D.MAT(
0,K,L).MAT(0,K,L).C.MAT(0,J,L).Z.E.. L,K
,J...H.. I.1 . N(0): C.MAT(MZ,I,I)...I..
I.1.N(0) . 365.".J.. J.I.1 . N(0).@.K.M
AT(MZ,I,J).MAT(MZ,I,J).C.H.L.. J.Y.M.. J
.1 . N(0).U.N.MAT(0,I,J).MAT(0,I,J).C..
O.. J,I...R.. N(0).2 . 380...S.. J.N(0)
. 2 . .1.G.T.. I.1 . J.1: C.MAT(MZ,I,J).
X.U.. L.1 . N(0)...V.MAT(0,I,L).MAT(0,I,
L).C.MAT(0,J,L)...W.. L,I,J...|.MZ.MZ.1.
&.... MO.1 . ..B.... "*** INVERSE MATRIX
:".A...ZZ.MZ: MZ.0: . 2111: MZ.ZZ.O....
8200: ....... DETERMINANTE EINER MATRIX.
..... "$$$ ORDNUNG DER MATRIX";.E.... N(
0): M(0).N(0)...... 8100: . JN . 410,420
.....ZZ.MZ: MZ.0: . 1120: MZ.ZZ...... 90
0.$...SKA(0).(.1).MAT(0,0,0).5.B.. I.1 .
N(0).R.C.SKA(0).SKA(0).MAT(0,I,I).Z.D..
I.I.L.. MO.1 . ....V.. "### DETERMINANT
E = "SKA(0)...... 8200: ....... RANG EIN
ER MATRIX.P...ZZ.MZ: MZ.0: . 1110: MZ.ZZ
.Z.... 900...... I.1 . NM...... MAT(0,I,
I).0 . 535...... I.....SKA(0).I.1.(....
MO.5 . ..A.&.. "### RANG ="SKA(0).O.0..
8200: ..S.X.. SKALARPRODUKT ZWEIER VEKTO
REN...Y.. VZ.1.H . . F$(3): ....B.. "$$$
ANZAHL DER ";...C.. "KOMPONENTEN";L(0).
Z.G.. 8100: . JN . 610,620...L.. "*** EI
NGABE DES 1.VEKTORS:"...M.ZZ.0: VZ.0: .
1231: VZ.ZZ.>.Q.. "*** EINGABE DES 2.VEK
TORS:".^.R.VZ.VZ.1: L(VZ).L(0): . 1231.K
.V.SKA(0).0.|.W.. K.1 . L(0)...X.SKA(0).
SKA(0).VEK(0,K).VEK(VZ,K)...Y.. K: VZ.VZ
.1.A.... MO.1 . ....... "### SKALARPRODU
KT = "SKA(0)...... 8200: ....... NORM EI
NES VEKTORS.$.F.. "$$$ ANZAHL DER ";.=.G
.. "KOMPONENTEN";L(0).X.K.. 8100: . JN .
710,720.W.P.ZZ.VZ: VZ.0: . 1231: VZ.ZZ.
..Z.SKA(0).0...... K.1 . L(0).....SKA(0)
.SKA(0).VEK(0,K).VEK(0,K).A.... K.V...SK
A(0)..(SKA(0))...... MO.1 . ....... "###
NORM = "SKA(0)...... 8200: ../.... GAUS
S-ELIMINATION MIT PIVOT.Q.... J.0 . M(0)
: MAT(0,0,J).J: ..R...NM.N(0): . M(0).NM
. NM.M(0)...... J.1 . NM.....P..(MAT(0,
J,J)): R.J: S.J...... J.1.NM . 930.E....
I.J.1 . N(0)...... .(MAT(0,I,J))..P . 9
26.....P..(MAT(0,I,J)): R.I...... I.....
. P.1E.5 . 970.'.... K.J . N(0).<.... J.
1.M(0) . 946.O.... L.J.1 . M(0).L.... .(
MAT(0,K,L))..P . 945.....P..(MAT(0,K,L))
: R.K: S.L...... L...... .(MAT(0,K,0))..
P . 948.M...P..(MAT(0,K,0)): R.K: S.0.U.
... K...... P.1E.5 . 960.....MAT(0,J,J).
0: . 990...... K.0 . N(0).".A.X.MAT(0,K,
S).<.B.MAT(0,K,S).MAT(0,K,J).M.C.MAT(0,K
,J).X.U.D.. K.Q.E.MAT(0,0,0).MAT(0,0,0).
1...J.. R.J . 980...K.. L.0 . M(0)...L.X
.MAT(0,R,L)...M.MAT(0,R,L).MAT(0,J,L).N.
N.MAT(0,J,L).X.V.O.. L...P.MAT(0,0,0).MA
T(0,0,0).1.. T.. J.1.N(0) . 989.. U.. K.
J.1 . N(0).6 V.C.MAT(0,K,J).MAT(0,J,J).K
W.. J.1.M(0) . 987.^ X.. L.J.1 . M(0)..
Y.MAT(0,K,L).MAT(0,K,L).C.MAT(0,J,L)..
Z.. L.. ..MAT(0,K,0).MAT(0,K,0).C.MAT(0,
J,0).. ... K.D ... J.J ....X ... EINGABE
.. L.. MATRIX EINGEBEN..!M.. MZ.1.H . .
F$(3): ...!Q.MZ.MZ.1.4!V.. "*** GROESSE
DER MATRIX:".S!W.. "$$$ ANZAHL DER ZEILE
N";._!X.. N(MZ).!Y.. "$$$ ANZAHL DER SP
ALTEN";..!Z.. M(MZ)..![.. 8100: . JN . 1
110,1120.I!`.. "*** ZEILENWEISE EINGABE:
"..!A.. I.1 . N(MZ): . J.1 . M(MZ).."B..
"%%% MAT ("I","J") = ";.."C.. MAT(MZ,I,
J).$"D.. J,I.A"J.. 8100: . JN . 1140,115
0.^"T.. "*** ELEMENT ANGEBEN:".{"U.. "$$
$ ZEILE,SPALTE";I,J.."V.. "%%% MAT ("I",
"J") = ";.."W.. MAT(MZ,I,J).."X.. 1130..
"~...R"... VEKTOR EINGEBEN.."... VZ.1.H
. . F$(3): ..."..VZ.VZ.1..#... "&&& ZEIL
E ODER SPALTE? ";.3#... E$: . E$."*" . 1
219.G#... E$."Z" . 1215.[#... E$."S" . 1
217.F#... 1211..#... "ZEILE": VEK(VZ,0).
.1..#... 1220..#A.. "SPALTE": VEK(VZ,0).
.1..#B.. 1220.K#C.. E$: VEK(VZ,0).0..#D.
. "$$$ ANZAHL DER ";..#E.. "KOMPONENTEN"
;L(VZ)..$I.. 8100: . JN . 1210,1230.<$N.
. "*** EINGABE DES VEKTORS:".N$O.. K.1 .
L(VZ).H$P.. "%%% VEK ("K") = ";.X$Q.. V
EK(VZ,K)..$R.. K..$X.. 8100: . JN . 1250
,1260..$... "$$$ WELCHE KOMPONENTE";K.W$
... "%%% VEK ("K") = ";..$... VEK(VZ,K).
.$... 1240..$.....%... SKALAR EINGEBEN.(
%... SZ.1.H . . F$(3): ..4%..SZ.SZ.1.U%.
.. "*** EINGABE DES SKALARS:".P%... "%%%
SKA = ";SKA(SZ)..%(.. 8100: . JN . 1311
,1330..%2....%P.. AUSGABE..%4.. MATRIX A
USGEBEN.O%5.. MZ.1 . . F$(4): ...%>.. "*
** ERGEBNIS:"..%?.. I.1 . N(MZ)..&@.. J.
1 . M(MZ).'&A.. "### MAT ("I","J") = ";.
9&B.. MAT(MZ,I,J).A&C.. J.V&D.. I.N(MZ)
. 2118.A&E.. 8300.I&F.. I.O&H....&... VE
KTOR AUSGEBEN..&... VZ.1 . . F$(4): ...&
... "*** ERGEBNIS ";.W&... VEK(VZ,0).2 .
2212,2213,2214..&... "(ZEILE):": . 2215
..'... "(*):": . 2215..'... "(SPALTE):".
)'... K.1 . L(VZ).K'... "### VEK ("K") =
"VEK(VZ,K).S'... K.Y'....O'... SKALAR A
USGEBEN..'... SZ.1 . . F$(4): ...'... "*
** ERGEBNIS:"..'... "### SKA = "SKA(SZ).
.'....T'... MULTIPLIKATIONEN..'... MATRI
X * MATRIX..(... MZ.2 . . F$(4): ...(&..
N(MZ).M(MZ.1) . 3120.,(+.. F$(5): ..@(0
.. I.1 . N(MZ.1).`(1.. J.1 . M(MZ): MAT(
0,I,J).0.R(2.. K.1 . N(MZ)..(3.X.MAT(MZ.
1,I,K).MAT(MZ,K,J)..(4.MAT(0,I,J).MAT(0,
I,J).X..(5.. K,J,I.W(:.N(0).N(MZ.1): M(0
).M(MZ)..(D.MZ.MZ.2: . 6100..(N.. O.26 .
...)X.. 2100: ...)... MATRIX * VEKTOR.6
)... MZ.1 . . F$(4): ..N)... VZ.1 . . F$
(4): ..H)... VEK(VZ,0)..1 . 3220.W)... F
$(6): ...)... M(MZ).L(VZ) . 3230..)... F
$(5): ...)... K.1 . N(MZ): VEK(0,K).0.O)
... J.1 . M(MZ)..) .X.MAT(MZ,K,J).VEK(VZ
,J)..*..VEK(0,K).VEK(0,K).X..*... J,K.)*
..L(0).N(MZ): VEK(0,0)..1.F*..MZ.MZ.1: V
Z.VZ.1: . 6200.T*... 2200: ..J*... VEKTO
R * MATRIX..*... VZ.1 . . F$(4): ...*...
MZ.1 . . F$(4): ...*... VEK(VZ,0)..1 .
3320.C*... F$(6): ...*... L(VZ).N(MZ) .
3330..*... F$(5): ...+... K.1 . M(MZ): V
EK(0,K).0..+... I.1 . N(MZ).7+..X.VEK(VZ
,I).MAT(MZ,I,K).O+..VEK(0,K).VEK(0,K).X.
Y+... I,K.U+..L(0).M(MZ): VEK(0,0)..1..+
..VZ.VZ.1: MZ.MZ.1: . 6200. + .. 2200: .
..+H.. SKALAR * MATRIX.N+I.. SZ.1 . . F$
(4): ...+J.. MZ.1 . . F$(4): ...,R.. I.1
. N(MZ): . J.1 . M(MZ).+,S.MAT(MZ,I,J).
SKA(SZ).MAT(MZ,I,J).5,T.. J,I.A,\.SZ.SZ.
1.O,F.. 2100: ..E,... VEKTOR * VEKTOR.},
... VZ.2 . . F$(4): ...,..Y.VEK(VZ.1,0):
Z.VEK(VZ,0)..,... Y.Z..1 . 3520..,... F
$(7): ..Z,... L(VZ.1).L(VZ) . 3530..,E..
F$(5): ...-J.. VEK(VZ,0)..1 . 3550..-T.
. MZ.1.H . . F$(3): ..)-U.MZ.MZ.1.J-V..
I.1 . L(VZ): . J.1 . L(VZ).P-W.MAT(MZ,I,
J).VEK(VZ.1,I).VEK(VZ,J).Z-X.. J,I..-Y.N
(MZ).L(VZ): M(MZ).L(VZ)..-Z.VZ.VZ.2..-..
. 2100: ..K-... SZ.1.H . . F$(3): ...-..
SZ.SZ.1: SKA(SZ).0..-... K.1 . L(VZ)....
.X.VEK(VZ.1,K).VEK(VZ,K).&...SKA(SZ).SKA
(SZ).X...... K.:...VZ.VZ.2.H.... 2300: .
.^.... SKALAR * VEKTOR.V.... SZ.1 . . F$
(4): ....... VZ.1 . . F$(4): ....... VEK
(VZ,0)..0 . 3620...... F$(6): ..I.$.. K.
1 . L(VZ)...%.VEK(VZ,K).SKA(SZ).VEK(VZ,K
)...&.. K.....SZ.SZ.1../8.. 2200: ..!/T.
. SKALAR * SKALAR.9/U.. SZ.2 . . F$(4):
..Y/~.SKA(SZ.1).SKA(SZ.1).SKA(SZ).E/..SZ
.SZ.1.S/... 2300: .../ .. ADDITIONEN & S
UBTRAKTIONEN../... MATRIX + MATRIX.B/...
MZ.2 . . F$(4): .../... N(MZ.1).N(MZ) .
4120../... F$(5): ...0... M(MZ.1).M(MZ)
. 4130..0... F$(5): ..70".. I.1 . N(MZ)
: . J.1 . M(MZ).W0#.X.MAT(MZ.1,I,J).MAT(
MZ,I,J).K0$.MAT(MZ.1,I,J).X.U0%.. J,I..0
,.MZ.MZ.1..06.. 2100: ...0H.. VEKTOR + V
EKTOR..0I.. VZ.2 . . F$(4): ...0R.. VEK(
VZ.1,0).VEK(VZ,0) . 4220..0W.. F$(7): ..
.1|.. L(VZ.1).L(VZ) . 4230..1... F$(5):
..+1... K.1 . L(VZ).Q1..VEK(VZ.1,K).VEK(
VZ.1,K).VEK(VZ,K).Y1... K.E1..VZ.VZ.1.S1
... 2200: ...1L.. SKALAR + SKALAR..1M..
SZ.2 . . F$(4): ..A1V.SKA(SZ.1).SKA(SZ.1
).SKA(SZ).M1..SZ.SZ.1..1... 2300: ...10.
. MATRIX - MATRIX..2:.. I.1 . N(MZ): . J
.1 . M(MZ)./2D.MAT(MZ,I,J)..MAT(MZ,I,J).
92N.. J,I.G2X.. 4100: ..]2... VEKTOR - V
EKTOR.O2... K.1 . L(VZ)..2..VEK(VZ,K)..V
EK(VZ,K)..2... K..2... 4200: ...2... SKA
LAR - SKALAR.I2..SKA(SZ)..SKA(SZ).W2...
4300: ...2... WEITERE OPERATIONEN..3...
MATRIX TRANSPONIEREN.$3... MZ.1 . . F$(4
): ..E3... I.1 . N(MZ): . J.1 . M(MZ).`3
..MAT(0,J,I).MAT(MZ,I,J).J3... J,I..3..N
(0).M(MZ): M(0).N(MZ)..3..MZ.MZ.1: . 610
0..3(.. 2100: ..B3P.. VEKTOR TRANSPONIER
EN.Z3Q.. VZ.1 . . F$(4): ...3Z.VEK(VZ,0)
..VEK(VZ,0)..4D.. 2200: ...4... WURZEL (
SKALAR)./4... SZ.1 . . F$(4): ..G4... SK
A(SZ)..0 . 5320.V4C.. F$(8): ..M4H.SKA(S
Z)..(SKA(SZ)).{4R.. 2300: ...4... SKALAR
^ SKALAR..4... SZ.2 . . F$(4): ..C4"..
SKA(SZ.1)..0 . 5430..4,.. SKA(SZ)..(SKA(
SZ)) . 5430..41.. F$(8): ...56.SKA(SZ.1)
.SKA(SZ.1).SKA(SZ)..5@.SZ.SZ.1.,5J.. 230
0: ..B5|.. MATRIX ^ SKALAR.Z5}.. MZ.1 .
. F$(4): ..R5~.. SZ.1 . . F$(4): ...5...
SKA(SZ)..0 . 5520..5... F$(8): ...5...
SKA(SZ)..(SKA(SZ)) . 5530.H5... F$(8): .
..5... N(MZ).M(MZ) . 5540..5... F$(9): .
..6... SKA(SZ).0 . 5550."6..SKA(SZ).N(MZ
): MZ.MZ.1.06... 7600: ..G6... SKA(SZ).1
. 5560.[6..SZ.SZ.1: . 5590.W6... 6400:
MZ.MZ.1: . 6100..6B.. N.1 . SKA(SZ).1..6
C.. 3100: MZ.MZ.1..6D.. N..6L.SZ.SZ.1: M
Z.MZ.1.L6V.. 2100: ...6... SKALAR / SKAL
AR..6... SKA(SZ)..0 . 5620..7... F$(8):
...7..SKA(SZ).1.SKA(SZ).-7... 3700: ..>7
D.. 1 / SKALAR.V7E.. SZ.1 . . F$(4): ..N
7N.. SKA(SZ)..0 . 5720.}7S.. F$(8): ...7
X.SKA(SZ).1.SKA(SZ)..7B.. 2300: ...7P..
STAPELMANIPULATIONEN..7T.. MATRIX AUF ST
APEL BRINGEN..7U.. MZ.1.H . . F$(3): ...
8..MZ.MZ.1..8..N(MZ).N(0): M(MZ).M(0).<8
... I.1 . N(0): . J.1 . M(0).W8..MAT(MZ,
I,J).MAT(0,I,J).A8... J,I.U8... O.29 . .
6700.{8.....88.. VEKTOR AUF STAPEL BRIN
GEN..89.. VZ.1.H . . F$(3): ..A8B.VZ.VZ.
1.P8L.L(VZ).L(0)..8V.. K.0 . L(0)..8W.VE
K(VZ,K).VEK(0,K)..9X.. K..9`.. O.30 . .
6700..9J...:9... SKALAR AUF STAPEL BRING
EN.T9... SZ.1.H . . F$(3): ..`9..SZ.SZ.1
.S9..SKA(SZ).SKA(0)..9... O.31 . . 6700.
.9D....9... MATRIX VOM STAPEL HOLEN.C9..
. MZ.1 . . F$(4): ...9... I.1 . N(MZ): .
J.1 . M(MZ)..9..MAT(0,I,J).MAT(MZ,I,J).
.:... J,I.$:..N(0).N(MZ): M(0).M(MZ).0:.
.MZ.MZ.1.D:(.. O.32 . . 6700.J:2...H:D..
VEKTOR VOM STAPEL HOLEN..:E.. VZ.1 . .
F$(4): ...:N.. K.0 . L(VZ)..:O.VEK(0,K).
VEK(VZ,K)..:P.. K..:X.L(0).L(VZ).L:..VZ.
VZ.1..:... O.33 . . 6700..:.....;H.. SKA
LAR VOM STAPEL HOLEN..;I.. SZ.1 . . F$(4
): ../;R.SKA(0).SKA(SZ).;;..SZ.SZ.1.O;..
. O.34 . . 6700.U;....Q;,.. STAPELZEIGER
AUSGEBEN..;6.. "*** STAPELZEIGER:"..;7.
. "@@@ (MZ,VZ,SZ) = ";..;8.. "("MZ","VZ"
,"SZ")".E;@....;... NEUSTART DES UPN-REC
HNERS..<... 8100: . JN . 6830,6820..<..M
Z.0: VZ.0: SZ.0..<....6<X.. ANDERE OPERA
TIONEN.D<... INVERSE.\<... MZ.1 . . F$(4
): ..V<... MZ.1.H . . F$(3): ...<F.. N(M
Z).M(MZ) . 7120..<K.. F$(9): ...<P.. 640
0: MZ.MZ.1: . 320.P<U.. SKA(0)..N(0) . .
..<Z.. 6100: . 2100: ...< .. DETERMINANT
E..=!.. MZ.1 . . F$(4): ..*=*.. N(MZ).M(
MZ) . 7220.9=/.. F$(9): ..K=4.. 6400: .
430.A=>.. 6300: . 2300: ..L=... RANG..=.
.. MZ.1 . . F$(4): ...=... 6400: . 520..
=... 6300: . 2300: ...=... SKALARPRODUKT
.X=... VZ.2 . . F$(4): ...=..Y.VEK(VZ.1,
0): Z.VEK(VZ,0)..>... Y.0 . Z.0 . 7420..
>... F$(7): ..8>... L(VZ).L(VZ.1) . 7430
.G>... F$(5): ..Y>... 6500: . 630.O>...
6300: . 2300: ..Z>L.. NORM..>M.. VZ.1 .
. F$(4): ...>V.. VEK(VZ,0).0 . 7520..>[.
. F$(6): ..L>`.. 6500: . 730..>J.. 6300:
. 2300: ...>... EINHEITSMATRIX..?... MZ
.1.H . . F$(3): ..)?... SZ.1 . . F$(4):
..5?..MZ.MZ.1.I?D.. I.1 . SKA(SZ).]?E..
J.1 . SKA(SZ).T?F.MAT(MZ,I,J)..(I.J).~?G
.. J,I..?N.N(MZ).SKA(SZ): M(MZ).SKA(SZ).
.?X.SZ.SZ.1..?... 2100: ..L?@.. GET-ROUT
INEN.Z?... JA/NEIN..?... "&&& KORRIGIERE
N? ";..@... E$: . E$."" . 8110."@... E$.
"J" . 8120.6@... E$."N" . 8130.A@... 811
0.U@... "JA": JN.1: ..K@B.. "NEIN": JN.2
: ..X@. . RETURN..@. . "!!! <RETURN>"..@
. . E$: . E$..R$ . 8220.H@& . "*** EINEN
MOMENT, BITTE.".N@0 ..Z@L . SPACE..@V .
"!!! <SPACE>"..A. . E$: . E$.." " . 832
0..A. ..2A4!. LOESCHEN DER ARBEITSSPEICH
ER.WA>!SKA(0).0: L(0).0: M(0).0: N(0).0.
QAH!. I.0 . G: VEK(0,I).0..AR!. J.0 . G:
MAT(0,I,J).0..A\!. J,I..AF!...A(#. DATA
S.FA.#. BEZEICHNUNGEN DER MODI.XA.#. UPN
-RECHNER..A.#. LINEARES GLEICHUNGSSYSTEM
..B.#. INVERSE EINER MATRIX.3B.#. DETERM
INANTE EINER MATRIX.KB.#. RANG EINER MAT
RIX.OB.#. SKALARPRODUKT ZWEIER VEKTOREN.
.B.#. NORM EINES VEKTORS..B.#. BEFEHLE D
ES UPN-RECHNERS.EB.#. MAT,VEK,SKA,MDR,VD
R,SDR..B.#. M*M,M*V,V*M,S*M,M*S,V*V..C.#
. S*V,V*S,S*S,M+M,V+V,S+S..C.$. M-M,V-V,
S-S,MTR,VTR,WRZ.=C.$. S^S,M^S,S/S,1/S,MS
T,VST.[C.$. SST,MLS,VLS,SLS,STZ,NEU.YC.$
. INV,DET,RNG,SPR,NRM,EHM..CT$. FEHLERME
LDUNGEN..CU$. DAS IST KEIN GUELTIGER BEF
EHL.NCV$. MATRIX IST SINGULAER..CW$. STA
PEL IST VOLL..CX$. STAPEL IST LEER..DY$.
DIMENSIONEN STIMMEN NICHT.3DZ$. VEKTOR
PASST NICHT.OD[$. VEKTOREN PASSEN NICHT.
HD\$. SKALAR PASST NICHT..D]$. MATRIX IS
T NICHT QUADRATISCH..D.'. COMMODORE-EIGE
NHEITEN.ED.'C$.G(147): . CLEAR SCREEN..D
$'D$.G(20): . DELETE..D.'L$.G(157): . C
URSOR LEFT..E8'R$.G(13): . RETURN.)EB'S
$.G(144): . BLACK.@EL'W$.G(5): . WHITE
.VEV'B$.G(31): . BLUE.QE`'. 53280,14: .
53281,14..ET'. DIMENSIONIEREN UND EINLE
SEN..E~'. MAT(H,G,G),VEK(H,G),SKA(H).IE.
'. L(H),M(H),N(H)..E.'. M$(7),O$(42),F$(
9)..E.'. I.1 . 7: . M$(I): ...F.'. I.1 .
42: . O$(I): ..%F.'. I.1 . 9.HF.'. F$(I
): F$(I)."??? ".F$(I)."..PFD'. I.YFX'. 1
0...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL