MAT 
FILE INFORMATION
FILENAME(S): MAT 
FILE TYPE(S): PRG
FILE SIZE: 15.6K
FIRST SEEN: 2025-11-30 01:08:18
APPEARS ON: 2 disk(s)
FILE HASH
beac2126e3d94b3dfbcb1fe95e4049df808330540c2f6e12f8429670ddb54a7a
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DIVERSES ON C64 | MAT  | PRG | Treasure Chest - Wolfgang Rauprich | 13 | 19 | DOWNLOAD FILE |
| D IVERSES | MAT  | PRG | Treasure Chest - Wolfgang Rauprich | 13 | 19 | 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 B5 |................|
00000190: 09 0A 00 8F 20 43 4F 50 59 52 49 47 48 54 20 42 |.... COPYRIGHT B|
000001A0: 59 20 43 48 49 50 2C 20 44 49 53 4B 20 23 35 2E |Y CHIP, DISK #5.|
000001B0: 30 30 33 2E 31 00 C1 09 13 00 8F 20 4D 45 4E 55 |003.1...... MENU|
000001C0: 45 00 E3 09 14 00 99 20 43 24 3B 53 24 3B 22 20 |E...... C$;S$;" |
000001D0: 20 20 4D 41 54 52 49 5A 45 4E 2D 41 4C 47 45 42 | MATRIZEN-ALGEB|
000001E0: 52 41 22 00 F1 09 1E 00 81 20 49 B2 31 20 A4 20 |RA"...... I.1 . |
000001F0: 37 00 08 0A 28 00 99 3A 20 99 20 57 24 3B 49 3B |7...(..: . W$;I;|
00000200: 42 24 3B 4D 24 28 49 29 00 10 0A 32 00 82 20 49 |B$;M$(I)...2.. I|
00000210: 00 31 0A 3C 00 A1 20 4D 24 3A 20 8B 20 4D 24 B3 |.1.<.. M$: . M$.|
00000220: 22 31 22 20 B0 20 4D 24 B1 22 37 22 20 89 20 36 |"1" . M$."7" . 6|
00000230: 30 00 51 0A 46 00 4D 4F B2 C5 28 4D 24 29 3A 20 |0.Q.F.MO..(M$): |
00000240: 99 20 43 24 3B 53 24 3B 4D 24 28 4D 4F 29 3B 42 |. C$;S$;M$(MO);B|
00000250: 24 00 75 0A 50 00 91 4D 4F 8D 31 30 30 2C 32 30 |$.u.P..MO.100,20|
00000260: 30 2C 33 30 30 2C 34 30 30 2C 35 30 30 2C 36 30 |0,300,400,500,60|
00000270: 30 2C 37 30 30 00 86 0A 5A 00 8D 20 38 35 30 30 |0,700...Z.. 8500|
00000280: 3A 20 89 20 31 30 00 98 0A 64 00 8F 20 55 50 4E |: . 10...d.. UPN|
00000290: 2D 52 45 43 48 4E 45 52 00 B0 0A 6E 00 99 20 57 |-RECHNER...n.. W|
000002A0: 24 3B 22 3E 3E 3E 20 22 3B 3A 20 4F 24 B2 22 22 |$;">>> ";: O$.""|
000002B0: 00 C8 0A 78 00 A1 20 45 24 3A 20 8B 20 45 24 B2 |...x.. E$: . E$.|
000002C0: 22 22 20 A7 20 31 32 30 00 DA 0A 82 00 8B 20 45 |"" . 120...... E|
000002D0: 24 B2 44 24 20 A7 20 31 33 35 00 EE 0A 83 00 99 |$.D$ . 135......|
000002E0: 20 45 24 3B 3A 20 4F 24 B2 4F 24 AA 45 24 00 02 | E$;: O$.O$.E$..|
000002F0: 0B 84 00 8B 20 C3 28 4F 24 29 B2 33 20 A7 20 31 |.... .(O$).3 . 1|
00000300: 35 30 00 0C 0B 85 00 89 20 31 32 30 00 20 0B 87 |50...... 120. ..|
00000310: 00 8B 20 C3 28 4F 24 29 B3 31 20 A7 20 31 32 30 |.. .(O$).1 . 120|
00000320: 00 35 0B 88 00 4F 24 B2 C8 28 4F 24 2C C3 28 4F |.5...O$..(O$,.(O|
00000330: 24 29 AB 31 29 00 44 0B 89 00 99 20 4C 24 22 20 |$).1).D.... L$" |
00000340: 22 4C 24 3B 00 4E 0B 8A 00 89 20 31 32 30 00 5C |"L$;.N.... 120.\|
00000350: 0B 96 00 99 20 42 24 3A 20 4F B2 30 00 6B 0B 97 |.... B$: O.0.k..|
00000360: 00 81 20 49 B2 31 20 A4 20 34 32 00 87 0B 98 00 |.. I.1 . 42.....|
00000370: 8B 20 4F 24 B2 4F 24 28 49 29 20 A7 20 4F B2 49 |. O$.O$(I) . O.I|
00000380: 3A 20 89 20 31 36 30 00 8F 0B 99 00 82 20 49 00 |: . 160...... I.|
00000390: A2 0B 9A 00 8B 20 4F 24 B2 22 52 45 54 22 20 A7 |..... O$."RET" .|
000003A0: 20 8E 00 B5 0B 9B 00 99 20 46 24 28 31 29 3A 20 | ....... F$(1): |
000003B0: 89 20 31 30 30 00 C9 0B A0 00 49 B2 B5 28 28 4F |. 100.....I..((O|
000003C0: AB 31 29 AD 31 32 29 AA 31 00 E5 0B A1 00 4A B2 |.1).12).1.....J.|
000003D0: B5 28 28 4F AB 31 32 AC 28 49 AB 31 29 AB 31 29 |.((O.12.(I.1).1)|
000003E0: AD 33 29 AA 31 00 FE 0B A2 00 4B B2 4F AB 31 32 |.3).1.....K.O.12|
000003F0: AC 28 49 AB 31 29 AB 33 AC 28 4A AB 31 29 00 18 |.(I.1).3.(J.1)..|
00000400: 0C A3 00 91 20 49 20 89 20 31 36 34 2C 31 36 35 |.... I . 164,165|
00000410: 2C 31 36 36 2C 31 36 37 00 32 0C A4 00 91 20 4A |,166,167.2.... J|
00000420: 20 89 20 31 36 38 2C 31 36 39 2C 31 37 30 2C 31 | . 168,169,170,1|
00000430: 37 31 00 4C 0C A5 00 91 20 4A 20 89 20 31 37 32 |71.L.... J . 172|
00000440: 2C 31 37 33 2C 31 37 34 2C 31 37 35 00 66 0C A6 |,173,174,175.f..|
00000450: 00 91 20 4A 20 89 20 31 37 36 2C 31 37 37 2C 31 |.. J . 176,177,1|
00000460: 37 38 2C 31 37 39 00 78 0C A7 00 91 20 4A 20 89 |78,179.x.... J .|
00000470: 20 31 38 30 2C 31 38 31 00 98 0C A8 00 91 20 4B | 180,181...... K|
00000480: 20 8D 20 31 31 30 30 2C 31 32 30 30 2C 31 33 30 | . 1100,1200,130|
00000490: 30 3A 20 89 20 31 30 30 00 B8 0C A9 00 91 20 4B |0: . 100...... K|
000004A0: 20 8D 20 32 31 30 30 2C 32 32 30 30 2C 32 33 30 | . 2100,2200,230|
000004B0: 30 3A 20 89 20 31 30 30 00 D8 0C AA 00 91 20 4B |0: . 100...... K|
000004C0: 20 8D 20 33 31 30 30 2C 33 32 30 30 2C 33 33 30 | . 3100,3200,330|
000004D0: 30 3A 20 89 20 31 30 30 00 F8 0C AB 00 91 20 4B |0: . 100...... K|
000004E0: 20 8D 20 33 34 30 30 2C 33 34 30 30 2C 33 35 30 | . 3400,3400,350|
000004F0: 30 3A 20 89 20 31 30 30 00 18 0D AC 00 91 20 4B |0: . 100...... K|
00000500: 20 8D 20 33 36 30 30 2C 33 36 30 30 2C 33 37 30 | . 3600,3600,370|
00000510: 30 3A 20 89 20 31 30 30 00 38 0D AD 00 91 20 4B |0: . 100.8.... K|
00000520: 20 8D 20 34 31 30 30 2C 34 32 30 30 2C 34 33 30 | . 4100,4200,430|
00000530: 30 3A 20 89 20 31 30 30 00 58 0D AE 00 91 20 4B |0: . 100.X.... K|
00000540: 20 8D 20 34 34 30 30 2C 34 35 30 30 2C 34 36 30 | . 4400,4500,460|
00000550: 30 3A 20 89 20 31 30 30 00 78 0D AF 00 91 20 4B |0: . 100.x.... K|
00000560: 20 8D 20 35 31 30 30 2C 35 32 30 30 2C 35 33 30 | . 5100,5200,530|
00000570: 30 3A 20 89 20 31 30 30 00 98 0D B0 00 91 20 4B |0: . 100...... K|
00000580: 20 8D 20 35 34 30 30 2C 35 35 30 30 2C 35 36 30 | . 5400,5500,560|
00000590: 30 3A 20 89 20 31 30 30 00 B8 0D B1 00 91 20 4B |0: . 100...... K|
000005A0: 20 8D 20 35 37 30 30 2C 36 31 30 30 2C 36 32 30 | . 5700,6100,620|
000005B0: 30 3A 20 89 20 31 30 30 00 D8 0D B2 00 91 20 4B |0: . 100...... K|
000005C0: 20 8D 20 36 33 30 30 2C 36 34 30 30 2C 36 35 30 | . 6300,6400,650|
000005D0: 30 3A 20 89 20 31 30 30 00 F8 0D B3 00 91 20 4B |0: . 100...... K|
000005E0: 20 8D 20 36 36 30 30 2C 36 37 30 30 2C 36 38 30 | . 6600,6700,680|
000005F0: 30 3A 20 89 20 31 30 30 00 18 0E B4 00 91 20 4B |0: . 100...... K|
00000600: 20 8D 20 37 31 30 30 2C 37 32 30 30 2C 37 33 30 | . 7100,7200,730|
00000610: 30 3A 20 89 20 31 30 30 00 38 0E B5 00 91 20 4B |0: . 100.8.... K|
00000620: 20 8D 20 37 34 30 30 2C 37 35 30 30 2C 37 36 30 | . 7400,7500,760|
00000630: 30 3A 20 89 20 31 30 30 00 58 0E C8 00 8F 20 4C |0: . 100.X.... L|
00000640: 49 4E 45 41 52 45 53 20 47 4C 45 49 43 48 55 4E |INEARES GLEICHUN|
00000650: 47 53 53 59 53 54 45 4D 00 7C 0E CD 00 99 20 22 |GSSYSTEM.|.... "|
00000660: 24 24 24 20 41 4E 5A 41 48 4C 20 44 45 52 20 47 |$$$ ANZAHL DER G|
00000670: 4C 45 49 43 48 55 4E 47 45 4E 22 3B 00 87 0E CE |LEICHUNGEN";....|
00000680: 00 85 20 4E 28 30 29 00 AB 0E CF 00 99 20 22 24 |.. N(0)...... "$|
00000690: 24 24 20 41 4E 5A 41 48 4C 20 44 45 52 20 55 4E |$$ ANZAHL DER UN|
000006A0: 42 45 4B 41 4E 4E 54 45 4E 22 3B 00 B6 0E D0 00 |BEKANNTEN";.....|
000006B0: 85 20 4D 28 30 29 00 D1 0E D1 00 8D 20 38 31 30 |. M(0)...... 810|
000006C0: 30 3A 20 91 20 4A 4E 20 89 20 32 30 35 2C 32 31 |0: . JN . 205,21|
000006D0: 30 00 EB 0E D2 00 99 20 22 2A 2A 2A 20 45 49 4E |0...... "*** EIN|
000006E0: 47 41 42 45 20 44 45 52 20 22 3B 00 08 0F D3 00 |GABE DER ";.....|
000006F0: 99 20 22 4B 4F 45 46 46 49 5A 49 45 4E 54 45 4E |. "KOEFFIZIENTEN|
00000700: 4D 41 54 52 49 58 3A 22 00 27 0F D4 00 5A 5A B2 |MATRIX:".'...ZZ.|
00000710: 4D 5A 3A 20 4D 5A B2 30 3A 20 8D 20 31 31 32 31 |MZ: MZ.0: . 1121|
00000720: 3A 20 4D 5A B2 5A 5A 00 32 0F D7 00 8D 20 36 31 |: MZ.ZZ.2.... 61|
00000730: 30 30 00 47 0F DC 00 8D 20 35 32 30 3A 20 52 47 |00.G.... 520: RG|
00000740: B2 53 4B 41 28 30 29 00 52 0F E1 00 8D 20 36 34 |.SKA(0).R.... 64|
00000750: 30 30 00 6C 0F E6 00 99 20 22 2A 2A 2A 20 45 49 |00.l.... "*** EI|
00000760: 4E 47 41 42 45 20 44 45 52 20 22 3B 00 8E 0F E7 |NGABE DER ";....|
00000770: 00 99 20 22 52 45 43 48 54 45 4E 20 53 45 49 54 |.. "RECHTEN SEIT|
00000780: 45 3A 22 3A 20 4C 28 30 29 B2 4E 28 30 29 00 AD |E:": L(0).N(0)..|
00000790: 0F E8 00 5A 5A B2 56 5A 3A 20 56 5A B2 30 3A 20 |...ZZ.VZ: VZ.0: |
000007A0: 8D 20 31 32 33 31 3A 20 56 5A B2 5A 5A 00 B7 0F |. 1231: VZ.ZZ...|
000007B0: EB 00 48 4F 4D B2 31 00 C8 0F EC 00 81 20 49 B2 |..HOM.1...... I.|
000007C0: 31 20 A4 20 4E 28 30 29 00 E0 0F ED 00 4D 41 54 |1 . N(0).....MAT|
000007D0: 28 30 2C 49 2C 30 29 B2 56 45 4B 28 30 2C 49 29 |(0,I,0).VEK(0,I)|
000007E0: 00 FA 0F EE 00 8B 20 56 45 4B 28 30 2C 49 29 B3 |...... VEK(0,I).|
000007F0: B1 30 20 A7 20 48 4F 4D B2 30 00 02 10 EF 00 82 |.0 . HOM.0......|
00000800: 20 49 00 18 10 F0 00 8D 20 35 32 30 3A 20 52 4E | I...... 520: RN|
00000810: 47 B2 53 4B 41 28 30 29 00 31 10 FA 00 99 20 22 |G.SKA(0).1.... "|
00000820: 5C 5C 5C 20 53 59 53 54 45 4D 20 49 53 54 20 22 |\\\ SYSTEM IST "|
00000830: 3B 00 4C 10 FB 00 8B 20 52 4E 47 B2 52 47 20 B0 |;.L.... RNG.RG .|
00000840: 20 48 4F 4D B2 31 20 A7 20 32 35 33 00 6A 10 FC | HOM.1 . 253.j..|
00000850: 00 99 20 22 4E 49 43 48 54 20 4C 4F 45 53 42 41 |.. "NICHT LOESBA|
00000860: 52 2E 22 3A 20 89 20 32 35 35 00 87 10 FD 00 8B |R.": . 255......|
00000870: 20 48 4F 4D B2 30 20 B0 20 52 4E 47 B3 4D 28 30 | HOM.0 . RNG.M(0|
00000880: 29 20 A7 20 32 35 36 00 A4 10 FE 00 99 20 22 4E |) . 256...... "N|
00000890: 55 52 20 54 52 49 56 49 41 4C 20 4C 4F 45 53 42 |UR TRIVIAL LOESB|
000008A0: 41 52 2E 22 00 B2 10 FF 00 8D 20 38 32 30 30 3A |AR."...... 8200:|
000008B0: 20 8E 00 C7 10 00 01 8B 20 52 4E 47 B3 4D 28 30 | ....... RNG.M(0|
000008C0: 29 20 A7 20 32 35 39 00 E2 10 01 01 99 20 22 45 |) . 259...... "E|
000008D0: 49 4E 44 45 55 54 49 47 20 4C 4F 45 53 42 41 52 |INDEUTIG LOESBAR|
000008E0: 3A 22 00 EC 10 02 01 89 20 32 36 30 00 0D 11 03 |:"...... 260....|
000008F0: 01 99 20 22 4E 49 43 48 54 20 45 49 4E 44 45 55 |.. "NICHT EINDEU|
00000900: 54 49 47 20 4C 4F 45 53 42 41 52 3A 22 00 1F 11 |TIG LOESBAR:"...|
00000910: 04 01 8B 20 31 B1 52 4E 47 20 A7 20 32 37 30 00 |... 1.RNG . 270.|
00000920: 3D 11 05 01 81 20 49 B2 31 20 A4 20 52 4E 47 3A |=.... I.1 . RNG:|
00000930: 20 43 B2 4D 41 54 28 30 2C 49 2C 49 29 00 59 11 | C.MAT(0,I,I).Y.|
00000940: 06 01 4D 41 54 28 30 2C 49 2C 30 29 B2 4D 41 54 |..MAT(0,I,0).MAT|
00000950: 28 30 2C 49 2C 30 29 AD 43 00 6A 11 07 01 81 20 |(0,I,0).C.j.... |
00000960: 4A B2 49 20 A4 20 4D 28 30 29 00 86 11 08 01 4D |J.I . M(0).....M|
00000970: 41 54 28 30 2C 49 2C 4A 29 B2 4D 41 54 28 30 2C |AT(0,I,J).MAT(0,|
00000980: 49 2C 4A 29 AD 43 00 90 11 09 01 82 20 4A 2C 49 |I,J).C...... J,I|
00000990: 00 A2 11 0E 01 8B 20 52 4E 47 B3 32 20 A7 20 32 |...... RNG.2 . 2|
000009A0: 38 30 00 B7 11 0F 01 81 20 4A B2 52 4E 47 20 A4 |80...... J.RNG .|
000009B0: 20 32 20 A9 20 AB 31 00 D5 11 10 01 81 20 49 B2 | 2 . .1...... I.|
000009C0: 31 20 A4 20 4A AB 31 3A 20 43 B2 4D 41 54 28 30 |1 . J.1: C.MAT(0|
000009D0: 2C 49 2C 4A 29 00 FC 11 11 01 4D 41 54 28 30 2C |,I,J).....MAT(0,|
000009E0: 49 2C 30 29 B2 4D 41 54 28 30 2C 49 2C 30 29 AB |I,0).MAT(0,I,0).|
000009F0: 43 AC 4D 41 54 28 30 2C 4A 2C 30 29 00 13 12 12 |C.MAT(0,J,0)....|
00000A00: 01 8B 20 52 4E 47 AA 31 B1 4D 28 30 29 20 A7 20 |.. RNG.1.M(0) . |
00000A10: 32 37 38 00 28 12 13 01 81 20 4C B2 52 4E 47 AA |278.(.... L.RNG.|
00000A20: 31 20 A4 20 4D 28 30 29 00 4F 12 14 01 4D 41 54 |1 . M(0).O...MAT|
00000A30: 28 30 2C 49 2C 4C 29 B2 4D 41 54 28 30 2C 49 2C |(0,I,L).MAT(0,I,|
00000A40: 4C 29 AB 43 AC 4D 41 54 28 30 2C 4A 2C 4C 29 00 |L).C.MAT(0,J,L).|
00000A50: 57 12 15 01 82 20 4C 00 61 12 16 01 82 20 49 2C |W.... L.a.... I,|
00000A60: 4A 00 73 12 18 01 8B 20 48 4F 4D B2 31 20 A7 20 |J.s.... HOM.1 . |
00000A70: 32 38 35 00 84 12 19 01 81 20 4A B2 31 20 A4 20 |285...... J.1 . |
00000A80: 4D 28 30 29 00 A8 12 1A 01 99 20 22 23 23 23 20 |M(0)...... "### |
00000A90: 28 20 22 3B 4D 41 54 28 30 2C 4D 41 54 28 30 2C |( ";MAT(0,MAT(0,|
00000AA0: 30 2C 4A 29 2C 30 29 3B 00 B6 12 1B 01 99 20 A3 |0,J),0);...... .|
00000AB0: 32 30 29 22 29 22 00 BE 12 1C 01 82 20 4A 00 D5 |20)")"...... J..|
00000AC0: 12 1D 01 8B 20 52 4E 47 AA 31 B1 4D 28 30 29 20 |.... RNG.1.M(0) |
00000AD0: A7 20 32 39 30 00 EA 12 1E 01 81 20 49 B2 52 4E |. 290...... I.RN|
00000AE0: 47 AA 31 20 A4 20 4D 28 30 29 00 FF 12 1F 01 81 |G.1 . M(0)......|
00000AF0: 20 4A B2 52 4E 47 AA 31 20 A4 20 4D 28 30 29 00 | J.RNG.1 . M(0).|
00000B00: 14 13 20 01 4D 41 54 28 30 2C 49 2C 4A 29 B2 28 |.. .MAT(0,I,J).(|
00000B10: 49 B2 4A 29 00 1E 13 21 01 82 20 4A 2C 49 00 35 |I.J)...!.. J,I.5|
00000B20: 13 22 01 8B 20 52 4E 47 AA 31 B1 4D 28 30 29 20 |.".. RNG.1.M(0) |
00000B30: A7 20 32 39 39 00 4A 13 23 01 8B 20 48 4F 4D B2 |. 299.J.#.. HOM.|
00000B40: 30 20 A7 20 8D 20 38 33 30 30 00 5F 13 24 01 81 |0 . . 8300._.$..|
00000B50: 20 4C B2 52 4E 47 AA 31 20 A4 20 4D 28 30 29 00 | L.RNG.1 . M(0).|
00000B60: 70 13 25 01 81 20 49 B2 31 20 A4 20 4D 28 30 29 |p.%.. I.1 . M(0)|
00000B70: 00 94 13 26 01 99 20 22 23 23 23 20 5B 20 22 3B |...&.. "### [ ";|
00000B80: 4D 41 54 28 30 2C 4D 41 54 28 30 2C 30 2C 49 29 |MAT(0,MAT(0,0,I)|
00000B90: 2C 4C 29 3B 00 A2 13 27 01 99 20 A3 32 30 29 22 |,L);...'.. .20)"|
00000BA0: 5D 22 00 BA 13 28 01 82 20 49 3A 20 8B 20 4C B2 |]"...(.. I: . L.|
00000BB0: 4D 28 30 29 20 A7 20 32 39 38 00 C5 13 29 01 8D |M(0) . 298...)..|
00000BC0: 20 38 33 30 30 00 CD 13 2A 01 82 20 4C 00 DB 13 | 8300...*.. L...|
00000BD0: 2B 01 8D 20 38 32 30 30 3A 20 8E 00 F6 13 2C 01 |+.. 8200: ....,.|
00000BE0: 8F 20 49 4E 56 45 52 53 45 20 45 49 4E 45 52 20 |. INVERSE EINER |
00000BF0: 4D 41 54 52 49 58 00 10 14 2D 01 8B 20 4D 5A AA |MATRIX...-.. MZ.|
00000C00: 31 B1 48 20 A7 20 99 20 46 24 28 33 29 3A 20 8E |1.H . . F$(3): .|
00000C10: 00 30 14 31 01 99 20 22 24 24 24 20 4F 52 44 4E |.0.1.. "$$$ ORDN|
00000C20: 55 4E 47 20 44 45 52 20 4D 41 54 52 49 58 22 3B |UNG DER MATRIX";|
00000C30: 00 46 14 32 01 85 20 4E 28 30 29 3A 20 4D 28 30 |.F.2.. N(0): M(0|
00000C40: 29 B2 4E 28 30 29 00 61 14 33 01 8D 20 38 31 30 |).N(0).a.3.. 810|
00000C50: 30 3A 20 91 20 4A 4E 20 89 20 33 30 35 2C 33 31 |0: . JN . 305,31|
00000C60: 30 00 80 14 36 01 5A 5A B2 4D 5A 3A 20 4D 5A B2 |0...6.ZZ.MZ: MZ.|
00000C70: 30 3A 20 8D 20 31 31 32 30 3A 20 4D 5A B2 5A 5A |0: . 1120: MZ.ZZ|
00000C80: 00 8B 14 3B 01 8D 20 36 31 30 30 00 AA 14 40 01 |...;.. 6100...@.|
00000C90: 8D 20 35 32 30 3A 20 8B 20 53 4B 41 28 30 29 B2 |. 520: . SKA(0).|
00000CA0: 4E 28 30 29 20 A7 20 33 33 30 00 C2 14 45 01 99 |N(0) . 330...E..|
00000CB0: 20 46 24 28 32 29 3A 20 8B 20 4D 4F B2 31 20 A7 | F$(2): . MO.1 .|
00000CC0: 20 8E 00 D0 14 46 01 8D 20 38 32 30 30 3A 20 8E | ....F.. 8200: .|
00000CD0: 00 EF 14 4A 01 81 20 49 B2 31 20 A4 20 4E 28 30 |...J.. I.1 . N(0|
00000CE0: 29 3A 20 81 20 4A B2 31 20 A4 20 4E 28 30 29 00 |): . J.1 . N(0).|
00000CF0: 05 15 4B 01 4D 41 54 28 30 2C 49 2C 4A 29 B2 AB |..K.MAT(0,I,J)..|
00000D00: 28 49 B2 4A 29 00 0F 15 4C 01 82 20 4A 2C 49 00 |(I.J)...L.. J,I.|
00000D10: 24 15 4D 01 8B 20 31 B1 4E 28 30 29 AB 31 20 A7 |$.M.. 1.N(0).1 .|
00000D20: 20 33 36 30 00 37 15 4E 01 81 20 4A B2 31 20 A4 | 360.7.N.. J.1 .|
00000D30: 20 4E 28 30 29 AB 31 00 51 15 4F 01 50 B2 B6 28 | N(0).1.Q.O.P..(|
00000D40: 4D 41 54 28 4D 5A 2C 4A 2C 4A 29 29 3A 20 52 B2 |MAT(MZ,J,J)): R.|
00000D50: 4A 00 64 15 50 01 81 20 49 B2 4A AA 31 20 A4 20 |J.d.P.. I.J.1 . |
00000D60: 4E 28 30 29 00 82 15 51 01 8B 20 B6 28 4D 41 54 |N(0)...Q.. .(MAT|
00000D70: 28 4D 5A 2C 49 2C 4A 29 29 B3 B2 50 20 A7 20 33 |(MZ,I,J))..P . 3|
00000D80: 33 39 00 9C 15 52 01 50 B2 B6 28 4D 41 54 28 4D |39...R.P..(MAT(M|
00000D90: 5A 2C 49 2C 4A 29 29 3A 20 52 B2 49 00 A4 15 53 |Z,I,J)): R.I...S|
00000DA0: 01 82 20 49 00 B4 15 54 01 8B 20 52 B2 4A 20 A7 |.. I...T.. R.J .|
00000DB0: 20 33 35 30 00 C5 15 55 01 81 20 4C B2 31 20 A4 | 350...U.. L.1 .|
00000DC0: 20 4E 28 30 29 00 D6 15 56 01 58 B2 4D 41 54 28 | N(0)...V.X.MAT(|
00000DD0: 30 2C 52 2C 4C 29 00 F0 15 57 01 4D 41 54 28 30 |0,R,L)...W.MAT(0|
00000DE0: 2C 52 2C 4C 29 B2 4D 41 54 28 30 2C 4A 2C 4C 29 |,R,L).MAT(0,J,L)|
00000DF0: 00 01 16 58 01 4D 41 54 28 30 2C 4A 2C 4C 29 B2 |...X.MAT(0,J,L).|
00000E00: 58 00 13 16 59 01 58 B2 4D 41 54 28 4D 5A 2C 52 |X...Y.X.MAT(MZ,R|
00000E10: 2C 4C 29 00 2F 16 5A 01 4D 41 54 28 4D 5A 2C 52 |,L)./.Z.MAT(MZ,R|
00000E20: 2C 4C 29 B2 4D 41 54 28 4D 5A 2C 4A 2C 4C 29 00 |,L).MAT(MZ,J,L).|
00000E30: 41 16 5B 01 4D 41 54 28 4D 5A 2C 4A 2C 4C 29 B2 |A.[.MAT(MZ,J,L).|
00000E40: 58 00 49 16 5C 01 82 20 4C 00 5C 16 5E 01 81 20 |X.I.\.. L.\.^.. |
00000E50: 4B B2 4A AA 31 20 A4 20 4E 28 30 29 00 7A 16 5F |K.J.1 . N(0).z._|
00000E60: 01 43 B2 4D 41 54 28 4D 5A 2C 4B 2C 4A 29 AD 4D |.C.MAT(MZ,K,J).M|
00000E70: 41 54 28 4D 5A 2C 4A 2C 4A 29 00 8D 16 60 01 81 |AT(MZ,J,J)...`..|
00000E80: 20 4C B2 4A AA 31 20 A4 20 4E 28 30 29 00 B5 16 | L.J.1 . N(0)...|
00000E90: 61 01 4D 41 54 28 4D 5A 2C 4B 2C 4C 29 B2 4D 41 |a.MAT(MZ,K,L).MA|
00000EA0: 28 4D 5A 2C 4B 2C 4C 29 AB 43 AC 4D 41 28 4D 5A |(MZ,K,L).C.MA(MZ|
00000EB0: 2C 4A 2C 4C 29 00 BD 16 62 01 82 20 4C 00 CE 16 |,J,L)...b.. L...|
00000EC0: 63 01 81 20 4C B2 31 20 A4 20 4E 28 30 29 00 F5 |c.. L.1 . N(0)..|
00000ED0: 16 64 01 4D 41 54 28 30 2C 4B 2C 4C 29 B2 4D 41 |.d.MAT(0,K,L).MA|
00000EE0: 54 28 30 2C 4B 2C 4C 29 AB 43 AC 4D 41 54 28 30 |T(0,K,L).C.MAT(0|
00000EF0: 2C 4A 2C 4C 29 00 01 17 65 01 82 20 4C 2C 4B 2C |,J,L)...e.. L,K,|
00000F00: 4A 00 21 17 68 01 81 20 49 B2 31 20 A4 20 4E 28 |J.!.h.. I.1 . N(|
00000F10: 30 29 3A 20 43 B2 4D 41 54 28 4D 5A 2C 49 2C 49 |0): C.MAT(MZ,I,I|
00000F20: 29 00 36 17 69 01 8B 20 49 AA 31 B1 4E 28 30 29 |).6.i.. I.1.N(0)|
00000F30: 20 A7 20 33 36 35 00 49 17 6A 01 81 20 4A B2 49 | . 365.I.j.. J.I|
00000F40: AA 31 20 A4 20 4E 28 30 29 00 67 17 6B 01 4D 41 |.1 . N(0).g.k.MA|
00000F50: 54 28 4D 5A 2C 49 2C 4A 29 B2 4D 41 54 28 4D 5A |T(MZ,I,J).MAT(MZ|
00000F60: 2C 49 2C 4A 29 AD 43 00 6F 17 6C 01 82 20 4A 00 |,I,J).C.o.l.. J.|
00000F70: 80 17 6D 01 81 20 4A B2 31 20 A4 20 4E 28 30 29 |..m.. J.1 . N(0)|
00000F80: 00 9C 17 6E 01 4D 41 54 28 30 2C 49 2C 4A 29 B2 |...n.MAT(0,I,J).|
00000F90: 4D 41 54 28 30 2C 49 2C 4A 29 AD 43 00 A6 17 6F |MAT(0,I,J).C...o|
00000FA0: 01 82 20 4A 2C 49 00 B9 17 72 01 8B 20 4E 28 30 |.. J,I...r.. N(0|
00000FB0: 29 B3 32 20 A7 20 33 38 30 00 CF 17 73 01 81 20 |).2 . 380...s.. |
00000FC0: 4A B2 4E 28 30 29 20 A4 20 32 20 A9 20 AB 31 00 |J.N(0) . 2 . .1.|
00000FD0: EE 17 74 01 81 20 49 B2 31 20 A4 20 4A AB 31 3A |..t.. I.1 . J.1:|
00000FE0: 20 43 B2 4D 41 54 28 4D 5A 2C 49 2C 4A 29 00 FF | C.MAT(MZ,I,J)..|
00000FF0: 17 75 01 81 20 4C B2 31 20 A4 20 4E 28 30 29 00 |.u.. L.1 . N(0).|
00001000: 26 18 76 01 4D 41 54 28 30 2C 49 2C 4C 29 B2 4D |&.v.MAT(0,I,L).M|
00001010: 41 54 28 30 2C 49 2C 4C 29 AB 43 AC 4D 41 54 28 |AT(0,I,L).C.MAT(|
00001020: 30 2C 4A 2C 4C 29 00 32 18 77 01 82 20 4C 2C 49 |0,J,L).2.w.. L,I|
00001030: 2C 4A 00 3E 18 7C 01 4D 5A B2 4D 5A AB 31 00 4D |,J.>.|.MZ.MZ.1.M|
00001040: 18 81 01 8B 20 4D 4F B2 31 20 A7 20 8E 00 69 18 |.... MO.1 . ..i.|
00001050: 86 01 99 20 22 2A 2A 2A 20 49 4E 56 45 52 53 45 |... "*** INVERSE|
00001060: 20 4D 41 54 52 49 58 3A 22 00 88 18 87 01 5A 5A | MATRIX:".....ZZ|
00001070: B2 4D 5A 3A 20 4D 5A B2 30 3A 20 8D 20 32 31 31 |.MZ: MZ.0: . 211|
00001080: 31 3A 20 4D 5A B2 5A 5A 00 96 18 8B 01 8D 20 38 |1: MZ.ZZ...... 8|
00001090: 32 30 30 3A 20 8E 00 B6 18 90 01 8F 20 44 45 54 |200: ....... DET|
000010A0: 45 52 4D 49 4E 41 4E 54 45 20 45 49 4E 45 52 20 |ERMINANTE EINER |
000010B0: 4D 41 54 52 49 58 00 D6 18 9A 01 99 20 22 24 24 |MATRIX...... "$$|
000010C0: 24 20 4F 52 44 4E 55 4E 47 20 44 45 52 20 4D 41 |$ ORDNUNG DER MA|
000010D0: 54 52 49 58 22 3B 00 EC 18 9B 01 85 20 4E 28 30 |TRIX";...... N(0|
000010E0: 29 3A 20 4D 28 30 29 B2 4E 28 30 29 00 07 19 9F |): M(0).N(0)....|
000010F0: 01 8D 20 38 31 30 30 3A 20 91 20 4A 4E 20 89 20 |.. 8100: . JN . |
00001100: 34 31 30 2C 34 32 30 00 26 19 A4 01 5A 5A B2 4D |410,420.&...ZZ.M|
00001110: 5A 3A 20 4D 5A B2 30 3A 20 8D 20 31 31 32 30 3A |Z: MZ.0: . 1120:|
00001120: 20 4D 5A B2 5A 5A 00 30 19 AE 01 8D 20 39 30 30 | MZ.ZZ.0.... 900|
00001130: 00 4B 19 B8 01 53 4B 41 28 30 29 B2 28 AB 31 29 |.K...SKA(0).(.1)|
00001140: AE 4D 41 54 28 30 2C 30 2C 30 29 00 5C 19 C2 01 |.MAT(0,0,0).\...|
00001150: 81 20 49 B2 31 20 A4 20 4E 28 30 29 00 79 19 C3 |. I.1 . N(0).y..|
00001160: 01 53 4B 41 28 30 29 B2 53 4B 41 28 30 29 AC 4D |.SKA(0).SKA(0).M|
00001170: 41 54 28 30 2C 49 2C 49 29 00 81 19 C4 01 82 20 |AT(0,I,I)...... |
00001180: 49 00 90 19 CC 01 8B 20 4D 4F B2 31 20 A7 20 8E |I...... MO.1 . .|
00001190: 00 B2 19 D6 01 99 20 22 23 23 23 20 44 45 54 45 |...... "### DETE|
000011A0: 52 4D 49 4E 41 4E 54 45 20 3D 20 22 53 4B 41 28 |RMINANTE = "SKA(|
000011B0: 30 29 00 C0 19 E0 01 8D 20 38 32 30 30 3A 20 8E |0)...... 8200: .|
000011C0: 00 D8 19 F4 01 8F 20 52 41 4E 47 20 45 49 4E 45 |...... RANG EINE|
000011D0: 52 20 4D 41 54 52 49 58 00 F7 19 FE 01 5A 5A B2 |R MATRIX.....ZZ.|
000011E0: 4D 5A 3A 20 4D 5A B2 30 3A 20 8D 20 31 31 31 30 |MZ: MZ.0: . 1110|
000011F0: 3A 20 4D 5A B2 5A 5A 00 01 1A 08 02 8D 20 39 30 |: MZ.ZZ...... 90|
00001200: 30 00 10 1A 12 02 81 20 49 B2 31 20 A4 20 4E 4D |0...... I.1 . NM|
00001210: 00 29 1A 13 02 8B 20 4D 41 54 28 30 2C 49 2C 49 |.).... MAT(0,I,I|
00001220: 29 B2 30 20 A7 20 35 33 35 00 31 1A 14 02 82 20 |).0 . 535.1.... |
00001230: 49 00 40 1A 17 02 53 4B 41 28 30 29 B2 49 AB 31 |I.@...SKA(0).I.1|
00001240: 00 4F 1A 1C 02 8B 20 4D 4F B3 35 20 A7 20 8E 00 |.O.... MO.5 . ..|
00001250: 68 1A 26 02 99 20 22 23 23 23 20 52 41 4E 47 20 |h.&.. "### RANG |
00001260: 3D 22 53 4B 41 28 30 29 00 76 1A 30 02 8D 20 38 |="SKA(0).v.0.. 8|
00001270: 32 30 30 3A 20 8E 00 9A 1A 58 02 8F 20 53 4B 41 |200: ....X.. SKA|
00001280: 4C 41 52 50 52 4F 44 55 4B 54 20 5A 57 45 49 45 |LARPRODUKT ZWEIE|
00001290: 52 20 56 45 4B 54 4F 52 45 4E 00 B4 1A 59 02 8B |R VEKTOREN...Y..|
000012A0: 20 56 5A AA 31 B1 48 20 A7 20 99 20 46 24 28 33 | VZ.1.H . . F$(3|
000012B0: 29 3A 20 8E 00 CD 1A 62 02 99 20 22 24 24 24 20 |): ....b.. "$$$ |
000012C0: 41 4E 5A 41 48 4C 20 44 45 52 20 22 3B 00 E6 1A |ANZAHL DER ";...|
000012D0: 63 02 85 20 22 4B 4F 4D 50 4F 4E 45 4E 54 45 4E |c.. "KOMPONENTEN|
000012E0: 22 3B 4C 28 30 29 00 01 1B 67 02 8D 20 38 31 30 |";L(0)...g.. 810|
000012F0: 30 3A 20 91 20 4A 4E 20 89 20 36 31 30 2C 36 32 |0: . JN . 610,62|
00001300: 30 00 24 1B 6C 02 99 20 22 2A 2A 2A 20 45 49 4E |0.$.l.. "*** EIN|
00001310: 47 41 42 45 20 44 45 53 20 31 2E 56 45 4B 54 4F |GABE DES 1.VEKTO|
00001320: 52 53 3A 22 00 42 1B 6D 02 5A 5A B2 30 3A 20 56 |RS:".B.m.ZZ.0: V|
00001330: 5A B2 30 3A 20 8D 20 31 32 33 31 3A 20 56 5A B2 |Z.0: . 1231: VZ.|
00001340: 5A 5A 00 65 1B 71 02 99 20 22 2A 2A 2A 20 45 49 |ZZ.e.q.. "*** EI|
00001350: 4E 47 41 42 45 20 44 45 53 20 32 2E 56 45 4B 54 |NGABE DES 2.VEKT|
00001360: 4F 52 53 3A 22 00 85 1B 72 02 56 5A B2 56 5A AA |ORS:"...r.VZ.VZ.|
00001370: 31 3A 20 4C 28 56 5A 29 B2 4C 28 30 29 3A 20 8D |1: L(VZ).L(0): .|
00001380: 20 31 32 33 31 00 92 1B 76 02 53 4B 41 28 30 29 | 1231...v.SKA(0)|
00001390: B2 30 00 A3 1B 77 02 81 20 4B B2 31 20 A4 20 4C |.0...w.. K.1 . L|
000013A0: 28 30 29 00 C8 1B 78 02 53 4B 41 28 30 29 B2 53 |(0)...x.SKA(0).S|
000013B0: 4B 41 28 30 29 AA 56 45 4B 28 30 2C 4B 29 AC 56 |KA(0).VEK(0,K).V|
000013C0: 45 4B 28 56 5A 2C 4B 29 00 D9 1B 79 02 82 20 4B |EK(VZ,K)...y.. K|
000013D0: 3A 20 56 5A B2 56 5A AB 31 00 E8 1B 80 02 8B 20 |: VZ.VZ.1...... |
000013E0: 4D 4F B2 31 20 A7 20 8E 00 0B 1C 8A 02 99 20 22 |MO.1 . ....... "|
000013F0: 23 23 23 20 53 4B 41 4C 41 52 50 52 4F 44 55 4B |### SKALARPRODUK|
00001400: 54 20 3D 20 22 53 4B 41 28 30 29 00 19 1C 94 02 |T = "SKA(0).....|
00001410: 8D 20 38 32 30 30 3A 20 8E 00 32 1C BC 02 8F 20 |. 8200: ..2.... |
00001420: 4E 4F 52 4D 20 45 49 4E 45 53 20 56 45 4B 54 4F |NORM EINES VEKTO|
00001430: 52 53 00 4B 1C C6 02 99 20 22 24 24 24 20 41 4E |RS.K.... "$$$ AN|
00001440: 5A 41 48 4C 20 44 45 52 20 22 3B 00 64 1C C7 02 |ZAHL DER ";.d...|
00001450: 85 20 22 4B 4F 4D 50 4F 4E 45 4E 54 45 4E 22 3B |. "KOMPONENTEN";|
00001460: 4C 28 30 29 00 7F 1C CB 02 8D 20 38 31 30 30 3A |L(0)...... 8100:|
00001470: 20 91 20 4A 4E 20 89 20 37 31 30 2C 37 32 30 00 | . JN . 710,720.|
00001480: 9E 1C D0 02 5A 5A B2 56 5A 3A 20 56 5A B2 30 3A |....ZZ.VZ: VZ.0:|
00001490: 20 8D 20 31 32 33 31 3A 20 56 5A B2 5A 5A 00 AB | . 1231: VZ.ZZ..|
000014A0: 1C DA 02 53 4B 41 28 30 29 B2 30 00 BC 1C DB 02 |...SKA(0).0.....|
000014B0: 81 20 4B B2 31 20 A4 20 4C 28 30 29 00 E0 1C DC |. K.1 . L(0)....|
000014C0: 02 53 4B 41 28 30 29 B2 53 4B 41 28 30 29 AA 56 |.SKA(0).SKA(0).V|
000014D0: 45 4B 28 30 2C 4B 29 AC 56 45 4B 28 30 2C 4B 29 |EK(0,K).VEK(0,K)|
000014E0: 00 E8 1C DD 02 82 20 4B 00 FD 1C DE 02 53 4B 41 |...... K.....SKA|
000014F0: 28 30 29 B2 BA 28 53 4B 41 28 30 29 29 00 0C 1D |(0)..(SKA(0))...|
00001500: E4 02 8B 20 4D 4F B2 31 20 A7 20 8E 00 26 1D EE |... MO.1 . ..&..|
00001510: 02 99 20 22 23 23 23 20 4E 4F 52 4D 20 3D 20 22 |.. "### NORM = "|
00001520: 53 4B 41 28 30 29 00 34 1D F8 02 8D 20 38 32 30 |SKA(0).4.... 820|
00001530: 30 3A 20 8E 00 56 1D 84 03 8F 20 47 41 55 53 53 |0: ..V.... GAUSS|
00001540: 2D 45 4C 49 4D 49 4E 41 54 49 4F 4E 20 4D 49 54 |-ELIMINATION MIT|
00001550: 20 50 49 56 4F 54 00 78 1D 8E 03 81 20 4A B2 30 | PIVOT.x.... J.0|
00001560: 20 A4 20 4D 28 30 29 3A 20 4D 41 54 28 30 2C 30 | . M(0): MAT(0,0|
00001570: 2C 4A 29 B2 4A 3A 20 82 00 99 1D 93 03 4E 4D B2 |,J).J: ......NM.|
00001580: 4E 28 30 29 3A 20 8B 20 4D 28 30 29 B3 4E 4D 20 |N(0): . M(0).NM |
00001590: A7 20 4E 4D B2 4D 28 30 29 00 A8 1D 98 03 81 20 |. NM.M(0)...... |
000015A0: 4A B2 31 20 A4 20 4E 4D 00 C6 1D 99 03 50 B2 B6 |J.1 . NM.....P..|
000015B0: 28 4D 41 54 28 30 2C 4A 2C 4A 29 29 3A 20 52 B2 |(MAT(0,J,J)): R.|
000015C0: 4A 3A 20 53 B2 4A 00 D9 1D 9A 03 8B 20 4A AA 31 |J: S.J...... J.1|
000015D0: B1 4E 4D 20 A7 20 39 33 30 00 EC 1D 9B 03 81 20 |.NM . 930...... |
000015E0: 49 B2 4A AA 31 20 A4 20 4E 28 30 29 00 09 1E 9C |I.J.1 . N(0)....|
000015F0: 03 8B 20 B6 28 4D 41 54 28 30 2C 49 2C 4A 29 29 |.. .(MAT(0,I,J))|
00001600: B3 B2 50 20 A7 20 39 32 36 00 22 1E 9D 03 50 B2 |..P . 926."...P.|
00001610: B6 28 4D 41 54 28 30 2C 49 2C 4A 29 29 3A 20 52 |.(MAT(0,I,J)): R|
00001620: B2 49 00 2A 1E 9E 03 82 20 49 00 3D 1E A2 03 8B |.I.*.... I.=....|
00001630: 20 50 B1 31 45 AB 35 20 A7 20 39 37 30 00 4E 1E | P.1E.5 . 970.N.|
00001640: AC 03 81 20 4B B2 4A 20 A4 20 4E 28 30 29 00 63 |... K.J . N(0).c|
00001650: 1E AD 03 8B 20 4A AA 31 B1 4D 28 30 29 20 A7 20 |.... J.1.M(0) . |
00001660: 39 34 36 00 76 1E AE 03 81 20 4C B2 4A AA 31 20 |946.v.... L.J.1 |
00001670: A4 20 4D 28 30 29 00 93 1E AF 03 8B 20 B6 28 4D |. M(0)...... .(M|
00001680: 41 54 28 30 2C 4B 2C 4C 29 29 B3 B2 50 20 A7 20 |AT(0,K,L))..P . |
00001690: 39 34 35 00 B1 1E B0 03 50 B2 B6 28 4D 41 54 28 |945.....P..(MAT(|
000016A0: 30 2C 4B 2C 4C 29 29 3A 20 52 B2 4B 3A 20 53 B2 |0,K,L)): R.K: S.|
000016B0: 4C 00 B9 1E B1 03 82 20 4C 00 D6 1E B2 03 8B 20 |L...... L...... |
000016C0: B6 28 4D 41 54 28 30 2C 4B 2C 30 29 29 B3 B2 50 |.(MAT(0,K,0))..P|
000016D0: 20 A7 20 39 34 38 00 F4 1E B3 03 50 B2 B6 28 4D | . 948.....P..(M|
000016E0: 41 54 28 30 2C 4B 2C 30 29 29 3A 20 52 B2 4B 3A |AT(0,K,0)): R.K:|
000016F0: 20 53 B2 30 00 FC 1E B4 03 82 20 4B 00 0F 1F B6 | S.0...... K....|
00001700: 03 8B 20 50 B1 31 45 AB 35 20 A7 20 39 36 30 00 |.. P.1E.5 . 960.|
00001710: 27 1F BB 03 4D 41 54 28 30 2C 4A 2C 4A 29 B2 30 |'...MAT(0,J,J).0|
00001720: 3A 20 89 20 39 39 30 00 38 1F C0 03 81 20 4B B2 |: . 990.8.... K.|
00001730: 30 20 A4 20 4E 28 30 29 00 49 1F C1 03 58 B2 4D |0 . N(0).I...X.M|
00001740: 41 54 28 30 2C 4B 2C 53 29 00 63 1F C2 03 4D 41 |AT(0,K,S).c...MA|
00001750: 54 28 30 2C 4B 2C 53 29 B2 4D 41 54 28 30 2C 4B |T(0,K,S).MAT(0,K|
00001760: 2C 4A 29 00 74 1F C3 03 4D 41 54 28 30 2C 4B 2C |,J).t...MAT(0,K,|
00001770: 4A 29 B2 58 00 7C 1F C4 03 82 20 4B 00 98 1F C5 |J).X.|.... K....|
00001780: 03 4D 41 54 28 30 2C 30 2C 30 29 B2 4D 41 54 28 |.MAT(0,0,0).MAT(|
00001790: 30 2C 30 2C 30 29 AA 31 00 A8 1F CA 03 8B 20 52 |0,0,0).1...... R|
000017A0: B2 4A 20 A7 20 39 38 30 00 B9 1F CB 03 81 20 4C |.J . 980...... L|
000017B0: B2 30 20 A4 20 4D 28 30 29 00 CA 1F CC 03 58 B2 |.0 . M(0).....X.|
000017C0: 4D 41 54 28 30 2C 52 2C 4C 29 00 E4 1F CD 03 4D |MAT(0,R,L).....M|
000017D0: 41 54 28 30 2C 52 2C 4C 29 B2 4D 41 54 28 30 2C |AT(0,R,L).MAT(0,|
000017E0: 4A 2C 4C 29 00 F5 1F CE 03 4D 41 54 28 30 2C 4A |J,L).....MAT(0,J|
000017F0: 2C 4C 29 B2 58 00 FD 1F CF 03 82 20 4C 00 19 20 |,L).X...... L.. |
00001800: D0 03 4D 41 54 28 30 2C 30 2C 30 29 B2 4D 41 54 |..MAT(0,0,0).MAT|
00001810: 28 30 2C 30 2C 30 29 AA 31 00 2E 20 D4 03 8B 20 |(0,0,0).1.. ... |
00001820: 4A AA 31 B1 4E 28 30 29 20 A7 20 39 38 39 00 41 |J.1.N(0) . 989.A|
00001830: 20 D5 03 81 20 4B B2 4A AA 31 20 A4 20 4E 28 30 | ... K.J.1 . N(0|
00001840: 29 00 5D 20 D6 03 43 B2 4D 41 54 28 30 2C 4B 2C |).] ..C.MAT(0,K,|
00001850: 4A 29 AD 4D 41 54 28 30 2C 4A 2C 4A 29 00 72 20 |J).MAT(0,J,J).r |
00001860: D7 03 8B 20 4A AA 31 B1 4D 28 30 29 20 A7 20 39 |... J.1.M(0) . 9|
00001870: 38 37 00 85 20 D8 03 81 20 4C B2 4A AA 31 20 A4 |87.. ... L.J.1 .|
00001880: 20 4D 28 30 29 00 AC 20 D9 03 4D 41 54 28 30 2C | M(0).. ..MAT(0,|
00001890: 4B 2C 4C 29 B2 4D 41 54 28 30 2C 4B 2C 4C 29 AB |K,L).MAT(0,K,L).|
000018A0: 43 AC 4D 41 54 28 30 2C 4A 2C 4C 29 00 B4 20 DA |C.MAT(0,J,L).. .|
000018B0: 03 82 20 4C 00 DB 20 DB 03 4D 41 54 28 30 2C 4B |.. L.. ..MAT(0,K|
000018C0: 2C 30 29 B2 4D 41 54 28 30 2C 4B 2C 30 29 AB 43 |,0).MAT(0,K,0).C|
000018D0: AC 4D 41 54 28 30 2C 4A 2C 30 29 00 E3 20 DC 03 |.MAT(0,J,0).. ..|
000018E0: 82 20 4B 00 EB 20 DD 03 82 20 4A 00 F1 20 DE 03 |. K.. ... J.. ..|
000018F0: 8E 00 FF 20 E8 03 8F 20 45 49 4E 47 41 42 45 00 |... ... EINGABE.|
00001900: 15 21 4C 04 8F 20 4D 41 54 52 49 58 20 45 49 4E |.!L.. MATRIX EIN|
00001910: 47 45 42 45 4E 00 2F 21 4D 04 8B 20 4D 5A AA 31 |GEBEN./!M.. MZ.1|
00001920: B1 48 20 A7 20 99 20 46 24 28 33 29 3A 20 8E 00 |.H . . F$(3): ..|
00001930: 3B 21 51 04 4D 5A B2 4D 5A AA 31 00 5B 21 56 04 |;!Q.MZ.MZ.1.[!V.|
00001940: 99 20 22 2A 2A 2A 20 47 52 4F 45 53 53 45 20 44 |. "*** GROESSE D|
00001950: 45 52 20 4D 41 54 52 49 58 3A 22 00 7A 21 57 04 |ER MATRIX:".z!W.|
00001960: 99 20 22 24 24 24 20 41 4E 5A 41 48 4C 20 44 45 |. "$$$ ANZAHL DE|
00001970: 52 20 5A 45 49 4C 45 4E 22 3B 00 86 21 58 04 85 |R ZEILEN";..!X..|
00001980: 20 4E 28 4D 5A 29 00 A6 21 59 04 99 20 22 24 24 | N(MZ)..!Y.. "$$|
00001990: 24 20 41 4E 5A 41 48 4C 20 44 45 52 20 53 50 41 |$ ANZAHL DER SPA|
000019A0: 4C 54 45 4E 22 3B 00 B2 21 5A 04 85 20 4D 28 4D |LTEN";..!Z.. M(M|
000019B0: 5A 29 00 CF 21 5B 04 8D 20 38 31 30 30 3A 20 91 |Z)..![.. 8100: .|
000019C0: 20 4A 4E 20 89 20 31 31 31 30 2C 31 31 32 30 00 | JN . 1110,1120.|
000019D0: F0 21 60 04 99 20 22 2A 2A 2A 20 5A 45 49 4C 45 |.!`.. "*** ZEILE|
000019E0: 4E 57 45 49 53 45 20 45 49 4E 47 41 42 45 3A 22 |NWEISE EINGABE:"|
000019F0: 00 11 22 61 04 81 20 49 B2 31 20 A4 20 4E 28 4D |.."a.. I.1 . N(M|
00001A00: 5A 29 3A 20 81 20 4A B2 31 20 A4 20 4D 28 4D 5A |Z): . J.1 . M(MZ|
00001A10: 29 00 2F 22 62 04 99 20 22 25 25 25 20 4D 41 54 |)./"b.. "%%% MAT|
00001A20: 20 28 22 49 22 2C 22 4A 22 29 20 3D 20 22 3B 00 | ("I","J") = ";.|
00001A30: 41 22 63 04 85 20 4D 41 54 28 4D 5A 2C 49 2C 4A |A"c.. MAT(MZ,I,J|
00001A40: 29 00 4B 22 64 04 82 20 4A 2C 49 00 68 22 6A 04 |).K"d.. J,I.h"j.|
00001A50: 8D 20 38 31 30 30 3A 20 91 20 4A 4E 20 89 20 31 |. 8100: . JN . 1|
00001A60: 31 34 30 2C 31 31 35 30 00 85 22 74 04 99 20 22 |140,1150.."t.. "|
00001A70: 2A 2A 2A 20 45 4C 45 4D 45 4E 54 20 41 4E 47 45 |*** ELEMENT ANGE|
00001A80: 42 45 4E 3A 22 00 A2 22 75 04 85 20 22 24 24 24 |BEN:".."u.. "$$$|
00001A90: 20 5A 45 49 4C 45 2C 53 50 41 4C 54 45 22 3B 49 | ZEILE,SPALTE";I|
00001AA0: 2C 4A 00 C0 22 76 04 99 20 22 25 25 25 20 4D 41 |,J.."v.. "%%% MA|
00001AB0: 54 20 28 22 49 22 2C 22 4A 22 29 20 3D 20 22 3B |T ("I","J") = ";|
00001AC0: 00 D2 22 77 04 85 20 4D 41 54 28 4D 5A 2C 49 2C |.."w.. MAT(MZ,I,|
00001AD0: 4A 29 00 DD 22 78 04 89 20 31 31 33 30 00 E3 22 |J).."x.. 1130.."|
00001AE0: 7E 04 8E 00 F9 22 B0 04 8F 20 56 45 4B 54 4F 52 |~...."... VEKTOR|
00001AF0: 20 45 49 4E 47 45 42 45 4E 00 13 23 B1 04 8B 20 | EINGEBEN..#... |
00001B00: 56 5A AA 31 B1 48 20 A7 20 99 20 46 24 28 33 29 |VZ.1.H . . F$(3)|
00001B10: 3A 20 8E 00 1F 23 B5 04 56 5A B2 56 5A AA 31 00 |: ...#..VZ.VZ.1.|
00001B20: 40 23 BA 04 99 20 22 26 26 26 20 5A 45 49 4C 45 |@#... "&&& ZEILE|
00001B30: 20 4F 44 45 52 20 53 50 41 4C 54 45 3F 20 22 3B | ODER SPALTE? ";|
00001B40: 00 5A 23 BB 04 A1 20 45 24 3A 20 8B 20 45 24 B2 |.Z#... E$: . E$.|
00001B50: 22 2A 22 20 A7 20 31 32 31 39 00 6E 23 BC 04 8B |"*" . 1219.n#...|
00001B60: 20 45 24 B2 22 5A 22 20 A7 20 31 32 31 35 00 82 | E$."Z" . 1215..|
00001B70: 23 BD 04 8B 20 45 24 B2 22 53 22 20 A7 20 31 32 |#... E$."S" . 12|
00001B80: 31 37 00 8D 23 BE 04 89 20 31 32 31 31 00 A9 23 |17..#... 1211..#|
00001B90: BF 04 99 20 22 5A 45 49 4C 45 22 3A 20 56 45 4B |... "ZEILE": VEK|
00001BA0: 28 56 5A 2C 30 29 B2 AB 31 00 B4 23 C0 04 89 20 |(VZ,0)..1..#... |
00001BB0: 31 32 32 30 00 D1 23 C1 04 99 20 22 53 50 41 4C |1220..#... "SPAL|
00001BC0: 54 45 22 3A 20 56 45 4B 28 56 5A 2C 30 29 B2 AA |TE": VEK(VZ,0)..|
00001BD0: 31 00 DC 23 C2 04 89 20 31 32 32 30 00 F2 23 C3 |1..#... 1220..#.|
00001BE0: 04 99 20 45 24 3A 20 56 45 4B 28 56 5A 2C 30 29 |.. E$: VEK(VZ,0)|
00001BF0: B2 30 00 0B 24 C4 04 99 20 22 24 24 24 20 41 4E |.0..$... "$$$ AN|
00001C00: 5A 41 48 4C 20 44 45 52 20 22 3B 00 25 24 C5 04 |ZAHL DER ";.%$..|
00001C10: 85 20 22 4B 4F 4D 50 4F 4E 45 4E 54 45 4E 22 3B |. "KOMPONENTEN";|
00001C20: 4C 28 56 5A 29 00 42 24 C9 04 8D 20 38 31 30 30 |L(VZ).B$... 8100|
00001C30: 3A 20 91 20 4A 4E 20 89 20 31 32 31 30 2C 31 32 |: . JN . 1210,12|
00001C40: 33 30 00 63 24 CE 04 99 20 22 2A 2A 2A 20 45 49 |30.c$... "*** EI|
00001C50: 4E 47 41 42 45 20 44 45 53 20 56 45 4B 54 4F 52 |NGABE DES VEKTOR|
00001C60: 53 3A 22 00 75 24 CF 04 81 20 4B B2 31 20 A4 20 |S:".u$... K.1 . |
00001C70: 4C 28 56 5A 29 00 8F 24 D0 04 99 20 22 25 25 25 |L(VZ)..$... "%%%|
00001C80: 20 56 45 4B 20 28 22 4B 22 29 20 3D 20 22 3B 00 | VEK ("K") = ";.|
00001C90: 9F 24 D1 04 85 20 56 45 4B 28 56 5A 2C 4B 29 00 |.$... VEK(VZ,K).|
00001CA0: A7 24 D2 04 82 20 4B 00 C4 24 D8 04 8D 20 38 31 |.$... K..$... 81|
00001CB0: 30 30 3A 20 91 20 4A 4E 20 89 20 31 32 35 30 2C |00: . JN . 1250,|
00001CC0: 31 32 36 30 00 E4 24 E2 04 85 20 22 24 24 24 20 |1260..$... "$$$ |
00001CD0: 57 45 4C 43 48 45 20 4B 4F 4D 50 4F 4E 45 4E 54 |WELCHE KOMPONENT|
00001CE0: 45 22 3B 4B 00 FE 24 E3 04 99 20 22 25 25 25 20 |E";K..$... "%%% |
00001CF0: 56 45 4B 20 28 22 4B 22 29 20 3D 20 22 3B 00 0E |VEK ("K") = ";..|
00001D00: 25 E4 04 85 20 56 45 4B 28 56 5A 2C 4B 29 00 19 |%... VEK(VZ,K)..|
00001D10: 25 E5 04 89 20 31 32 34 30 00 1F 25 EC 04 8E 00 |%... 1240..%....|
00001D20: 35 25 14 05 8F 20 53 4B 41 4C 41 52 20 45 49 4E |5%... SKALAR EIN|
00001D30: 47 45 42 45 4E 00 4F 25 15 05 8B 20 53 5A AA 31 |GEBEN.O%... SZ.1|
00001D40: B1 48 20 A7 20 99 20 46 24 28 33 29 3A 20 8E 00 |.H . . F$(3): ..|
00001D50: 5B 25 19 05 53 5A B2 53 5A AA 31 00 7C 25 1E 05 |[%..SZ.SZ.1.|%..|
00001D60: 99 20 22 2A 2A 2A 20 45 49 4E 47 41 42 45 20 44 |. "*** EINGABE D|
00001D70: 45 53 20 53 4B 41 4C 41 52 53 3A 22 00 97 25 1F |ES SKALARS:"..%.|
00001D80: 05 85 20 22 25 25 25 20 53 4B 41 20 3D 20 22 3B |.. "%%% SKA = ";|
00001D90: 53 4B 41 28 53 5A 29 00 B4 25 28 05 8D 20 38 31 |SKA(SZ)..%(.. 81|
00001DA0: 30 30 3A 20 91 20 4A 4E 20 89 20 31 33 31 31 2C |00: . JN . 1311,|
00001DB0: 31 33 33 30 00 BA 25 32 05 8E 00 C8 25 D0 07 8F |1330..%2....%...|
00001DC0: 20 41 55 53 47 41 42 45 00 DE 25 34 08 8F 20 4D | AUSGABE..%4.. M|
00001DD0: 41 54 52 49 58 20 41 55 53 47 45 42 45 4E 00 F6 |ATRIX AUSGEBEN..|
00001DE0: 25 35 08 8B 20 4D 5A B3 31 20 A7 20 99 20 46 24 |%5.. MZ.1 . . F$|
00001DF0: 28 34 29 3A 20 8E 00 0C 26 3E 08 99 20 22 2A 2A |(4): ...&>.. "**|
00001E00: 2A 20 45 52 47 45 42 4E 49 53 3A 22 00 1E 26 3F |* ERGEBNIS:"..&?|
00001E10: 08 81 20 49 B2 31 20 A4 20 4E 28 4D 5A 29 00 30 |.. I.1 . N(MZ).0|
00001E20: 26 40 08 81 20 4A B2 31 20 A4 20 4D 28 4D 5A 29 |&@.. J.1 . M(MZ)|
00001E30: 00 4E 26 41 08 99 20 22 23 23 23 20 4D 41 54 20 |.N&A.. "### MAT |
00001E40: 28 22 49 22 2C 22 4A 22 29 20 3D 20 22 3B 00 60 |("I","J") = ";.`|
00001E50: 26 42 08 99 20 4D 41 54 28 4D 5A 2C 49 2C 4A 29 |&B.. MAT(MZ,I,J)|
00001E60: 00 68 26 43 08 82 20 4A 00 7D 26 44 08 8B 20 49 |.h&C.. J.}&D.. I|
00001E70: B2 4E 28 4D 5A 29 20 A7 20 32 31 31 38 00 88 26 |.N(MZ) . 2118..&|
00001E80: 45 08 8D 20 38 33 30 30 00 90 26 46 08 82 20 49 |E.. 8300..&F.. I|
00001E90: 00 96 26 48 08 8E 00 AC 26 98 08 8F 20 56 45 4B |..&H....&... VEK|
00001EA0: 54 4F 52 20 41 55 53 47 45 42 45 4E 00 C4 26 99 |TOR AUSGEBEN..&.|
00001EB0: 08 8B 20 56 5A B3 31 20 A7 20 99 20 46 24 28 34 |.. VZ.1 . . F$(4|
00001EC0: 29 3A 20 8E 00 DB 26 A2 08 99 20 22 2A 2A 2A 20 |): ...&... "*** |
00001ED0: 45 52 47 45 42 4E 49 53 20 22 3B 00 FE 26 A3 08 |ERGEBNIS ";..&..|
00001EE0: 91 20 56 45 4B 28 56 5A 2C 30 29 AA 32 20 89 20 |. VEK(VZ,0).2 . |
00001EF0: 32 32 31 32 2C 32 32 31 33 2C 32 32 31 34 00 17 |2212,2213,2214..|
00001F00: 27 A4 08 99 20 22 28 5A 45 49 4C 45 29 3A 22 3A |'... "(ZEILE):":|
00001F10: 20 89 20 32 32 31 35 00 2C 27 A5 08 99 20 22 28 | . 2215.,'... "(|
00001F20: 2A 29 3A 22 3A 20 89 20 32 32 31 35 00 3E 27 A6 |*):": . 2215.>'.|
00001F30: 08 99 20 22 28 53 50 41 4C 54 45 29 3A 22 00 50 |.. "(SPALTE):".P|
00001F40: 27 A7 08 81 20 4B B2 31 20 A4 20 4C 28 56 5A 29 |'... K.1 . L(VZ)|
00001F50: 00 72 27 A8 08 99 20 22 23 23 23 20 56 45 4B 20 |.r'... "### VEK |
00001F60: 28 22 4B 22 29 20 3D 20 22 56 45 4B 28 56 5A 2C |("K") = "VEK(VZ,|
00001F70: 4B 29 00 7A 27 A9 08 82 20 4B 00 80 27 AC 08 8E |K).z'... K..'...|
00001F80: 00 96 27 FC 08 8F 20 53 4B 41 4C 41 52 20 41 55 |..'... SKALAR AU|
00001F90: 53 47 45 42 45 4E 00 AE 27 FD 08 8B 20 53 5A B3 |SGEBEN..'... SZ.|
00001FA0: 31 20 A7 20 99 20 46 24 28 34 29 3A 20 8E 00 C4 |1 . . F$(4): ...|
00001FB0: 27 06 09 99 20 22 2A 2A 2A 20 45 52 47 45 42 4E |'... "*** ERGEBN|
00001FC0: 49 53 3A 22 00 DE 27 07 09 99 20 22 23 23 23 20 |IS:"..'... "### |
00001FD0: 53 4B 41 20 3D 20 22 53 4B 41 28 53 5A 29 00 E4 |SKA = "SKA(SZ)..|
00001FE0: 27 10 09 8E 00 FB 27 B8 0B 8F 20 4D 55 4C 54 49 |'.....'... MULTI|
00001FF0: 50 4C 49 4B 41 54 49 4F 4E 45 4E 00 11 28 1C 0C |PLIKATIONEN..(..|
00002000: 8F 20 4D 41 54 52 49 58 20 2A 20 4D 41 54 52 49 |. MATRIX * MATRI|
00002010: 58 00 29 28 1D 0C 8B 20 4D 5A B3 32 20 A7 20 99 |X.)(... MZ.2 . .|
00002020: 20 46 24 28 34 29 3A 20 8E 00 44 28 26 0C 8B 20 | F$(4): ..D(&.. |
00002030: 4E 28 4D 5A 29 B2 4D 28 4D 5A AB 31 29 20 A7 20 |N(MZ).M(MZ.1) . |
00002040: 33 31 32 30 00 53 28 2B 0C 99 20 46 24 28 35 29 |3120.S(+.. F$(5)|
00002050: 3A 20 8E 00 67 28 30 0C 81 20 49 B2 31 20 A4 20 |: ..g(0.. I.1 . |
00002060: 4E 28 4D 5A AB 31 29 00 87 28 31 0C 81 20 4A B2 |N(MZ.1)..(1.. J.|
00002070: 31 20 A4 20 4D 28 4D 5A 29 3A 20 4D 41 54 28 30 |1 . M(MZ): MAT(0|
00002080: 2C 49 2C 4A 29 B2 30 00 99 28 32 0C 81 20 4B B2 |,I,J).0..(2.. K.|
00002090: 31 20 A4 20 4E 28 4D 5A 29 00 B9 28 33 0C 58 B2 |1 . N(MZ)..(3.X.|
000020A0: 4D 41 54 28 4D 5A AB 31 2C 49 2C 4B 29 AC 4D 41 |MAT(MZ.1,I,K).MA|
000020B0: 54 28 4D 5A 2C 4B 2C 4A 29 00 D5 28 34 0C 4D 41 |T(MZ,K,J)..(4.MA|
000020C0: 54 28 30 2C 49 2C 4A 29 B2 4D 41 54 28 30 2C 49 |T(0,I,J).MAT(0,I|
000020D0: 2C 4A 29 AA 58 00 E1 28 35 0C 82 20 4B 2C 4A 2C |,J).X..(5.. K,J,|
000020E0: 49 00 FE 28 3A 0C 4E 28 30 29 B2 4E 28 4D 5A AB |I..(:.N(0).N(MZ.|
000020F0: 31 29 3A 20 4D 28 30 29 B2 4D 28 4D 5A 29 00 12 |1): M(0).M(MZ)..|
00002100: 29 44 0C 4D 5A B2 4D 5A AB 32 3A 20 8D 20 36 31 |)D.MZ.MZ.2: . 61|
00002110: 30 30 00 21 29 4E 0C 8B 20 4F B2 32 36 20 A7 20 |00.!)N.. O.26 . |
00002120: 8E 00 2F 29 58 0C 8D 20 32 31 30 30 3A 20 8E 00 |../)X.. 2100: ..|
00002130: 45 29 80 0C 8F 20 4D 41 54 52 49 58 20 2A 20 56 |E)... MATRIX * V|
00002140: 45 4B 54 4F 52 00 5D 29 81 0C 8B 20 4D 5A B3 31 |EKTOR.])... MZ.1|
00002150: 20 A7 20 99 20 46 24 28 34 29 3A 20 8E 00 75 29 | . . F$(4): ..u)|
00002160: 82 0C 8B 20 56 5A B3 31 20 A7 20 99 20 46 24 28 |... VZ.1 . . F$(|
00002170: 34 29 3A 20 8E 00 8F 29 8A 0C 8B 20 56 45 4B 28 |4): ...)... VEK(|
00002180: 56 5A 2C 30 29 B2 AA 31 20 A7 20 33 32 32 30 00 |VZ,0)..1 . 3220.|
00002190: 9E 29 8F 0C 99 20 46 24 28 36 29 3A 20 8E 00 B7 |.)... F$(6): ...|
000021A0: 29 94 0C 8B 20 4D 28 4D 5A 29 B2 4C 28 56 5A 29 |)... M(MZ).L(VZ)|
000021B0: 20 A7 20 33 32 33 30 00 C6 29 99 0C 99 20 46 24 | . 3230..)... F$|
000021C0: 28 35 29 3A 20 8E 00 E4 29 9E 0C 81 20 4B B2 31 |(5): ...)... K.1|
000021D0: 20 A4 20 4E 28 4D 5A 29 3A 20 56 45 4B 28 30 2C | . N(MZ): VEK(0,|
000021E0: 4B 29 B2 30 00 F6 29 9F 0C 81 20 4A B2 31 20 A4 |K).0..)... J.1 .|
000021F0: 20 4D 28 4D 5A 29 00 12 2A A0 0C 58 B2 4D 41 54 | M(MZ)..*..X.MAT|
00002200: 28 4D 5A 2C 4B 2C 4A 29 AC 56 45 4B 28 56 5A 2C |(MZ,K,J).VEK(VZ,|
00002210: 4A 29 00 2A 2A A1 0C 56 45 4B 28 30 2C 4B 29 B2 |J).**..VEK(0,K).|
00002220: 56 45 4B 28 30 2C 4B 29 AA 58 00 34 2A A2 0C 82 |VEK(0,K).X.4*...|
00002230: 20 4A 2C 4B 00 50 2A A8 0C 4C 28 30 29 B2 4E 28 | J,K.P*..L(0).N(|
00002240: 4D 5A 29 3A 20 56 45 4B 28 30 2C 30 29 B2 AA 31 |MZ): VEK(0,0)..1|
00002250: 00 6D 2A B2 0C 4D 5A B2 4D 5A AB 31 3A 20 56 5A |.m*..MZ.MZ.1: VZ|
00002260: B2 56 5A AB 31 3A 20 8D 20 36 32 30 30 00 7B 2A |.VZ.1: . 6200.{*|
00002270: BC 0C 8D 20 32 32 30 30 3A 20 8E 00 91 2A E4 0C |... 2200: ...*..|
00002280: 8F 20 56 45 4B 54 4F 52 20 2A 20 4D 41 54 52 49 |. VEKTOR * MATRI|
00002290: 58 00 A9 2A E5 0C 8B 20 56 5A B3 31 20 A7 20 99 |X..*... VZ.1 . .|
000022A0: 20 46 24 28 34 29 3A 20 8E 00 C1 2A E6 0C 8B 20 | F$(4): ...*... |
000022B0: 4D 5A B3 31 20 A7 20 99 20 46 24 28 34 29 3A 20 |MZ.1 . . F$(4): |
000022C0: 8E 00 DB 2A EE 0C 8B 20 56 45 4B 28 56 5A 2C 30 |...*... VEK(VZ,0|
000022D0: 29 B2 AB 31 20 A7 20 33 33 32 30 00 EA 2A F3 0C |)..1 . 3320..*..|
000022E0: 99 20 46 24 28 36 29 3A 20 8E 00 03 2B F8 0C 8B |. F$(6): ...+...|
000022F0: 20 4C 28 56 5A 29 B2 4E 28 4D 5A 29 20 A7 20 33 | L(VZ).N(MZ) . 3|
00002300: 33 33 30 00 12 2B FD 0C 99 20 46 24 28 35 29 3A |330..+... F$(5):|
00002310: 20 8E 00 30 2B 02 0D 81 20 4B B2 31 20 A4 20 4D | ..0+... K.1 . M|
00002320: 28 4D 5A 29 3A 20 56 45 4B 28 30 2C 4B 29 B2 30 |(MZ): VEK(0,K).0|
00002330: 00 42 2B 03 0D 81 20 49 B2 31 20 A4 20 4E 28 4D |.B+... I.1 . N(M|
00002340: 5A 29 00 5E 2B 04 0D 58 B2 56 45 4B 28 56 5A 2C |Z).^+..X.VEK(VZ,|
00002350: 49 29 AC 4D 41 54 28 4D 5A 2C 49 2C 4B 29 00 76 |I).MAT(MZ,I,K).v|
00002360: 2B 05 0D 56 45 4B 28 30 2C 4B 29 B2 56 45 4B 28 |+..VEK(0,K).VEK(|
00002370: 30 2C 4B 29 AA 58 00 80 2B 06 0D 82 20 49 2C 4B |0,K).X..+... I,K|
00002380: 00 9C 2B 0C 0D 4C 28 30 29 B2 4D 28 4D 5A 29 3A |..+..L(0).M(MZ):|
00002390: 20 56 45 4B 28 30 2C 30 29 B2 AB 31 00 B9 2B 16 | VEK(0,0)..1..+.|
000023A0: 0D 56 5A B2 56 5A AB 31 3A 20 4D 5A B2 4D 5A AB |.VZ.VZ.1: MZ.MZ.|
000023B0: 31 3A 20 8D 20 36 32 30 30 00 C7 2B 20 0D 8D 20 |1: . 6200..+ .. |
000023C0: 32 32 30 30 3A 20 8E 00 DD 2B 48 0D 8F 20 53 4B |2200: ...+H.. SK|
000023D0: 41 4C 41 52 20 2A 20 4D 41 54 52 49 58 00 F5 2B |ALAR * MATRIX..+|
000023E0: 49 0D 8B 20 53 5A B3 31 20 A7 20 99 20 46 24 28 |I.. SZ.1 . . F$(|
000023F0: 34 29 3A 20 8E 00 0D 2C 4A 0D 8B 20 4D 5A B3 31 |4): ...,J.. MZ.1|
00002400: 20 A7 20 99 20 46 24 28 34 29 3A 20 8E 00 2E 2C | . . F$(4): ...,|
00002410: 52 0D 81 20 49 B2 31 20 A4 20 4E 28 4D 5A 29 3A |R.. I.1 . N(MZ):|
00002420: 20 81 20 4A B2 31 20 A4 20 4D 28 4D 5A 29 00 52 | . J.1 . M(MZ).R|
00002430: 2C 53 0D 4D 41 54 28 4D 5A 2C 49 2C 4A 29 B2 53 |,S.MAT(MZ,I,J).S|
00002440: 4B 41 28 53 5A 29 AC 4D 41 54 28 4D 5A 2C 49 2C |KA(SZ).MAT(MZ,I,|
00002450: 4A 29 00 5C 2C 54 0D 82 20 4A 2C 49 00 68 2C 5C |J).\,T.. J,I.h,\|
00002460: 0D 53 5A B2 53 5A AB 31 00 76 2C 66 0D 8D 20 32 |.SZ.SZ.1.v,f.. 2|
00002470: 31 30 30 3A 20 8E 00 8C 2C AC 0D 8F 20 56 45 4B |100: ...,... VEK|
00002480: 54 4F 52 20 2A 20 56 45 4B 54 4F 52 00 A4 2C AD |TOR * VEKTOR..,.|
00002490: 0D 8B 20 56 5A B3 32 20 A7 20 99 20 46 24 28 34 |.. VZ.2 . . F$(4|
000024A0: 29 3A 20 8E 00 C3 2C B1 0D 59 B2 56 45 4B 28 56 |): ...,..Y.VEK(V|
000024B0: 5A AB 31 2C 30 29 3A 20 5A B2 56 45 4B 28 56 5A |Z.1,0): Z.VEK(VZ|
000024C0: 2C 30 29 00 D7 2C B6 0D 8B 20 59 AC 5A B2 AB 31 |,0)..,... Y.Z..1|
000024D0: 20 A7 20 33 35 32 30 00 E6 2C BB 0D 99 20 46 24 | . 3520..,... F$|
000024E0: 28 37 29 3A 20 8E 00 01 2D C0 0D 8B 20 4C 28 56 |(7): ...-... L(V|
000024F0: 5A AB 31 29 B2 4C 28 56 5A 29 20 A7 20 33 35 33 |Z.1).L(VZ) . 353|
00002500: 30 00 10 2D C5 0D 99 20 46 24 28 35 29 3A 20 8E |0..-... F$(5): .|
00002510: 00 2A 2D CA 0D 8B 20 56 45 4B 28 56 5A 2C 30 29 |.*-... VEK(VZ,0)|
00002520: B2 AA 31 20 A7 20 33 35 35 30 00 44 2D D4 0D 8B |..1 . 3550.D-...|
00002530: 20 4D 5A AA 31 B1 48 20 A7 20 99 20 46 24 28 33 | MZ.1.H . . F$(3|
00002540: 29 3A 20 8E 00 50 2D D5 0D 4D 5A B2 4D 5A AA 31 |): ..P-..MZ.MZ.1|
00002550: 00 71 2D D6 0D 81 20 49 B2 31 20 A4 20 4C 28 56 |.q-... I.1 . L(V|
00002560: 5A 29 3A 20 81 20 4A B2 31 20 A4 20 4C 28 56 5A |Z): . J.1 . L(VZ|
00002570: 29 00 97 2D D7 0D 4D 41 54 28 4D 5A 2C 49 2C 4A |)..-..MAT(MZ,I,J|
00002580: 29 B2 56 45 4B 28 56 5A AB 31 2C 49 29 AC 56 45 |).VEK(VZ.1,I).VE|
00002590: 4B 28 56 5A 2C 4A 29 00 A1 2D D8 0D 82 20 4A 2C |K(VZ,J)..-... J,|
000025A0: 49 00 BE 2D D9 0D 4E 28 4D 5A 29 B2 4C 28 56 5A |I..-..N(MZ).L(VZ|
000025B0: 29 3A 20 4D 28 4D 5A 29 B2 4C 28 56 5A 29 00 CA |): M(MZ).L(VZ)..|
000025C0: 2D DA 0D 56 5A B2 56 5A AB 32 00 D8 2D DB 0D 8D |-..VZ.VZ.2..-...|
000025D0: 20 32 31 30 30 3A 20 8E 00 F2 2D DE 0D 8B 20 53 | 2100: ...-... S|
000025E0: 5A AA 31 B1 48 20 A7 20 99 20 46 24 28 33 29 3A |Z.1.H . . F$(3):|
000025F0: 20 8E 00 09 2E DF 0D 53 5A B2 53 5A AA 31 3A 20 | ......SZ.SZ.1: |
00002600: 53 4B 41 28 53 5A 29 B2 30 00 1B 2E E0 0D 81 20 |SKA(SZ).0...... |
00002610: 4B B2 31 20 A4 20 4C 28 56 5A 29 00 37 2E E1 0D |K.1 . L(VZ).7...|
00002620: 58 B2 56 45 4B 28 56 5A AB 31 2C 4B 29 AC 56 45 |X.VEK(VZ.1,K).VE|
00002630: 4B 28 56 5A 2C 4B 29 00 4D 2E E2 0D 53 4B 41 28 |K(VZ,K).M...SKA(|
00002640: 53 5A 29 B2 53 4B 41 28 53 5A 29 AA 58 00 55 2E |SZ).SKA(SZ).X.U.|
00002650: E3 0D 82 20 4B 00 61 2E E4 0D 56 5A B2 56 5A AB |... K.a...VZ.VZ.|
00002660: 32 00 6F 2E E5 0D 8D 20 32 33 30 30 3A 20 8E 00 |2.o.... 2300: ..|
00002670: 85 2E 10 0E 8F 20 53 4B 41 4C 41 52 20 2A 20 56 |..... SKALAR * V|
00002680: 45 4B 54 4F 52 00 9D 2E 11 0E 8B 20 53 5A B3 31 |EKTOR...... SZ.1|
00002690: 20 A7 20 99 20 46 24 28 34 29 3A 20 8E 00 B5 2E | . . F$(4): ....|
000026A0: 12 0E 8B 20 56 5A B3 31 20 A7 20 99 20 46 24 28 |... VZ.1 . . F$(|
000026B0: 34 29 3A 20 8E 00 CF 2E 1A 0E 8B 20 56 45 4B 28 |4): ....... VEK(|
000026C0: 56 5A 2C 30 29 B3 B1 30 20 A7 20 33 36 32 30 00 |VZ,0)..0 . 3620.|
000026D0: DE 2E 1F 0E 99 20 46 24 28 36 29 3A 20 8E 00 F0 |..... F$(6): ...|
000026E0: 2E 24 0E 81 20 4B B2 31 20 A4 20 4C 28 56 5A 29 |.$.. K.1 . L(VZ)|
000026F0: 00 10 2F 25 0E 56 45 4B 28 56 5A 2C 4B 29 B2 53 |../%.VEK(VZ,K).S|
00002700: 4B 41 28 53 5A 29 AC 56 45 4B 28 56 5A 2C 4B 29 |KA(SZ).VEK(VZ,K)|
00002710: 00 18 2F 26 0E 82 20 4B 00 24 2F 2E 0E 53 5A B2 |../&.. K.$/..SZ.|
00002720: 53 5A AB 31 00 32 2F 38 0E 8D 20 32 32 30 30 3A |SZ.1.2/8.. 2200:|
00002730: 20 8E 00 48 2F 74 0E 8F 20 53 4B 41 4C 41 52 20 | ..H/t.. SKALAR |
00002740: 2A 20 53 4B 41 4C 41 52 00 60 2F 75 0E 8B 20 53 |* SKALAR.`/u.. S|
00002750: 5A B3 32 20 A7 20 99 20 46 24 28 34 29 3A 20 8E |Z.2 . . F$(4): .|
00002760: 00 80 2F 7E 0E 53 4B 41 28 53 5A AB 31 29 B2 53 |../~.SKA(SZ.1).S|
00002770: 4B 41 28 53 5A AB 31 29 AC 53 4B 41 28 53 5A 29 |KA(SZ.1).SKA(SZ)|
00002780: 00 8C 2F 88 0E 53 5A B2 53 5A AB 31 00 9A 2F 92 |../..SZ.SZ.1../.|
00002790: 0E 8D 20 32 33 30 30 3A 20 8E 00 BB 2F A0 0F 8F |.. 2300: .../...|
000027A0: 20 41 44 44 49 54 49 4F 4E 45 4E 20 26 20 53 55 | ADDITIONEN & SU|
000027B0: 42 54 52 41 4B 54 49 4F 4E 45 4E 00 D1 2F 04 10 |BTRAKTIONEN../..|
000027C0: 8F 20 4D 41 54 52 49 58 20 2B 20 4D 41 54 52 49 |. MATRIX + MATRI|
000027D0: 58 00 E9 2F 05 10 8B 20 4D 5A B3 32 20 A7 20 99 |X../... MZ.2 . .|
000027E0: 20 46 24 28 34 29 3A 20 8E 00 04 30 0E 10 8B 20 | F$(4): ...0... |
000027F0: 4E 28 4D 5A AB 31 29 B2 4E 28 4D 5A 29 20 A7 20 |N(MZ.1).N(MZ) . |
00002800: 34 31 32 30 00 13 30 13 10 99 20 46 24 28 35 29 |4120..0... F$(5)|
00002810: 3A 20 8E 00 2E 30 18 10 8B 20 4D 28 4D 5A AB 31 |: ...0... M(MZ.1|
00002820: 29 B2 4D 28 4D 5A 29 20 A7 20 34 31 33 30 00 3D |).M(MZ) . 4130.=|
00002830: 30 1D 10 99 20 46 24 28 35 29 3A 20 8E 00 5E 30 |0... F$(5): ..^0|
00002840: 22 10 81 20 49 B2 31 20 A4 20 4E 28 4D 5A 29 3A |".. I.1 . N(MZ):|
00002850: 20 81 20 4A B2 31 20 A4 20 4D 28 4D 5A 29 00 7E | . J.1 . M(MZ).~|
00002860: 30 23 10 58 B2 4D 41 54 28 4D 5A AB 31 2C 49 2C |0#.X.MAT(MZ.1,I,|
00002870: 4A 29 AA 4D 41 54 28 4D 5A 2C 49 2C 4A 29 00 92 |J).MAT(MZ,I,J)..|
00002880: 30 24 10 4D 41 54 28 4D 5A AB 31 2C 49 2C 4A 29 |0$.MAT(MZ.1,I,J)|
00002890: B2 58 00 9C 30 25 10 82 20 4A 2C 49 00 A8 30 2C |.X..0%.. J,I..0,|
000028A0: 10 4D 5A B2 4D 5A AB 31 00 B6 30 36 10 8D 20 32 |.MZ.MZ.1..06.. 2|
000028B0: 31 30 30 3A 20 8E 00 CC 30 68 10 8F 20 56 45 4B |100: ...0h.. VEK|
000028C0: 54 4F 52 20 2B 20 56 45 4B 54 4F 52 00 E4 30 69 |TOR + VEKTOR..0i|
000028D0: 10 8B 20 56 5A B3 32 20 A7 20 99 20 46 24 28 34 |.. VZ.2 . . F$(4|
000028E0: 29 3A 20 8E 00 07 31 72 10 8B 20 56 45 4B 28 56 |): ...1r.. VEK(V|
000028F0: 5A AB 31 2C 30 29 B2 56 45 4B 28 56 5A 2C 30 29 |Z.1,0).VEK(VZ,0)|
00002900: 20 A7 20 34 32 32 30 00 16 31 77 10 99 20 46 24 | . 4220..1w.. F$|
00002910: 28 37 29 3A 20 8E 00 31 31 7C 10 8B 20 4C 28 56 |(7): ..11|.. L(V|
00002920: 5A AB 31 29 B2 4C 28 56 5A 29 20 A7 20 34 32 33 |Z.1).L(VZ) . 423|
00002930: 30 00 40 31 81 10 99 20 46 24 28 35 29 3A 20 8E |0.@1... F$(5): .|
00002940: 00 52 31 86 10 81 20 4B B2 31 20 A4 20 4C 28 56 |.R1... K.1 . L(V|
00002950: 5A 29 00 78 31 87 10 56 45 4B 28 56 5A AB 31 2C |Z).x1..VEK(VZ.1,|
00002960: 4B 29 B2 56 45 4B 28 56 5A AB 31 2C 4B 29 AA 56 |K).VEK(VZ.1,K).V|
00002970: 45 4B 28 56 5A 2C 4B 29 00 80 31 88 10 82 20 4B |EK(VZ,K)..1... K|
00002980: 00 8C 31 90 10 56 5A B2 56 5A AB 31 00 9A 31 9A |..1..VZ.VZ.1..1.|
00002990: 10 8D 20 32 32 30 30 3A 20 8E 00 B0 31 CC 10 8F |.. 2200: ...1...|
000029A0: 20 53 4B 41 4C 41 52 20 2B 20 53 4B 41 4C 41 52 | SKALAR + SKALAR|
000029B0: 00 C8 31 CD 10 8B 20 53 5A B3 32 20 A7 20 99 20 |..1... SZ.2 . . |
000029C0: 46 24 28 34 29 3A 20 8E 00 E8 31 D6 10 53 4B 41 |F$(4): ...1..SKA|
000029D0: 28 53 5A AB 31 29 B2 53 4B 41 28 53 5A AB 31 29 |(SZ.1).SKA(SZ.1)|
000029E0: AA 53 4B 41 28 53 5A 29 00 F4 31 E0 10 53 5A B2 |.SKA(SZ)..1..SZ.|
000029F0: 53 5A AB 31 00 02 32 EA 10 8D 20 32 33 30 30 3A |SZ.1..2... 2300:|
00002A00: 20 8E 00 18 32 30 11 8F 20 4D 41 54 52 49 58 20 | ...20.. MATRIX |
00002A10: 2D 20 4D 41 54 52 49 58 00 39 32 3A 11 81 20 49 |- MATRIX.92:.. I|
00002A20: B2 31 20 A4 20 4E 28 4D 5A 29 3A 20 81 20 4A B2 |.1 . N(MZ): . J.|
00002A30: 31 20 A4 20 4D 28 4D 5A 29 00 56 32 44 11 4D 41 |1 . M(MZ).V2D.MA|
00002A40: 54 28 4D 5A 2C 49 2C 4A 29 B2 AB 4D 41 54 28 4D |T(MZ,I,J)..MAT(M|
00002A50: 5A 2C 49 2C 4A 29 00 60 32 4E 11 82 20 4A 2C 49 |Z,I,J).`2N.. J,I|
00002A60: 00 6E 32 58 11 8D 20 34 31 30 30 3A 20 8E 00 84 |.n2X.. 4100: ...|
00002A70: 32 94 11 8F 20 56 45 4B 54 4F 52 20 2D 20 56 45 |2... VEKTOR - VE|
00002A80: 4B 54 4F 52 00 96 32 9E 11 81 20 4B B2 31 20 A4 |KTOR..2... K.1 .|
00002A90: 20 4C 28 56 5A 29 00 AF 32 A8 11 56 45 4B 28 56 | L(VZ)..2..VEK(V|
00002AA0: 5A 2C 4B 29 B2 AB 56 45 4B 28 56 5A 2C 4B 29 00 |Z,K)..VEK(VZ,K).|
00002AB0: B7 32 B2 11 82 20 4B 00 C5 32 BC 11 8D 20 34 32 |.2... K..2... 42|
00002AC0: 30 30 3A 20 8E 00 DB 32 F8 11 8F 20 53 4B 41 4C |00: ...2... SKAL|
00002AD0: 41 52 20 2D 20 53 4B 41 4C 41 52 00 F0 32 02 12 |AR - SKALAR..2..|
00002AE0: 53 4B 41 28 53 5A 29 B2 AB 53 4B 41 28 53 5A 29 |SKA(SZ)..SKA(SZ)|
00002AF0: 00 FE 32 0C 12 8D 20 34 33 30 30 3A 20 8E 00 18 |..2... 4300: ...|
00002B00: 33 88 13 8F 20 57 45 49 54 45 52 45 20 4F 50 45 |3... WEITERE OPE|
00002B10: 52 41 54 49 4F 4E 45 4E 00 33 33 EC 13 8F 20 4D |RATIONEN.33... M|
00002B20: 41 54 52 49 58 20 54 52 41 4E 53 50 4F 4E 49 45 |ATRIX TRANSPONIE|
00002B30: 52 45 4E 00 4B 33 ED 13 8B 20 4D 5A B3 31 20 A7 |REN.K3... MZ.1 .|
00002B40: 20 99 20 46 24 28 34 29 3A 20 8E 00 6C 33 F6 13 | . F$(4): ..l3..|
00002B50: 81 20 49 B2 31 20 A4 20 4E 28 4D 5A 29 3A 20 81 |. I.1 . N(MZ): .|
00002B60: 20 4A B2 31 20 A4 20 4D 28 4D 5A 29 00 87 33 00 | J.1 . M(MZ)..3.|
00002B70: 14 4D 41 54 28 30 2C 4A 2C 49 29 B2 4D 41 54 28 |.MAT(0,J,I).MAT(|
00002B80: 4D 5A 2C 49 2C 4A 29 00 91 33 0A 14 82 20 4A 2C |MZ,I,J)..3... J,|
00002B90: 49 00 AC 33 14 14 4E 28 30 29 B2 4D 28 4D 5A 29 |I..3..N(0).M(MZ)|
00002BA0: 3A 20 4D 28 30 29 B2 4E 28 4D 5A 29 00 C0 33 1E |: M(0).N(MZ)..3.|
00002BB0: 14 4D 5A B2 4D 5A AB 31 3A 20 8D 20 36 31 30 30 |.MZ.MZ.1: . 6100|
00002BC0: 00 CE 33 28 14 8D 20 32 31 30 30 3A 20 8E 00 E9 |..3(.. 2100: ...|
00002BD0: 33 50 14 8F 20 56 45 4B 54 4F 52 20 54 52 41 4E |3P.. VEKTOR TRAN|
00002BE0: 53 50 4F 4E 49 45 52 45 4E 00 01 34 51 14 8B 20 |SPONIEREN..4Q.. |
00002BF0: 56 5A B3 31 20 A7 20 99 20 46 24 28 34 29 3A 20 |VZ.1 . . F$(4): |
00002C00: 8E 00 1A 34 5A 14 56 45 4B 28 56 5A 2C 30 29 B2 |...4Z.VEK(VZ,0).|
00002C10: AB 56 45 4B 28 56 5A 2C 30 29 00 28 34 64 14 8D |.VEK(VZ,0).(4d..|
00002C20: 20 32 32 30 30 3A 20 8E 00 3E 34 B4 14 8F 20 57 | 2200: ..>4... W|
00002C30: 55 52 5A 45 4C 20 28 53 4B 41 4C 41 52 29 00 56 |URZEL (SKALAR).V|
00002C40: 34 B5 14 8B 20 53 5A B3 31 20 A7 20 99 20 46 24 |4... SZ.1 . . F$|
00002C50: 28 34 29 3A 20 8E 00 6E 34 BE 14 8B 20 53 4B 41 |(4): ..n4... SKA|
00002C60: 28 53 5A 29 B1 B2 30 20 A7 20 35 33 32 30 00 7D |(SZ)..0 . 5320.}|
00002C70: 34 C3 14 99 20 46 24 28 38 29 3A 20 8E 00 94 34 |4... F$(8): ...4|
00002C80: C8 14 53 4B 41 28 53 5A 29 B2 BA 28 53 4B 41 28 |..SKA(SZ)..(SKA(|
00002C90: 53 5A 29 29 00 A2 34 D2 14 8D 20 32 33 30 30 3A |SZ))..4... 2300:|
00002CA0: 20 8E 00 B8 34 18 15 8F 20 53 4B 41 4C 41 52 20 | ...4... SKALAR |
00002CB0: 5E 20 53 4B 41 4C 41 52 00 D0 34 19 15 8B 20 53 |^ SKALAR..4... S|
00002CC0: 5A B3 32 20 A7 20 99 20 46 24 28 34 29 3A 20 8E |Z.2 . . F$(4): .|
00002CD0: 00 EA 34 22 15 8B 20 53 4B 41 28 53 5A AB 31 29 |..4".. SKA(SZ.1)|
00002CE0: B1 B2 30 20 A7 20 35 34 33 30 00 0A 35 2C 15 8B |..0 . 5430..5,..|
00002CF0: 20 53 4B 41 28 53 5A 29 B2 B5 28 53 4B 41 28 53 | SKA(SZ)..(SKA(S|
00002D00: 5A 29 29 20 A7 20 35 34 33 30 00 19 35 31 15 99 |Z)) . 5430..51..|
00002D10: 20 46 24 28 38 29 3A 20 8E 00 39 35 36 15 53 4B | F$(8): ..956.SK|
00002D20: 41 28 53 5A AB 31 29 B2 53 4B 41 28 53 5A AB 31 |A(SZ.1).SKA(SZ.1|
00002D30: 29 AE 53 4B 41 28 53 5A 29 00 45 35 40 15 53 5A |).SKA(SZ).E5@.SZ|
00002D40: B2 53 5A AB 31 00 53 35 4A 15 8D 20 32 33 30 30 |.SZ.1.S5J.. 2300|
00002D50: 3A 20 8E 00 69 35 7C 15 8F 20 4D 41 54 52 49 58 |: ..i5|.. MATRIX|
00002D60: 20 5E 20 53 4B 41 4C 41 52 00 81 35 7D 15 8B 20 | ^ SKALAR..5}.. |
00002D70: 4D 5A B3 31 20 A7 20 99 20 46 24 28 34 29 3A 20 |MZ.1 . . F$(4): |
00002D80: 8E 00 99 35 7E 15 8B 20 53 5A B3 31 20 A7 20 99 |...5~.. SZ.1 . .|
00002D90: 20 46 24 28 34 29 3A 20 8E 00 B1 35 86 15 8B 20 | F$(4): ...5... |
00002DA0: 53 4B 41 28 53 5A 29 B1 B2 30 20 A7 20 35 35 32 |SKA(SZ)..0 . 552|
00002DB0: 30 00 C0 35 8B 15 99 20 46 24 28 38 29 3A 20 8E |0..5... F$(8): .|
00002DC0: 00 E0 35 90 15 8B 20 53 4B 41 28 53 5A 29 B2 B5 |..5... SKA(SZ)..|
00002DD0: 28 53 4B 41 28 53 5A 29 29 20 A7 20 35 35 33 30 |(SKA(SZ)) . 5530|
00002DE0: 00 EF 35 95 15 99 20 46 24 28 38 29 3A 20 8E 00 |..5... F$(8): ..|
00002DF0: 08 36 9A 15 8B 20 4E 28 4D 5A 29 B2 4D 28 4D 5A |.6... N(MZ).M(MZ|
00002E00: 29 20 A7 20 35 35 34 30 00 17 36 9F 15 99 20 46 |) . 5540..6... F|
00002E10: 24 28 39 29 3A 20 8E 00 2E 36 A4 15 8B 20 53 4B |$(9): ...6... SK|
00002E20: 41 28 53 5A 29 B1 30 20 A7 20 35 35 35 30 00 49 |A(SZ).0 . 5550.I|
00002E30: 36 A9 15 53 4B 41 28 53 5A 29 B2 4E 28 4D 5A 29 |6..SKA(SZ).N(MZ)|
00002E40: 3A 20 4D 5A B2 4D 5A AB 31 00 57 36 AA 15 8D 20 |: MZ.MZ.1.W6... |
00002E50: 37 36 30 30 3A 20 8E 00 6E 36 AE 15 8B 20 53 4B |7600: ..n6... SK|
00002E60: 41 28 53 5A 29 B1 31 20 A7 20 35 35 36 30 00 82 |A(SZ).1 . 5560..|
00002E70: 36 B3 15 53 5A B2 53 5A AB 31 3A 20 89 20 35 35 |6..SZ.SZ.1: . 55|
00002E80: 39 30 00 9E 36 B8 15 8D 20 36 34 30 30 3A 20 4D |90..6... 6400: M|
00002E90: 5A B2 4D 5A AA 31 3A 20 8D 20 36 31 30 30 00 B4 |Z.MZ.1: . 6100..|
00002EA0: 36 C2 15 81 20 4E B2 31 20 A4 20 53 4B 41 28 53 |6... N.1 . SKA(S|
00002EB0: 5A 29 AB 31 00 C8 36 C3 15 8D 20 33 31 30 30 3A |Z).1..6... 3100:|
00002EC0: 20 4D 5A B2 4D 5A AA 31 00 D0 36 C4 15 82 20 4E | MZ.MZ.1..6... N|
00002ED0: 00 E5 36 CC 15 53 5A B2 53 5A AB 31 3A 20 4D 5A |..6..SZ.SZ.1: MZ|
00002EE0: B2 4D 5A AB 31 00 F3 36 D6 15 8D 20 32 31 30 30 |.MZ.1..6... 2100|
00002EF0: 3A 20 8E 00 09 37 E0 15 8F 20 53 4B 41 4C 41 52 |: ...7... SKALAR|
00002F00: 20 2F 20 53 4B 41 4C 41 52 00 21 37 EA 15 8B 20 | / SKALAR.!7... |
00002F10: 53 4B 41 28 53 5A 29 B3 B1 30 20 A7 20 35 36 32 |SKA(SZ)..0 . 562|
00002F20: 30 00 30 37 EF 15 99 20 46 24 28 38 29 3A 20 8E |0.07... F$(8): .|
00002F30: 00 46 37 F4 15 53 4B 41 28 53 5A 29 B2 31 AD 53 |.F7..SKA(SZ).1.S|
00002F40: 4B 41 28 53 5A 29 00 54 37 FE 15 8D 20 33 37 30 |KA(SZ).T7... 370|
00002F50: 30 3A 20 8E 00 65 37 44 16 8F 20 31 20 2F 20 53 |0: ..e7D.. 1 / S|
00002F60: 4B 41 4C 41 52 00 7D 37 45 16 8B 20 53 5A B3 31 |KALAR.}7E.. SZ.1|
00002F70: 20 A7 20 99 20 46 24 28 34 29 3A 20 8E 00 95 37 | . . F$(4): ...7|
00002F80: 4E 16 8B 20 53 4B 41 28 53 5A 29 B3 B1 30 20 A7 |N.. SKA(SZ)..0 .|
00002F90: 20 35 37 32 30 00 A4 37 53 16 99 20 46 24 28 38 | 5720..7S.. F$(8|
00002FA0: 29 3A 20 8E 00 BA 37 58 16 53 4B 41 28 53 5A 29 |): ...7X.SKA(SZ)|
00002FB0: B2 31 AD 53 4B 41 28 53 5A 29 00 C8 37 62 16 8D |.1.SKA(SZ)..7b..|
00002FC0: 20 32 33 30 30 3A 20 8E 00 E3 37 70 17 8F 20 53 | 2300: ...7p.. S|
00002FD0: 54 41 50 45 4C 4D 41 4E 49 50 55 4C 41 54 49 4F |TAPELMANIPULATIO|
00002FE0: 4E 45 4E 00 03 38 D4 17 8F 20 4D 41 54 52 49 58 |NEN..8... MATRIX|
00002FF0: 20 41 55 46 20 53 54 41 50 45 4C 20 42 52 49 4E | AUF STAPEL BRIN|
00003000: 47 45 4E 00 1D 38 D5 17 8B 20 4D 5A AA 31 B1 48 |GEN..8... MZ.1.H|
00003010: 20 A7 20 99 20 46 24 28 33 29 3A 20 8E 00 29 38 | . . F$(3): ..)8|
00003020: DE 17 4D 5A B2 4D 5A AA 31 00 44 38 E8 17 4E 28 |..MZ.MZ.1.D8..N(|
00003030: 4D 5A 29 B2 4E 28 30 29 3A 20 4D 28 4D 5A 29 B2 |MZ).N(0): M(MZ).|
00003040: 4D 28 30 29 00 63 38 F2 17 81 20 49 B2 31 20 A4 |M(0).c8... I.1 .|
00003050: 20 4E 28 30 29 3A 20 81 20 4A B2 31 20 A4 20 4D | N(0): . J.1 . M|
00003060: 28 30 29 00 7E 38 F3 17 4D 41 54 28 4D 5A 2C 49 |(0).~8..MAT(MZ,I|
00003070: 2C 4A 29 B2 4D 41 54 28 30 2C 49 2C 4A 29 00 88 |,J).MAT(0,I,J)..|
00003080: 38 F4 17 82 20 4A 2C 49 00 9C 38 FC 17 8B 20 4F |8... J,I..8... O|
00003090: B2 32 39 20 A7 20 8D 20 36 37 30 30 00 A2 38 06 |.29 . . 6700..8.|
000030A0: 18 8E 00 C2 38 38 18 8F 20 56 45 4B 54 4F 52 20 |....88.. VEKTOR |
000030B0: 41 55 46 20 53 54 41 50 45 4C 20 42 52 49 4E 47 |AUF STAPEL BRING|
000030C0: 45 4E 00 DC 38 39 18 8B 20 56 5A AA 31 B1 48 20 |EN..89.. VZ.1.H |
000030D0: A7 20 99 20 46 24 28 33 29 3A 20 8E 00 E8 38 42 |. . F$(3): ...8B|
000030E0: 18 56 5A B2 56 5A AA 31 00 F7 38 4C 18 4C 28 56 |.VZ.VZ.1..8L.L(V|
000030F0: 5A 29 B2 4C 28 30 29 00 08 39 56 18 81 20 4B B2 |Z).L(0)..9V.. K.|
00003100: 30 20 A4 20 4C 28 30 29 00 1F 39 57 18 56 45 4B |0 . L(0)..9W.VEK|
00003110: 28 56 5A 2C 4B 29 B2 56 45 4B 28 30 2C 4B 29 00 |(VZ,K).VEK(0,K).|
00003120: 27 39 58 18 82 20 4B 00 3B 39 60 18 8B 20 4F B2 |'9X.. K.;9`.. O.|
00003130: 33 30 20 A7 20 8D 20 36 37 30 30 00 41 39 6A 18 |30 . . 6700.A9j.|
00003140: 8E 00 61 39 9C 18 8F 20 53 4B 41 4C 41 52 20 41 |..a9... SKALAR A|
00003150: 55 46 20 53 54 41 50 45 4C 20 42 52 49 4E 47 45 |UF STAPEL BRINGE|
00003160: 4E 00 7B 39 9D 18 8B 20 53 5A AA 31 B1 48 20 A7 |N.{9... SZ.1.H .|
00003170: 20 99 20 46 24 28 33 29 3A 20 8E 00 87 39 A6 18 | . F$(3): ...9..|
00003180: 53 5A B2 53 5A AA 31 00 9A 39 B0 18 53 4B 41 28 |SZ.SZ.1..9..SKA(|
00003190: 53 5A 29 B2 53 4B 41 28 30 29 00 AE 39 BA 18 8B |SZ).SKA(0)..9...|
000031A0: 20 4F B2 33 31 20 A7 20 8D 20 36 37 30 30 00 B4 | O.31 . . 6700..|
000031B0: 39 C4 18 8E 00 D2 39 00 19 8F 20 4D 41 54 52 49 |9.....9... MATRI|
000031C0: 58 20 56 4F 4D 20 53 54 41 50 45 4C 20 48 4F 4C |X VOM STAPEL HOL|
000031D0: 45 4E 00 EA 39 01 19 8B 20 4D 5A B3 31 20 A7 20 |EN..9... MZ.1 . |
000031E0: 99 20 46 24 28 34 29 3A 20 8E 00 0B 3A 0A 19 81 |. F$(4): ...:...|
000031F0: 20 49 B2 31 20 A4 20 4E 28 4D 5A 29 3A 20 81 20 | I.1 . N(MZ): . |
00003200: 4A B2 31 20 A4 20 4D 28 4D 5A 29 00 26 3A 0B 19 |J.1 . M(MZ).&:..|
00003210: 4D 41 54 28 30 2C 49 2C 4A 29 B2 4D 41 54 28 4D |MAT(0,I,J).MAT(M|
00003220: 5A 2C 49 2C 4A 29 00 30 3A 0C 19 82 20 4A 2C 49 |Z,I,J).0:... J,I|
00003230: 00 4B 3A 14 19 4E 28 30 29 B2 4E 28 4D 5A 29 3A |.K:..N(0).N(MZ):|
00003240: 20 4D 28 30 29 B2 4D 28 4D 5A 29 00 57 3A 1E 19 | M(0).M(MZ).W:..|
00003250: 4D 5A B2 4D 5A AB 31 00 6B 3A 28 19 8B 20 4F B2 |MZ.MZ.1.k:(.. O.|
00003260: 33 32 20 A7 20 8D 20 36 37 30 30 00 71 3A 32 19 |32 . . 6700.q:2.|
00003270: 8E 00 8F 3A 64 19 8F 20 56 45 4B 54 4F 52 20 56 |...:d.. VEKTOR V|
00003280: 4F 4D 20 53 54 41 50 45 4C 20 48 4F 4C 45 4E 00 |OM STAPEL HOLEN.|
00003290: A7 3A 65 19 8B 20 56 5A B3 31 20 A7 20 99 20 46 |.:e.. VZ.1 . . F|
000032A0: 24 28 34 29 3A 20 8E 00 B9 3A 6E 19 81 20 4B B2 |$(4): ...:n.. K.|
000032B0: 30 20 A4 20 4C 28 56 5A 29 00 D0 3A 6F 19 56 45 |0 . L(VZ)..:o.VE|
000032C0: 4B 28 30 2C 4B 29 B2 56 45 4B 28 56 5A 2C 4B 29 |K(0,K).VEK(VZ,K)|
000032D0: 00 D8 3A 70 19 82 20 4B 00 E7 3A 78 19 4C 28 30 |..:p.. K..:x.L(0|
000032E0: 29 B2 4C 28 56 5A 29 00 F3 3A 82 19 56 5A B2 56 |).L(VZ)..:..VZ.V|
000032F0: 5A AB 31 00 07 3B 8C 19 8B 20 4F B2 33 33 20 A7 |Z.1..;... O.33 .|
00003300: 20 8D 20 36 37 30 30 00 0D 3B 96 19 8E 00 2B 3B | . 6700..;....+;|
00003310: C8 19 8F 20 53 4B 41 4C 41 52 20 56 4F 4D 20 53 |... SKALAR VOM S|
00003320: 54 41 50 45 4C 20 48 4F 4C 45 4E 00 43 3B C9 19 |TAPEL HOLEN.C;..|
00003330: 8B 20 53 5A B3 31 20 A7 20 99 20 46 24 28 34 29 |. SZ.1 . . F$(4)|
00003340: 3A 20 8E 00 56 3B D2 19 53 4B 41 28 30 29 B2 53 |: ..V;..SKA(0).S|
00003350: 4B 41 28 53 5A 29 00 62 3B DC 19 53 5A B2 53 5A |KA(SZ).b;..SZ.SZ|
00003360: AB 31 00 76 3B E6 19 8B 20 4F B2 33 34 20 A7 20 |.1.v;... O.34 . |
00003370: 8D 20 36 37 30 30 00 7C 3B F0 19 8E 00 98 3B 2C |. 6700.|;.....;,|
00003380: 1A 8F 20 53 54 41 50 45 4C 5A 45 49 47 45 52 20 |.. STAPELZEIGER |
00003390: 41 55 53 47 45 42 45 4E 00 B2 3B 36 1A 99 20 22 |AUSGEBEN..;6.. "|
000033A0: 2A 2A 2A 20 53 54 41 50 45 4C 5A 45 49 47 45 52 |*** STAPELZEIGER|
000033B0: 3A 22 00 CD 3B 37 1A 99 20 22 40 40 40 20 28 4D |:"..;7.. "@@@ (M|
000033C0: 5A 2C 56 5A 2C 53 5A 29 20 3D 20 22 3B 00 E6 3B |Z,VZ,SZ) = ";..;|
000033D0: 38 1A 99 20 22 28 22 4D 5A 22 2C 22 56 5A 22 2C |8.. "("MZ","VZ",|
000033E0: 22 53 5A 22 29 22 00 EC 3B 40 1A 8E 00 0C 3C 90 |"SZ")"..;@....<.|
000033F0: 1A 8F 20 4E 45 55 53 54 41 52 54 20 44 45 53 20 |.. NEUSTART DES |
00003400: 55 50 4E 2D 52 45 43 48 4E 45 52 53 00 29 3C 9A |UPN-RECHNERS.)<.|
00003410: 1A 8D 20 38 31 30 30 3A 20 91 20 4A 4E 20 89 20 |.. 8100: . JN . |
00003420: 36 38 33 30 2C 36 38 32 30 00 3E 3C A4 1A 4D 5A |6830,6820.><..MZ|
00003430: B2 30 3A 20 56 5A B2 30 3A 20 53 5A B2 30 00 44 |.0: VZ.0: SZ.0.D|
00003440: 3C AE 1A 8E 00 5D 3C 58 1B 8F 20 41 4E 44 45 52 |<....]<X.. ANDER|
00003450: 45 20 4F 50 45 52 41 54 49 4F 4E 45 4E 00 6B 3C |E OPERATIONEN.k<|
00003460: BC 1B 8F 20 49 4E 56 45 52 53 45 00 83 3C BD 1B |... INVERSE..<..|
00003470: 8B 20 4D 5A B3 31 20 A7 20 99 20 46 24 28 34 29 |. MZ.1 . . F$(4)|
00003480: 3A 20 8E 00 9D 3C BE 1B 8B 20 4D 5A AA 31 B1 48 |: ...<... MZ.1.H|
00003490: 20 A7 20 99 20 46 24 28 33 29 3A 20 8E 00 B6 3C | . . F$(3): ...<|
000034A0: C6 1B 8B 20 4E 28 4D 5A 29 B2 4D 28 4D 5A 29 20 |... N(MZ).M(MZ) |
000034B0: A7 20 37 31 32 30 00 C5 3C CB 1B 99 20 46 24 28 |. 7120..<... F$(|
000034C0: 39 29 3A 20 8E 00 E0 3C D0 1B 8D 20 36 34 30 30 |9): ...<... 6400|
000034D0: 3A 20 4D 5A B2 4D 5A AA 31 3A 20 8D 20 33 32 30 |: MZ.MZ.1: . 320|
000034E0: 00 F7 3C D5 1B 8B 20 53 4B 41 28 30 29 B3 B1 4E |..<... SKA(0)..N|
000034F0: 28 30 29 20 A7 20 8E 00 0D 3D DA 1B 8D 20 36 31 |(0) . ...=... 61|
00003500: 30 30 3A 20 8D 20 32 31 30 30 3A 20 8E 00 20 3D |00: . 2100: .. =|
00003510: 20 1C 8F 20 44 45 54 45 52 4D 49 4E 41 4E 54 45 | .. DETERMINANTE|
00003520: 00 38 3D 21 1C 8B 20 4D 5A B3 31 20 A7 20 99 20 |.8=!.. MZ.1 . . |
00003530: 46 24 28 34 29 3A 20 8E 00 51 3D 2A 1C 8B 20 4E |F$(4): ..Q=*.. N|
00003540: 28 4D 5A 29 B2 4D 28 4D 5A 29 20 A7 20 37 32 32 |(MZ).M(MZ) . 722|
00003550: 30 00 60 3D 2F 1C 99 20 46 24 28 39 29 3A 20 8E |0.`=/.. F$(9): .|
00003560: 00 72 3D 34 1C 8D 20 36 34 30 30 3A 20 8D 20 34 |.r=4.. 6400: . 4|
00003570: 33 30 00 88 3D 3E 1C 8D 20 36 33 30 30 3A 20 8D |30..=>.. 6300: .|
00003580: 20 32 33 30 30 3A 20 8E 00 93 3D 84 1C 8F 20 52 | 2300: ...=... R|
00003590: 41 4E 47 00 AB 3D 85 1C 8B 20 4D 5A B3 31 20 A7 |ANG..=... MZ.1 .|
000035A0: 20 99 20 46 24 28 34 29 3A 20 8E 00 BD 3D 8E 1C | . F$(4): ...=..|
000035B0: 8D 20 36 34 30 30 3A 20 8D 20 35 32 30 00 D3 3D |. 6400: . 520..=|
000035C0: 98 1C 8D 20 36 33 30 30 3A 20 8D 20 32 33 30 30 |... 6300: . 2300|
000035D0: 3A 20 8E 00 E7 3D E8 1C 8F 20 53 4B 41 4C 41 52 |: ...=... SKALAR|
000035E0: 50 52 4F 44 55 4B 54 00 FF 3D E9 1C 8B 20 56 5A |PRODUKT..=... VZ|
000035F0: B3 32 20 A7 20 99 20 46 24 28 34 29 3A 20 8E 00 |.2 . . F$(4): ..|
00003600: 1E 3E ED 1C 59 B2 56 45 4B 28 56 5A AB 31 2C 30 |.>..Y.VEK(VZ.1,0|
00003610: 29 3A 20 5A B2 56 45 4B 28 56 5A 2C 30 29 00 35 |): Z.VEK(VZ,0).5|
00003620: 3E F2 1C 8B 20 59 B2 30 20 AF 20 5A B2 30 20 A7 |>... Y.0 . Z.0 .|
00003630: 20 37 34 32 30 00 44 3E F7 1C 99 20 46 24 28 37 | 7420.D>... F$(7|
00003640: 29 3A 20 8E 00 5F 3E FC 1C 8B 20 4C 28 56 5A 29 |): .._>... L(VZ)|
00003650: B2 4C 28 56 5A AB 31 29 20 A7 20 37 34 33 30 00 |.L(VZ.1) . 7430.|
00003660: 6E 3E 01 1D 99 20 46 24 28 35 29 3A 20 8E 00 80 |n>... F$(5): ...|
00003670: 3E 06 1D 8D 20 36 35 30 30 3A 20 8D 20 36 33 30 |>... 6500: . 630|
00003680: 00 96 3E 10 1D 8D 20 36 33 30 30 3A 20 8D 20 32 |..>... 6300: . 2|
00003690: 33 30 30 3A 20 8E 00 A1 3E 4C 1D 8F 20 4E 4F 52 |300: ...>L.. NOR|
000036A0: 4D 00 B9 3E 4D 1D 8B 20 56 5A B3 31 20 A7 20 99 |M..>M.. VZ.1 . .|
000036B0: 20 46 24 28 34 29 3A 20 8E 00 D2 3E 56 1D 8B 20 | F$(4): ...>V.. |
000036C0: 56 45 4B 28 56 5A 2C 30 29 B2 30 20 A7 20 37 35 |VEK(VZ,0).0 . 75|
000036D0: 32 30 00 E1 3E 5B 1D 99 20 46 24 28 36 29 3A 20 |20..>[.. F$(6): |
000036E0: 8E 00 F3 3E 60 1D 8D 20 36 35 30 30 3A 20 8D 20 |...>`.. 6500: . |
000036F0: 37 33 30 00 09 3F 6A 1D 8D 20 36 33 30 30 3A 20 |730..?j.. 6300: |
00003700: 8D 20 32 33 30 30 3A 20 8E 00 1E 3F B0 1D 8F 20 |. 2300: ...?... |
00003710: 45 49 4E 48 45 49 54 53 4D 41 54 52 49 58 00 38 |EINHEITSMATRIX.8|
00003720: 3F B1 1D 8B 20 4D 5A AA 31 B1 48 20 A7 20 99 20 |?... MZ.1.H . . |
00003730: 46 24 28 33 29 3A 20 8E 00 50 3F B2 1D 8B 20 53 |F$(3): ..P?... S|
00003740: 5A B3 31 20 A7 20 99 20 46 24 28 34 29 3A 20 8E |Z.1 . . F$(4): .|
00003750: 00 5C 3F BA 1D 4D 5A B2 4D 5A AA 31 00 70 3F C4 |.\?..MZ.MZ.1.p?.|
00003760: 1D 81 20 49 B2 31 20 A4 20 53 4B 41 28 53 5A 29 |.. I.1 . SKA(SZ)|
00003770: 00 84 3F C5 1D 81 20 4A B2 31 20 A4 20 53 4B 41 |..?... J.1 . SKA|
00003780: 28 53 5A 29 00 9B 3F C6 1D 4D 41 54 28 4D 5A 2C |(SZ)..?..MAT(MZ,|
00003790: 49 2C 4A 29 B2 AB 28 49 B2 4A 29 00 A5 3F C7 1D |I,J)..(I.J)..?..|
000037A0: 82 20 4A 2C 49 00 C6 3F CE 1D 4E 28 4D 5A 29 B2 |. J,I..?..N(MZ).|
000037B0: 53 4B 41 28 53 5A 29 3A 20 4D 28 4D 5A 29 B2 53 |SKA(SZ): M(MZ).S|
000037C0: 4B 41 28 53 5A 29 00 D2 3F D8 1D 53 5A B2 53 5A |KA(SZ)..?..SZ.SZ|
000037D0: AB 31 00 E0 3F E2 1D 8D 20 32 31 30 30 3A 20 8E |.1..?... 2100: .|
000037E0: 00 F3 3F 40 1F 8F 20 47 45 54 2D 52 4F 55 54 49 |..?@.. GET-ROUTI|
000037F0: 4E 45 4E 00 01 40 A4 1F 8F 20 4A 41 2F 4E 45 49 |NEN..@... JA/NEI|
00003800: 4E 00 1C 40 A9 1F 99 20 22 26 26 26 20 4B 4F 52 |N..@... "&&& KOR|
00003810: 52 49 47 49 45 52 45 4E 3F 20 22 3B 00 35 40 AE |RIGIEREN? ";.5@.|
00003820: 1F A1 20 45 24 3A 20 8B 20 45 24 B2 22 22 20 A7 |.. E$: . E$."" .|
00003830: 20 38 31 31 30 00 49 40 AF 1F 8B 20 45 24 B2 22 | 8110.I@... E$."|
00003840: 4A 22 20 A7 20 38 31 32 30 00 5D 40 B0 1F 8B 20 |J" . 8120.]@... |
00003850: 45 24 B2 22 4E 22 20 A7 20 38 31 33 30 00 68 40 |E$."N" . 8130.h@|
00003860: B1 1F 89 20 38 31 31 30 00 7C 40 B8 1F 99 20 22 |... 8110.|@... "|
00003870: 4A 41 22 3A 20 4A 4E B2 31 3A 20 8E 00 92 40 C2 |JA": JN.1: ...@.|
00003880: 1F 99 20 22 4E 45 49 4E 22 3A 20 4A 4E B2 32 3A |.. "NEIN": JN.2:|
00003890: 20 8E 00 9F 40 08 20 8F 20 52 45 54 55 52 4E 00 | ...@. . RETURN.|
000038A0: B4 40 12 20 99 20 22 21 21 21 20 3C 52 45 54 55 |.@. . "!!! <RETU|
000038B0: 52 4E 3E 22 00 CE 40 1C 20 A1 20 45 24 3A 20 8B |RN>"..@. . E$: .|
000038C0: 20 45 24 B3 B1 52 24 20 A7 20 38 32 32 30 00 EF | E$..R$ . 8220..|
000038D0: 40 26 20 99 20 22 2A 2A 2A 20 45 49 4E 45 4E 20 |@& . "*** EINEN |
000038E0: 4D 4F 4D 45 4E 54 2C 20 42 49 54 54 45 2E 22 00 |MOMENT, BITTE.".|
000038F0: F5 40 30 20 8E 00 01 41 6C 20 8F 20 53 50 41 43 |.@0 ...Al . SPAC|
00003900: 45 00 15 41 76 20 99 20 22 21 21 21 20 3C 53 50 |E..Av . "!!! <SP|
00003910: 41 43 45 3E 22 00 30 41 80 20 A1 20 45 24 3A 20 |ACE>".0A. . E$: |
00003920: 8B 20 45 24 B3 B1 22 20 22 20 A7 20 38 33 32 30 |. E$.." " . 8320|
00003930: 00 36 41 8A 20 8E 00 59 41 34 21 8F 20 4C 4F 45 |.6A. ..YA4!. LOE|
00003940: 53 43 48 45 4E 20 44 45 52 20 41 52 42 45 49 54 |SCHEN DER ARBEIT|
00003950: 53 53 50 45 49 43 48 45 52 00 7E 41 3E 21 53 4B |SSPEICHER.~A>!SK|
00003960: 41 28 30 29 B2 30 3A 20 4C 28 30 29 B2 30 3A 20 |A(0).0: L(0).0: |
00003970: 4D 28 30 29 B2 30 3A 20 4E 28 30 29 B2 30 00 98 |M(0).0: N(0).0..|
00003980: 41 48 21 81 20 49 B2 30 20 A4 20 47 3A 20 56 45 |AH!. I.0 . G: VE|
00003990: 4B 28 30 2C 49 29 B2 30 00 B4 41 52 21 81 20 4A |K(0,I).0..AR!. J|
000039A0: B2 30 20 A4 20 47 3A 20 4D 41 54 28 30 2C 49 2C |.0 . G: MAT(0,I,|
000039B0: 4A 29 B2 30 00 BE 41 5C 21 82 20 4A 2C 49 00 C4 |J).0..A\!. J,I..|
000039C0: 41 66 21 8E 00 D0 41 28 23 8F 20 44 41 54 41 53 |Af!...A(#. DATAS|
000039D0: 00 ED 41 8C 23 8F 20 42 45 5A 45 49 43 48 4E 55 |..A.#. BEZEICHNU|
000039E0: 4E 47 45 4E 20 44 45 52 20 4D 4F 44 49 00 FF 41 |NGEN DER MODI..A|
000039F0: 8D 23 83 20 55 50 4E 2D 52 45 43 48 4E 45 52 00 |.#. UPN-RECHNER.|
00003A00: 1F 42 8E 23 83 20 4C 49 4E 45 41 52 45 53 20 47 |.B.#. LINEARES G|
00003A10: 4C 45 49 43 48 55 4E 47 53 53 59 53 54 45 4D 00 |LEICHUNGSSYSTEM.|
00003A20: 3A 42 8F 23 83 20 49 4E 56 45 52 53 45 20 45 49 |:B.#. INVERSE EI|
00003A30: 4E 45 52 20 4D 41 54 52 49 58 00 5A 42 90 23 83 |NER MATRIX.ZB.#.|
00003A40: 20 44 45 54 45 52 4D 49 4E 41 4E 54 45 20 45 49 | DETERMINANTE EI|
00003A50: 4E 45 52 20 4D 41 54 52 49 58 00 72 42 91 23 83 |NER MATRIX.rB.#.|
00003A60: 20 52 41 4E 47 20 45 49 4E 45 52 20 4D 41 54 52 | RANG EINER MATR|
00003A70: 49 58 00 96 42 92 23 83 20 53 4B 41 4C 41 52 50 |IX..B.#. SKALARP|
00003A80: 52 4F 44 55 4B 54 20 5A 57 45 49 45 52 20 56 45 |RODUKT ZWEIER VE|
00003A90: 4B 54 4F 52 45 4E 00 AF 42 93 23 83 20 4E 4F 52 |KTOREN..B.#. NOR|
00003AA0: 4D 20 45 49 4E 45 53 20 56 45 4B 54 4F 52 53 00 |M EINES VEKTORS.|
00003AB0: CE 42 F0 23 8F 20 42 45 46 45 48 4C 45 20 44 45 |.B.#. BEFEHLE DE|
00003AC0: 53 20 55 50 4E 2D 52 45 43 48 4E 45 52 53 00 EC |S UPN-RECHNERS..|
00003AD0: 42 F1 23 83 20 4D 41 54 2C 56 45 4B 2C 53 4B 41 |B.#. MAT,VEK,SKA|
00003AE0: 2C 4D 44 52 2C 56 44 52 2C 53 44 52 00 0A 43 F7 |,MDR,VDR,SDR..C.|
00003AF0: 23 83 20 4D 2A 4D 2C 4D 2A 56 2C 56 2A 4D 2C 53 |#. M*M,M*V,V*M,S|
00003B00: 2A 4D 2C 4D 2A 53 2C 56 2A 56 00 28 43 FD 23 83 |*M,M*S,V*V.(C.#.|
00003B10: 20 53 2A 56 2C 56 2A 53 2C 53 2A 53 2C 4D 2B 4D | S*V,V*S,S*S,M+M|
00003B20: 2C 56 2B 56 2C 53 2B 53 00 46 43 03 24 83 20 4D |,V+V,S+S.FC.$. M|
00003B30: 2D 4D 2C 56 2D 56 2C 53 2D 53 2C 4D 54 52 2C 56 |-M,V-V,S-S,MTR,V|
00003B40: 54 52 2C 57 52 5A 00 64 43 09 24 83 20 53 5E 53 |TR,WRZ.dC.$. S^S|
00003B50: 2C 4D 5E 53 2C 53 2F 53 2C 31 2F 53 2C 4D 53 54 |,M^S,S/S,1/S,MST|
00003B60: 2C 56 53 54 00 82 43 0F 24 83 20 53 53 54 2C 4D |,VST..C.$. SST,M|
00003B70: 4C 53 2C 56 4C 53 2C 53 4C 53 2C 53 54 5A 2C 4E |LS,VLS,SLS,STZ,N|
00003B80: 45 55 00 A0 43 15 24 83 20 49 4E 56 2C 44 45 54 |EU..C.$. INV,DET|
00003B90: 2C 52 4E 47 2C 53 50 52 2C 4E 52 4D 2C 45 48 4D |,RNG,SPR,NRM,EHM|
00003BA0: 00 B6 43 54 24 8F 20 46 45 48 4C 45 52 4D 45 4C |..CT$. FEHLERMEL|
00003BB0: 44 55 4E 47 45 4E 00 DA 43 55 24 83 20 44 41 53 |DUNGEN..CU$. DAS|
00003BC0: 20 49 53 54 20 4B 45 49 4E 20 47 55 45 4C 54 49 | IST KEIN GUELTI|
00003BD0: 47 45 52 20 42 45 46 45 48 4C 00 F5 43 56 24 83 |GER BEFEHL..CV$.|
00003BE0: 20 4D 41 54 52 49 58 20 49 53 54 20 53 49 4E 47 | MATRIX IST SING|
00003BF0: 55 4C 41 45 52 00 0B 44 57 24 83 20 53 54 41 50 |ULAER..DW$. STAP|
00003C00: 45 4C 20 49 53 54 20 56 4F 4C 4C 00 21 44 58 24 |EL IST VOLL.!DX$|
00003C10: 83 20 53 54 41 50 45 4C 20 49 53 54 20 4C 45 45 |. STAPEL IST LEE|
00003C20: 52 00 41 44 59 24 83 20 44 49 4D 45 4E 53 49 4F |R.ADY$. DIMENSIO|
00003C30: 4E 45 4E 20 53 54 49 4D 4D 45 4E 20 4E 49 43 48 |NEN STIMMEN NICH|
00003C40: 54 00 5A 44 5A 24 83 20 56 45 4B 54 4F 52 20 50 |T.ZDZ$. VEKTOR P|
00003C50: 41 53 53 54 20 4E 49 43 48 54 00 76 44 5B 24 83 |ASST NICHT.vD[$.|
00003C60: 20 56 45 4B 54 4F 52 45 4E 20 50 41 53 53 45 4E | VEKTOREN PASSEN|
00003C70: 20 4E 49 43 48 54 00 8F 44 5C 24 83 20 53 4B 41 | NICHT..D\$. SKA|
00003C80: 4C 41 52 20 50 41 53 53 54 20 4E 49 43 48 54 00 |LAR PASST NICHT.|
00003C90: B2 44 5D 24 83 20 4D 41 54 52 49 58 20 49 53 54 |.D]$. MATRIX IST|
00003CA0: 20 4E 49 43 48 54 20 51 55 41 44 52 41 54 49 53 | NICHT QUADRATIS|
00003CB0: 43 48 00 CE 44 10 27 8F 20 43 4F 4D 4D 4F 44 4F |CH..D.'. COMMODO|
00003CC0: 52 45 2D 45 49 47 45 4E 48 45 49 54 45 4E 00 EC |RE-EIGENHEITEN..|
00003CD0: 44 1A 27 43 24 B2 C7 28 31 34 37 29 3A 20 8F 20 |D.'C$..(147): . |
00003CE0: 43 4C 45 41 52 20 53 43 52 45 45 4E 00 04 45 24 |CLEAR SCREEN..E$|
00003CF0: 27 44 24 B2 C7 28 32 30 29 3A 20 20 8F 20 44 45 |'D$..(20): . DE|
00003D00: 4C 45 54 45 00 21 45 2E 27 4C 24 B2 C7 28 31 35 |LETE.!E.'L$..(15|
00003D10: 37 29 3A 20 8F 20 43 55 52 53 4F 52 20 4C 45 46 |7): . CURSOR LEF|
00003D20: 54 00 39 45 38 27 52 24 B2 C7 28 31 33 29 3A 20 |T.9E8'R$..(13): |
00003D30: 20 8F 20 52 45 54 55 52 4E 00 50 45 42 27 53 24 | . RETURN.PEB'S$|
00003D40: B2 C7 28 31 34 34 29 3A 20 8F 20 42 4C 41 43 4B |..(144): . BLACK|
00003D50: 00 67 45 4C 27 57 24 B2 C7 28 35 29 3A 20 20 20 |.gEL'W$..(5): |
00003D60: 8F 20 57 48 49 54 45 00 7D 45 56 27 42 24 B2 C7 |. WHITE.}EV'B$..|
00003D70: 28 33 31 29 3A 20 20 8F 20 42 4C 55 45 00 98 45 |(31): . BLUE..E|
00003D80: 60 27 97 20 35 33 32 38 30 2C 31 34 3A 20 97 20 |`'. 53280,14: . |
00003D90: 35 33 32 38 31 2C 31 34 00 BA 45 74 27 8F 20 44 |53281,14..Et'. D|
00003DA0: 49 4D 45 4E 53 49 4F 4E 49 45 52 45 4E 20 55 4E |IMENSIONIEREN UN|
00003DB0: 44 20 45 49 4E 4C 45 53 45 4E 00 DB 45 7E 27 86 |D EINLESEN..E~'.|
00003DC0: 20 4D 41 54 28 48 2C 47 2C 47 29 2C 56 45 4B 28 | MAT(H,G,G),VEK(|
00003DD0: 48 2C 47 29 2C 53 4B 41 28 48 29 00 F0 45 88 27 |H,G),SKA(H)..E.'|
00003DE0: 86 20 4C 28 48 29 2C 4D 28 48 29 2C 4E 28 48 29 |. L(H),M(H),N(H)|
00003DF0: 00 09 46 92 27 86 20 4D 24 28 37 29 2C 4F 24 28 |..F.'. M$(7),O$(|
00003E00: 34 32 29 2C 46 24 28 39 29 00 23 46 9C 27 81 20 |42),F$(9).#F.'. |
00003E10: 49 B2 31 20 A4 20 37 3A 20 87 20 4D 24 28 49 29 |I.1 . 7: . M$(I)|
00003E20: 3A 20 82 00 3E 46 A6 27 81 20 49 B2 31 20 A4 20 |: ..>F.'. I.1 . |
00003E30: 34 32 3A 20 87 20 4F 24 28 49 29 3A 20 82 00 4C |42: . O$(I): ..L|
00003E40: 46 B0 27 81 20 49 B2 31 20 A4 20 39 00 6F 46 BA |F.'. I.1 . 9.oF.|
00003E50: 27 87 20 46 24 28 49 29 3A 20 46 24 28 49 29 B2 |'. F$(I): F$(I).|
00003E60: 22 3F 3F 3F 20 22 AA 46 24 28 49 29 AA 22 2E 00 |"??? ".F$(I)."..|
00003E70: 77 46 C4 27 82 20 49 00 80 46 D8 27 89 20 31 30 |wF.'. I..F.'. 10|
00003E80: 00 00 00 |... |
..&...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. ...
...."...................................
.... COPYRIGHT BY CHIP, DISK #5.003.1.A.
... MENUE...... C$;S$;" MATRIZEN-ALGEB
RA"...... I.1 . 7...(..: . W$;I;B$;M$(I)
...2.. I.1.<.. M$: . M$."1" . M$."7" . 6
0.Q.F.MO.E(M$): . C$;S$;M$(MO);B$.U.P..M
O.100,200,300,400,500,600,700...Z.. 8500
: . 10...D.. UPN-RECHNER...N.. W$;">>> "
;: O$."".H.X.. E$: . E$."" . 120.Z.... E
$.D$ . 135...... E$;: O$.O$.E$...... C(O
$).3 . 150...... 120. .... C(O$).1 . 120
.5...O$.H(O$,C(O$).1).D.... L$" "L$;.N..
.. 120.\.... B$: O.0.K.... I.1 . 42.....
. O$.O$(I) . O.I: . 160...... I...... O$
."RET" . ....... F$(1): . 100.I. .I..((O
.1).12).1.....J..((O.12.(I.1).1).3).1...
..K.O.12.(I.1).3.(J.1)...... I . 164,165
,166,167.2.... J . 168,169,170,171.L....
J . 172,173,174,175.F.... J . 176,177,1
78,179.X.... J . 180,181...... K . 1100,
1200,1300: . 100...... K . 2100,2200,230
0: . 100.X.... K . 3100,3200,3300: . 100
...... K . 3400,3400,3500: . 100...... K
. 3600,3600,3700: . 100.8.... K . 4100,
4200,4300: . 100.X.... K . 4400,4500,460
0: . 100.X.... K . 5100,5200,5300: . 100
...... K . 5400,5500,5600: . 100...... K
. 5700,6100,6200: . 100.X.... K . 6300,
6400,6500: . 100...... K . 6600,6700,680
0: . 100...... K . 7100,7200,7300: . 100
.8.... K . 7400,7500,7600: . 100.X.H.. L
INEARES GLEICHUNGSSYSTEM.|.M.. "$$$ ANZA
HL DER GLEICHUNGEN";...N.. N(0)...O.. "$
$$ ANZAHL DER UNBEKANNTEN";...P.. M(0).Q
.Q.. 8100: . JN . 205,210...R.. "*** EIN
GABE DER ";...S.. "KOEFFIZIENTENMATRIX:"
.'.T.ZZ.MZ: MZ.0: . 1121: MZ.ZZ.2.W.. 61
00.G.... 520: RG.SKA(0).R.... 6400.L....
"*** EINGABE DER ";...... "RECHTEN SEIT
E:": L(0).N(0).....ZZ.VZ: VZ.0: . 1231:
VZ.ZZ.....HOM.1.H.... I.1 . N(0).....MAT
(0,I,0).VEK(0,I)...... VEK(0,I)..0 . HOM
.0...... I...... 520: RNG.SKA(0).1.... "
\\\ SYSTEM IST ";.L.... RNG.RG . HOM.1 .
253.J.... "NICHT LOESBAR.": . 255......
HOM.0 . RNG.M(0) . 256...... "NUR TRIVI
AL LOESBAR."...... 8200: ..G.... RNG.M(0
) . 259...... "EINDEUTIG LOESBAR:"......
260...... "NICHT EINDEUTIG LOESBAR:"...
... 1.RNG . 270.=.... I.1 . RNG: C.MAT(0
,I,I).Y...MAT(0,I,0).MAT(0,I,0).C.J....
J.I . M(0).....MAT(0,I,J).MAT(0,I,J).C..
.... J,I...... RNG.2 . 280...... J.RNG .
2 . .1.U.... I.1 . J.1: C.MAT(0,I,J)...
..MAT(0,I,0).MAT(0,I,0).C.MAT(0,J,0)....
.. RNG.1.M(0) . 278.(.... L.RNG.1 . M(0)
.O...MAT(0,I,L).MAT(0,I,L).C.MAT(0,J,L).
W.... L.A.... I,J.S.... HOM.1 . 285.....
. J.1 . M(0)...... "### ( ";MAT(0,MAT(0,
0,J),0);...... .20)")"...... J.U.... RNG
.1.M(0) . 290...... I.RNG.1 . M(0)......
J.RNG.1 . M(0)... .MAT(0,I,J).(I.J)...!
.. J,I.5.".. RNG.1.M(0) . 299.J.#.. HOM.
0 . . 8300._.$.. L.RNG.1 . M(0).P.%.. I.
1 . M(0)...&.. "### [ ";MAT(0,MAT(0,0,I)
,L);...'.. .20)"]"...(.. I: . L.M(0) . 2
98.E.).. 8300.M.*.. L...+.. 8200: ....,.
. INVERSE EINER MATRIX...-.. MZ.1.H . .
F$(3): ..0.1.. "$$$ ORDNUNG DER MATRIX";
.F.2.. N(0): M(0).N(0).A.3.. 8100: . JN
. 305,310...6.ZZ.MZ: MZ.0: . 1120: MZ.ZZ
...;.. 6100...@.. 520: . SKA(0).N(0) . 3
30.B.E.. F$(2): . MO.1 . ..P.F.. 8200: .
...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.7.N.. J.1 . N(0).1.Q.O.P..(MAT(MZ,J
,J)): R.J.D.P.. I.J.1 . N(0)...Q.. .(MAT
(MZ,I,J))..P . 339...R.P..(MAT(MZ,I,J)):
R.I...S.. I...T.. R.J . 350.E.U.. L.1 .
N(0).V.V.X.MAT(0,R,L)...W.MAT(0,R,L).MA
T(0,J,L)...X.MAT(0,J,L).X...Y.X.MAT(MZ,R
,L)./.Z.MAT(MZ,R,L).MAT(MZ,J,L).A.[.MAT(
MZ,J,L).X.I.\.. L.\.^.. K.J.1 . N(0).Z._
.C.MAT(MZ,K,J).MAT(MZ,J,J)...`.. L.J.1 .
N(0)...A.MAT(MZ,K,L).MA(MZ,K,L).C.MA(MZ
,J,L)...B.. L.N.C.. L.1 . N(0)...D.MAT(0
,K,L).MAT(0,K,L).C.MAT(0,J,L)...E.. L,K,
J.!.H.. I.1 . N(0): C.MAT(MZ,I,I).6.I..
I.1.N(0) . 365.I.J.. J.I.1 . N(0).G.K.MA
T(MZ,I,J).MAT(MZ,I,J).C.O.L.. J...M.. J.
1 . N(0)...N.MAT(0,I,J).MAT(0,I,J).C...O
.. J,I...R.. N(0).2 . 380.O.S.. J.N(0) .
2 . .1...T.. I.1 . J.1: C.MAT(MZ,I,J)..
.U.. L.1 . N(0).&.V.MAT(0,I,L).MAT(0,I,L
).C.MAT(0,J,L).2.W.. L,I,J.>.|.MZ.MZ.1.M
.... MO.1 . ..I.... "*** INVERSE MATRIX:
".....ZZ.MZ: MZ.0: . 2111: MZ.ZZ...... 8
200: ....... DETERMINANTE EINER MATRIX.V
.... "$$$ ORDNUNG DER MATRIX";...... N(0
): M(0).N(0)...... 8100: . JN . 410,420.
&...ZZ.MZ: MZ.0: . 1120: MZ.ZZ.0.... 900
.K...SKA(0).(.1).MAT(0,0,0).\.B.. I.1 .
N(0).Y.C.SKA(0).SKA(0).MAT(0,I,I)...D..
I...L.. MO.1 . ....V.. "### DETERMINANTE
= "SKA(0)...... 8200: ..X.... RANG EINE
R MATRIX.....ZZ.MZ: MZ.0: . 1110: MZ.ZZ.
..... 900...... I.1 . NM.).... MAT(0,I,I
).0 . 535.1.... I.@...SKA(0).I.1.O.... M
O.5 . ..H.&.. "### RANG ="SKA(0).V.0.. 8
200: ....X.. SKALARPRODUKT ZWEIER VEKTOR
EN...Y.. VZ.1.H . . F$(3): ..M.B.. "$$$
ANZAHL DER ";...C.. "KOMPONENTEN";L(0)..
.G.. 8100: . JN . 610,620.$.L.. "*** EIN
GABE DES 1.VEKTORS:".B.M.ZZ.0: VZ.0: . 1
231: VZ.ZZ.E.Q.. "*** EINGABE DES 2.VEKT
ORS:"...R.VZ.VZ.1: L(VZ).L(0): . 1231...
V.SKA(0).0...W.. K.1 . L(0).H.X.SKA(0).S
KA(0).VEK(0,K).VEK(VZ,K).Y.Y.. K: VZ.VZ.
1...... MO.1 . ....... "### SKALARPRODUK
T = "SKA(0)...... 8200: ..2.... NORM EIN
ES VEKTORS.K.F.. "$$$ ANZAHL DER ";.D.G.
. "KOMPONENTEN";L(0)..K.. 8100: . JN .
710,720...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)...... K.....SKA
(0)..(SKA(0))...... MO.1 . ..&.... "###
NORM = "SKA(0).4.... 8200: ..V.... GAUSS
-ELIMINATION MIT PIVOT.X.... J.0 . M(0):
MAT(0,0,J).J: ......NM.N(0): . M(0).NM
. NM.M(0)...... J.1 . NM.F...P..(MAT(0,J
,J)): R.J: S.J.Y.... J.1.NM . 930......
I.J.1 . N(0)...... .(MAT(0,I,J))..P . 92
6."...P..(MAT(0,I,J)): R.I.*.... I.=....
P.1E.5 . 970.N.... K.J . N(0).C.... J.1
.M(0) . 946.V.... L.J.1 . M(0)...... .(M
AT(0,K,L))..P . 945.....P..(MAT(0,K,L)):
R.K: S.L...... L.V.... .(MAT(0,K,0))..P
. 948.....P..(MAT(0,K,0)): R.K: S.0....
.. K...... P.1E.5 . 960.'...MAT(0,J,J).0
: . 990.8.... K.0 . N(0).I.A.X.MAT(0,K,S
).C.B.MAT(0,K,S).MAT(0,K,J).T.C.MAT(0,K,
J).X.|.D.. K...E.MAT(0,0,0).MAT(0,0,0).1
...J.. R.J . 980...K.. L.0 . M(0).J.L.X.
MAT(0,R,L)...M.MAT(0,R,L).MAT(0,J,L)...N
.MAT(0,J,L).X...O.. L.. P.MAT(0,0,0).MAT
(0,0,0).1.. T.. J.1.N(0) . 989.A U.. K.J
.1 . N(0).] V.C.MAT(0,K,J).MAT(0,J,J).R
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.. ... J.. ..... ... EINGABE.
.!L.. MATRIX EINGEBEN./!M.. MZ.1.H . . F
$(3): ..;!Q.MZ.MZ.1.[!V.. "*** GROESSE D
ER MATRIX:".Z!W.. "$$$ ANZAHL DER ZEILEN
";..!X.. N(MZ)..!Y.. "$$$ ANZAHL DER SPA
LTEN";..!Z.. M(MZ).O![.. 8100: . JN . 11
10,1120..!`.. "*** ZEILENWEISE EINGABE:"
.."A.. I.1 . N(MZ): . J.1 . M(MZ)./"B..
"%%% MAT ("I","J") = ";.A"C.. MAT(MZ,I,J
).K"D.. J,I.H"J.. 8100: . JN . 1140,1150
.."T.. "*** ELEMENT ANGEBEN:".."U.. "$$$
ZEILE,SPALTE";I,J.."V.. "%%% MAT ("I","
J") = ";.R"W.. MAT(MZ,I,J).."X.. 1130.."
~...."... VEKTOR EINGEBEN..#... VZ.1.H .
. F$(3): ...#..VZ.VZ.1.@#... "&&& ZEILE
ODER SPALTE? ";.Z#... E$: . E$."*" . 12
19.N#... E$."Z" . 1215..#... E$."S" . 12
17..#... 1211..#... "ZEILE": VEK(VZ,0)..
1..#... 1220.Q#A.. "SPALTE": VEK(VZ,0)..
1..#B.. 1220..#C.. E$: VEK(VZ,0).0..$D..
"$$$ ANZAHL DER ";.%$E.. "KOMPONENTEN";
L(VZ).B$I.. 8100: . JN . 1210,1230.C$N..
"*** EINGABE DES VEKTORS:".U$O.. K.1 .
L(VZ)..$P.. "%%% VEK ("K") = ";..$Q.. VE
K(VZ,K)..$R.. K.D$X.. 8100: . JN . 1250,
1260..$... "$$$ WELCHE KOMPONENTE";K..$.
.. "%%% VEK ("K") = ";..%... VEK(VZ,K)..
%... 1240..%....5%... SKALAR EINGEBEN.O%
... SZ.1.H . . F$(3): ..[%..SZ.SZ.1.|%..
. "*** EINGABE DES SKALARS:"..%... "%%%
SKA = ";SKA(SZ)..%(.. 8100: . JN . 1311,
1330..%2...H%P.. AUSGABE..%4.. MATRIX AU
SGEBEN..%5.. MZ.1 . . F$(4): ...&>.. "**
* ERGEBNIS:"..&?.. I.1 . N(MZ).0&@.. J.1
. M(MZ).N&A.. "### MAT ("I","J") = ";.`
&B.. MAT(MZ,I,J).H&C.. J.}&D.. I.N(MZ) .
2118..&E.. 8300..&F.. I..&H....&... VEK
TOR AUSGEBEN.D&... VZ.1 . . F$(4): ...&.
.. "*** ERGEBNIS ";..&... VEK(VZ,0).2 .
2212,2213,2214..'... "(ZEILE):": . 2215.
,'... "(*):": . 2215.>'... "(SPALTE):".P
'... K.1 . L(VZ).R'... "### VEK ("K") =
"VEK(VZ,K).Z'... K..'.....'... SKALAR AU
SGEBEN..'... SZ.1 . . F$(4): ..D'... "**
* ERGEBNIS:"..'... "### SKA = "SKA(SZ)..
'.....'... MULTIPLIKATIONEN..(... MATRIX
* MATRIX.)(... MZ.2 . . F$(4): ..D(&..
N(MZ).M(MZ.1) . 3120.S(+.. F$(5): ..G(0.
. I.1 . N(MZ.1)..(1.. J.1 . M(MZ): MAT(0
,I,J).0..(2.. K.1 . N(MZ)..(3.X.MAT(MZ.1
,I,K).MAT(MZ,K,J).U(4.MAT(0,I,J).MAT(0,I
,J).X..(5.. K,J,I..(:.N(0).N(MZ.1): M(0)
.M(MZ)..)D.MZ.MZ.2: . 6100.!)N.. O.26 .
../)X.. 2100: ..E)... MATRIX * VEKTOR.])
... MZ.1 . . F$(4): ..U)... VZ.1 . . F$(
4): ...)... VEK(VZ,0)..1 . 3220..)... F$
(6): ...)... M(MZ).L(VZ) . 3230.F)... F$
(5): ...)... K.1 . N(MZ): VEK(0,K).0..).
.. J.1 . M(MZ)..* .X.MAT(MZ,K,J).VEK(VZ,
J).**..VEK(0,K).VEK(0,K).X.4*... J,K.P*.
.L(0).N(MZ): VEK(0,0)..1.M*..MZ.MZ.1: VZ
.VZ.1: . 6200.{*... 2200: ...*... VEKTOR
* MATRIX..*... VZ.1 . . F$(4): ..A*...
MZ.1 . . F$(4): ...*... VEK(VZ,0)..1 . 3
320..*... F$(6): ...+... L(VZ).N(MZ) . 3
330..+... F$(5): ..0+... K.1 . M(MZ): VE
K(0,K).0.B+... I.1 . N(MZ).^+..X.VEK(VZ,
I).MAT(MZ,I,K).V+..VEK(0,K).VEK(0,K).X..
+... I,K..+..L(0).M(MZ): VEK(0,0)..1..+.
.VZ.VZ.1: MZ.MZ.1: . 6200.G+ .. 2200: ..
.+H.. SKALAR * MATRIX..+I.. SZ.1 . . F$(
4): ...,J.. MZ.1 . . F$(4): ...,R.. I.1
. N(MZ): . J.1 . M(MZ).R,S.MAT(MZ,I,J).S
KA(SZ).MAT(MZ,I,J).\,T.. J,I.H,\.SZ.SZ.1
.V,F.. 2100: ...,... VEKTOR * VEKTOR..,.
.. VZ.2 . . F$(4): ..C,..Y.VEK(VZ.1,0):
Z.VEK(VZ,0).W,... Y.Z..1 . 3520..,... F$
(7): ...-... L(VZ.1).L(VZ) . 3530..-E..
F$(5): ..*-J.. VEK(VZ,0)..1 . 3550.D-T..
MZ.1.H . . F$(3): ..P-U.MZ.MZ.1.Q-V.. I
.1 . L(VZ): . J.1 . L(VZ)..-W.MAT(MZ,I,J
).VEK(VZ.1,I).VEK(VZ,J)..-X.. J,I..-Y.N(
MZ).L(VZ): M(MZ).L(VZ).J-Z.VZ.VZ.2.X-...
2100: ...-... SZ.1.H . . F$(3): ......S
Z.SZ.1: SKA(SZ).0...... K.1 . L(VZ).7...
X.VEK(VZ.1,K).VEK(VZ,K).M...SKA(SZ).SKA(
SZ).X.U.... K.A...VZ.VZ.2.O.... 2300: ..
..... SKALAR * VEKTOR...... SZ.1 . . F$(
4): ....... VZ.1 . . F$(4): ..O.... VEK(
VZ,0)..0 . 3620...... F$(6): ....$.. K.1
. L(VZ)../%.VEK(VZ,K).SKA(SZ).VEK(VZ,K)
../&.. K.$/..SZ.SZ.1.2/8.. 2200: ..H/T..
SKALAR * SKALAR.`/U.. SZ.2 . . F$(4): .
../~.SKA(SZ.1).SKA(SZ.1).SKA(SZ)../..SZ.
SZ.1../... 2300: .../ .. ADDITIONEN & SU
BTRAKTIONEN.Q/... MATRIX + MATRIX../...
MZ.2 . . F$(4): ...0... N(MZ.1).N(MZ) .
4120..0... F$(5): ...0... M(MZ.1).M(MZ)
. 4130.=0... F$(5): ..^0".. I.1 . N(MZ):
. J.1 . M(MZ).~0#.X.MAT(MZ.1,I,J).MAT(M
Z,I,J)..0$.MAT(MZ.1,I,J).X..0%.. J,I..0,
.MZ.MZ.1..06.. 2100: ..L0H.. VEKTOR + VE
KTOR..0I.. VZ.2 . . F$(4): ...1R.. VEK(V
Z.1,0).VEK(VZ,0) . 4220..1W.. F$(7): ..1
1|.. L(VZ.1).L(VZ) . 4230.@1... F$(5): .
.R1... K.1 . L(VZ).X1..VEK(VZ.1,K).VEK(V
Z.1,K).VEK(VZ,K)..1... K..1..VZ.VZ.1..1.
.. 2200: ...1L.. SKALAR + SKALAR.H1M.. S
Z.2 . . F$(4): ...1V.SKA(SZ.1).SKA(SZ.1)
.SKA(SZ)..1..SZ.SZ.1..2... 2300: ...20..
MATRIX - MATRIX.92:.. I.1 . N(MZ): . J.
1 . M(MZ).V2D.MAT(MZ,I,J)..MAT(MZ,I,J).`
2N.. J,I.N2X.. 4100: ...2... VEKTOR - VE
KTOR..2... K.1 . L(VZ)..2..VEK(VZ,K)..VE
K(VZ,K)..2... K.E2... 4200: ...2... SKAL
AR - SKALAR..2..SKA(SZ)..SKA(SZ)..2... 4
300: ...3... WEITERE OPERATIONEN.33... M
ATRIX TRANSPONIEREN.K3... MZ.1 . . F$(4)
: ..L3... I.1 . N(MZ): . J.1 . M(MZ)..3.
.MAT(0,J,I).MAT(MZ,I,J)..3... J,I..3..N(
0).M(MZ): M(0).N(MZ)..3..MZ.MZ.1: . 6100
.N3(.. 2100: ...3P.. VEKTOR TRANSPONIERE
N..4Q.. VZ.1 . . F$(4): ...4Z.VEK(VZ,0).
.VEK(VZ,0).(4D.. 2200: ..>4... WURZEL (S
KALAR).V4... SZ.1 . . F$(4): ..N4... SKA
(SZ)..0 . 5320.}4C.. F$(8): ...4H.SKA(SZ
)..(SKA(SZ))..4R.. 2300: ...4... SKALAR
^ SKALAR.P4... SZ.2 . . F$(4): ...4".. S
KA(SZ.1)..0 . 5430..5,.. SKA(SZ)..(SKA(S
Z)) . 5430..51.. F$(8): ..956.SKA(SZ.1).
SKA(SZ.1).SKA(SZ).E5@.SZ.SZ.1.S5J.. 2300
: ..I5|.. MATRIX ^ SKALAR..5}.. MZ.1 . .
F$(4): ...5~.. SZ.1 . . F$(4): ...5...
SKA(SZ)..0 . 5520..5... F$(8): ...5... S
KA(SZ)..(SKA(SZ)) . 5530..5... F$(8): ..
.6... N(MZ).M(MZ) . 5540..6... F$(9): ..
.6... SKA(SZ).0 . 5550.I6..SKA(SZ).N(MZ)
: MZ.MZ.1.W6... 7600: ..N6... SKA(SZ).1
. 5560..6..SZ.SZ.1: . 5590..6... 6400: M
Z.MZ.1: . 6100..6B.. N.1 . SKA(SZ).1.H6C
.. 3100: MZ.MZ.1.P6D.. N..6L.SZ.SZ.1: MZ
.MZ.1..6V.. 2100: ...7... SKALAR / SKALA
R.!7... SKA(SZ)..0 . 5620.07... F$(8): .
.F7..SKA(SZ).1.SKA(SZ).T7... 3700: ..E7D
.. 1 / SKALAR.}7E.. SZ.1 . . F$(4): ...7
N.. SKA(SZ)..0 . 5720..7S.. F$(8): ...7X
.SKA(SZ).1.SKA(SZ).H7B.. 2300: ...7P.. S
TAPELMANIPULATIONEN..8T.. MATRIX AUF STA
PEL BRINGEN..8U.. MZ.1.H . . F$(3): ..)8
..MZ.MZ.1.D8..N(MZ).N(0): M(MZ).M(0).C8.
.. I.1 . N(0): . J.1 . M(0).~8..MAT(MZ,I
,J).MAT(0,I,J)..8... J,I..8... O.29 . .
6700..8....B88.. VEKTOR AUF STAPEL BRING
EN..89.. VZ.1.H . . F$(3): ...8B.VZ.VZ.1
..8L.L(VZ).L(0)..9V.. K.0 . L(0)..9W.VEK
(VZ,K).VEK(0,K).'9X.. K.;9`.. O.30 . . 6
700.A9J...A9... SKALAR AUF STAPEL BRINGE
N.{9... SZ.1.H . . F$(3): ...9..SZ.SZ.1.
.9..SKA(SZ).SKA(0)..9... O.31 . . 6700..
9D...R9... MATRIX VOM STAPEL HOLEN..9...
MZ.1 . . F$(4): ...:... I.1 . N(MZ): .
J.1 . M(MZ).&:..MAT(0,I,J).MAT(MZ,I,J).0
:... J,I.K:..N(0).N(MZ): M(0).M(MZ).W:..
MZ.MZ.1.K:(.. O.32 . . 6700.Q:2....:D..
VEKTOR VOM STAPEL HOLEN..:E.. VZ.1 . . F
$(4): ...:N.. K.0 . L(VZ).P:O.VEK(0,K).V
EK(VZ,K).X:P.. K..:X.L(0).L(VZ)..:..VZ.V
Z.1..;... O.33 . . 6700..;....+;H.. SKAL
AR VOM STAPEL HOLEN.C;I.. SZ.1 . . F$(4)
: ..V;R.SKA(0).SKA(SZ).B;..SZ.SZ.1.V;...
O.34 . . 6700.|;.....;,.. STAPELZEIGER
AUSGEBEN..;6.. "*** STAPELZEIGER:".M;7..
"@@@ (MZ,VZ,SZ) = ";..;8.. "("MZ","VZ",
"SZ")"..;@....<... NEUSTART DES UPN-RECH
NERS.)<... 8100: . JN . 6830,6820.><..MZ
.0: VZ.0: SZ.0.D<....]<X.. ANDERE OPERAT
IONEN.K<... INVERSE..<... MZ.1 . . F$(4)
: ...<... MZ.1.H . . F$(3): ...<F.. N(MZ
).M(MZ) . 7120.E<K.. F$(9): ...<P.. 6400
: MZ.MZ.1: . 320..<U.. SKA(0)..N(0) . ..
.=Z.. 6100: . 2100: .. = .. DETERMINANTE
.8=!.. MZ.1 . . F$(4): ..Q=*.. N(MZ).M(M
Z) . 7220.`=/.. F$(9): ..R=4.. 6400: . 4
30..=>.. 6300: . 2300: ...=... RANG..=..
. MZ.1 . . F$(4): ...=... 6400: . 520.S=
... 6300: . 2300: ...=... SKALARPRODUKT.
.=... VZ.2 . . F$(4): ...>..Y.VEK(VZ.1,0
): Z.VEK(VZ,0).5>... Y.0 . Z.0 . 7420.D>
... F$(7): .._>... L(VZ).L(VZ.1) . 7430.
N>... F$(5): ...>... 6500: . 630..>... 6
300: . 2300: ...>L.. NORM..>M.. VZ.1 . .
F$(4): ..R>V.. VEK(VZ,0).0 . 7520..>[..
F$(6): ...>`.. 6500: . 730..?J.. 6300:
. 2300: ...?... EINHEITSMATRIX.8?... MZ.
1.H . . F$(3): ..P?... SZ.1 . . F$(4): .
.\?..MZ.MZ.1.P?D.. I.1 . SKA(SZ)..?E.. J
.1 . SKA(SZ)..?F.MAT(MZ,I,J)..(I.J)..?G.
. J,I.F?N.N(MZ).SKA(SZ): M(MZ).SKA(SZ).R
?X.SZ.SZ.1..?... 2100: ...?@.. GET-ROUTI
NEN..@... JA/NEIN..@... "&&& KORRIGIEREN
? ";.5@... E$: . E$."" . 8110.I@... E$."
J" . 8120.]@... E$."N" . 8130.H@... 8110
.|@... "JA": JN.1: ...@B.. "NEIN": JN.2:
...@. . RETURN..@. . "!!! <RETURN>".N@.
. E$: . E$..R$ . 8220..@& . "*** EINEN
MOMENT, BITTE."..@0 ...AL . SPACE..AV .
"!!! <SPACE>".0A. . E$: . E$.." " . 8320
.6A. ..YA4!. LOESCHEN DER ARBEITSSPEICHE
R.~A>!SKA(0).0: L(0).0: M(0).0: N(0).0..
AH!. I.0 . G: VEK(0,I).0..AR!. J.0 . G:
MAT(0,I,J).0..A\!. J,I.DAF!..PA(#. DATAS
..A.#. BEZEICHNUNGEN DER MODI..A.#. UPN-
RECHNER..B.#. LINEARES GLEICHUNGSSYSTEM.
:B.#. INVERSE EINER MATRIX.ZB.#. DETERMI
NANTE EINER MATRIX.RB.#. RANG EINER MATR
IX..B.#. SKALARPRODUKT ZWEIER VEKTOREN..
B.#. NORM EINES VEKTORS.NB.#. BEFEHLE DE
S UPN-RECHNERS..B.#. MAT,VEK,SKA,MDR,VDR
,SDR..C.#. 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.FC.$. M-M,V-V,S
-S,MTR,VTR,WRZ.DC.$. S^S,M^S,S/S,1/S,MST
,VST..C.$. SST,MLS,VLS,SLS,STZ,NEU. C.$.
INV,DET,RNG,SPR,NRM,EHM..CT$. FEHLERMEL
DUNGEN.ZCU$. DAS IST KEIN GUELTIGER BEFE
HL..CV$. MATRIX IST SINGULAER..DW$. STAP
EL IST VOLL.!DX$. STAPEL IST LEER.ADY$.
DIMENSIONEN STIMMEN NICHT.ZDZ$. VEKTOR P
ASST NICHT.VD[$. VEKTOREN PASSEN NICHT..
D\$. SKALAR PASST NICHT..D]$. MATRIX IST
NICHT QUADRATISCH.ND.'. COMMODORE-EIGEN
HEITEN..D.'C$.G(147): . CLEAR SCREEN..E$
'D$.G(20): . DELETE.!E.'L$.G(157): . CU
RSOR LEFT.9E8'R$.G(13): . RETURN.PEB'S$
.G(144): . BLACK.GEL'W$.G(5): . WHITE.
}EV'B$.G(31): . BLUE..E`'. 53280,14: .
53281,14..ET'. DIMENSIONIEREN UND EINLES
EN..E~'. MAT(H,G,G),VEK(H,G),SKA(H)..E.'
. L(H),M(H),N(H)..F.'. M$(7),O$(42),F$(9
).#F.'. I.1 . 7: . M$(I): ..>F.'. I.1 .
42: . O$(I): ..LF.'. I.1 . 9.OF.'. F$(I)
: F$(I)."??? ".F$(I)."..WFD'. I..FX'. 10
...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL