GAUSS-JORDAN V.2
FILE INFORMATION
FILENAME(S): GAUSS-JORDAN V.2
FILE TYPE(S): PRG
FILE SIZE: 4.1K
FIRST SEEN: 2025-11-30 01:07:57
APPEARS ON: 2 disk(s)
FILE HASH
14cb84ea3a9515d4a2efd5727b191cb41f6c316b04f3dbe0a6e6f058c3289753
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | GAUSS-JORDAN V.2 | PRG | Treasure Chest - Wolfgang Rauprich | 19 | 0 | DOWNLOAD FILE |
| L EHRNEN | GAUSS-JORDAN V.2 | PRG | Treasure Chest - Wolfgang Rauprich | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 05 00 97 20 35 33 32 38 30 2C 31 35 |.. .... 53280,15| 00000010: 3A 97 20 35 33 32 38 31 2C 31 32 3A 99 22 05 22 |:. 53281,12:."."| 00000020: 00 4D 08 0A 00 8F 20 53 49 4D 55 4C 54 41 4E 45 |.M.... SIMULTANE| 00000030: 20 4C 4F 45 53 55 4E 47 20 4C 49 4E 45 41 52 45 | LOESUNG LINEARE| 00000040: 52 20 47 4C 45 49 43 48 55 4E 47 45 4E 00 7A 08 |R GLEICHUNGEN.z.| 00000050: 0B 00 8F 20 4D 49 54 20 48 49 4C 46 45 20 44 45 |... MIT HILFE DE| 00000060: 52 20 47 41 55 53 53 2D 4A 4F 52 44 41 4E 2D 45 |R GAUSS-JORDAN-E| 00000070: 4C 49 4D 49 4E 41 54 49 4F 4E 00 AB 08 0C 00 8F |LIMINATION......| 00000080: 20 56 45 52 41 52 42 45 49 54 55 4E 47 20 4D 45 | VERARBEITUNG ME| 00000090: 48 52 46 41 43 48 45 52 20 4B 4F 4E 53 54 41 4E |HRFACHER KONSTAN| 000000A0: 54 45 4E 56 45 4B 54 4F 52 45 4E 00 BB 08 0D 00 |TENVEKTOREN.....| 000000B0: 8F 20 56 41 52 49 41 42 4C 45 4E 00 E6 08 0E 00 |. VARIABLEN.....| 000000C0: 8F 20 20 20 4E 33 20 20 20 20 20 41 4E 5A 41 48 |. N3 ANZAH| 000000D0: 4C 20 44 45 52 20 4C 4F 45 53 55 4E 47 53 56 45 |L DER LOESUNGSVE| 000000E0: 4B 54 4F 52 45 4E 00 03 09 0F 00 8F 20 20 20 45 |KTOREN...... E| 000000F0: 31 20 20 20 20 20 46 45 48 4C 45 52 41 4E 5A 45 |1 FEHLERANZE| 00000100: 49 47 45 00 22 09 10 00 8F 20 20 20 4D 31 20 20 |IGE.".... M1 | 00000110: 20 20 20 4D 41 58 49 4D 41 4C 45 20 4C 41 45 4E | MAXIMALE LAEN| 00000120: 47 45 00 43 09 11 00 8F 20 20 20 4E 31 20 20 20 |GE.C.... N1 | 00000130: 20 20 41 4E 5A 41 48 4C 20 44 45 52 20 5A 45 49 | ANZAHL DER ZEI| 00000140: 4C 45 4E 00 65 09 12 00 8F 20 20 20 4E 32 20 20 |LEN.e.... N2 | 00000150: 20 20 20 41 4E 5A 41 48 4C 20 44 45 52 20 53 50 | ANZAHL DER SP| 00000160: 41 4C 54 45 4E 00 80 09 13 00 8F 20 20 20 49 32 |ALTEN...... I2| 00000170: 20 20 20 20 20 48 49 4C 46 53 4D 41 54 52 49 58 | HILFSMATRIX| 00000180: 00 99 09 15 00 8F 20 45 4E 44 45 20 44 45 52 20 |...... ENDE DER | 00000190: 56 41 52 49 41 42 4C 45 4E 00 9F 09 1E 00 8F 00 |VARIABLEN.......| 000001A0: A8 09 50 00 4D 31 B2 38 00 D2 09 5A 00 86 20 5A |..P.M1.8...Z.. Z| 000001B0: 28 38 2C 38 29 2C 41 28 38 2C 38 29 2C 57 28 38 |(8,8),A(8,8),W(8| 000001C0: 2C 38 29 2C 42 28 38 2C 38 29 2C 49 32 28 38 2C |,8),B(8,8),I2(8,| 000001D0: 33 29 00 D8 09 64 00 8F 00 06 0A 6E 00 99 22 93 |3)...d.....n..".| 000001E0: 11 11 11 1D 1D 1D 1D 1D 1D 12 53 49 4D 55 4C 54 |..........SIMULT| 000001F0: 41 4E 45 20 4C 4F 45 53 55 4E 47 20 4D 49 54 20 |ANE LOESUNG MIT | 00000200: 48 49 4C 46 45 22 00 32 0A 73 00 99 22 11 1D 1D |HILFE".2.s.."...| 00000210: 1D 1D 1D 1D 12 44 45 52 20 47 41 55 53 53 2D 4A |.....DER GAUSS-J| 00000220: 4F 52 44 41 4E 2D 45 4C 49 4D 49 4E 41 54 49 4F |ORDAN-ELIMINATIO| 00000230: 4E 22 00 4E 0A 78 00 8D 20 35 30 30 3A 8F 20 45 |N".N.x.. 500:. E| 00000240: 49 4E 47 41 42 45 2D 52 4F 55 54 49 4E 45 00 70 |INGABE-ROUTINE.p| 00000250: 0A 82 00 8D 20 35 30 30 30 3A 8F 20 47 41 55 53 |.... 5000:. GAUS| 00000260: 53 2D 4A 4F 52 44 41 4E 2D 52 4F 55 54 49 4E 45 |S-JORDAN-ROUTINE| 00000270: 00 76 0A 8C 00 8F 00 87 0A 96 00 8B 20 4E 31 B1 |.v.......... N1.| 00000280: 35 20 A7 20 32 39 30 00 A1 0A A0 00 99 22 11 11 |5 . 290......"..| 00000290: 99 20 20 20 20 20 20 20 20 4D 41 54 52 49 58 22 |. MATRIX"| 000002A0: 3B 00 BD 0A AA 00 8B 20 4E 33 B1 30 20 A7 20 99 |;...... N3.0 . .| 000002B0: 22 4B 4F 4E 53 54 41 4E 54 45 4E 22 3B 00 C3 0A |"KONSTANTEN";...| 000002C0: B4 00 99 00 D2 0A BE 00 81 20 49 B2 31 20 A4 20 |......... I.1 . | 000002D0: 4E 31 00 E3 0A C8 00 3A 20 81 20 4A B2 31 20 A4 |N1.....: . J.1 .| 000002E0: 20 4E 32 00 F7 0A D2 00 3A 20 20 99 A3 31 31 29 | N2.....: ..11)| 000002F0: 41 28 49 2C 4A 29 3B 00 01 0B DC 00 3A 20 82 20 |A(I,J);.....: . | 00000300: 4A 00 14 0B E6 00 3A 20 8B 20 4E 33 B2 30 20 A7 |J.....: . N3.0 .| 00000310: 20 32 37 30 00 3A 0B F0 00 3A 20 81 20 4A B2 31 | 270.:...: . J.1| 00000320: 20 A4 20 4E 33 3A 8F 20 4B 4F 4E 53 54 41 4E 54 | . N3:. KONSTANT| 00000330: 45 4E 56 45 4B 54 4F 52 45 4E 00 4E 0B FA 00 3A |ENVEKTOREN.N...:| 00000340: 20 20 99 A3 31 30 29 5A 28 49 2C 4A 29 3B 00 58 | ..10)Z(I,J);.X| 00000350: 0B 04 01 3A 20 82 20 4A 00 60 0B 0E 01 3A 20 99 |...: . J.`...: .| 00000360: 00 68 0B 18 01 82 20 49 00 72 0B 22 01 99 22 11 |.h.... I.r."..".| 00000370: 05 22 00 B0 0B 2C 01 8B 20 45 31 B2 31 20 B0 20 |."...,.. E1.1 . | 00000380: 4E 33 B2 30 20 A7 20 99 A3 36 29 22 11 11 11 9E |N3.0 . ..6)"....| 00000390: 46 45 48 4C 45 52 3A 20 4D 41 54 52 49 58 20 53 |FEHLER: MATRIX S| 000003A0: 49 4E 47 55 4C 41 45 52 05 22 3A 89 20 34 30 30 |INGULAER.":. 400| 000003B0: 00 C8 0B 36 01 99 22 9F 20 20 20 20 20 20 20 20 |...6..". | 000003C0: 4C 4F 45 53 55 4E 47 22 00 CE 0B 40 01 99 00 DD |LOESUNG"...@....| 000003D0: 0B 4A 01 81 20 49 B2 31 20 A4 20 4E 32 00 EE 0B |.J.. I.1 . N2...| 000003E0: 54 01 3A 20 81 20 4A B2 31 20 A4 20 4E 33 00 10 |T.: . J.1 . N3..| 000003F0: 0C 5E 01 3A 20 20 99 A3 31 31 29 B5 28 57 28 49 |.^.: ..11).(W(I| 00000400: 2C 4A 29 AC 31 30 30 AA 2E 35 29 AD 31 30 30 3B |,J).100..5).100;| 00000410: 00 1A 0C 68 01 3A 20 82 20 4A 00 22 0C 72 01 3A |...h.: . J.".r.:| 00000420: 20 99 00 2A 0C 7C 01 82 20 49 00 33 0C 86 01 99 | ..*.|.. I.3....| 00000430: 22 05 22 00 3E 0C 90 01 89 20 39 39 39 39 00 44 |".".>.... 9999.D| 00000440: 0C F4 01 8F 00 5C 0C FE 01 8F 20 45 49 4E 47 41 |.....\.... EINGA| 00000450: 42 45 20 44 45 52 20 44 41 54 45 4E 00 62 0C 08 |BE DER DATEN.b..| 00000460: 02 8F 00 6B 0C 12 02 49 35 B2 31 00 71 0C 1C 02 |...k...I5.1.q...| 00000470: 99 00 97 0C 26 02 85 22 9F 1D 1D 1D 41 4E 5A 41 |....&.."....ANZA| 00000480: 48 4C 20 44 45 52 20 47 4C 45 49 43 48 55 4E 47 |HL DER GLEICHUNG| 00000490: 45 4E 3A 22 3B 4E 31 00 A1 0C 2B 02 99 22 11 05 |EN:";N1...+.."..| 000004A0: 22 00 B3 0C 30 02 8B 20 4E 31 B1 4D 31 20 A7 20 |"...0.. N1.M1 . | 000004B0: 35 35 30 00 C5 0C 3A 02 8B 20 4E 31 B3 32 20 A7 |550...:.. N1.2 .| 000004C0: 20 39 39 39 39 00 CF 0C 44 02 4E 32 B2 4E 31 00 | 9999...D.N2.N1.| 000004D0: F8 0C 4E 02 85 22 1D 1D 1D 41 4E 5A 41 48 4C 20 |..N.."...ANZAHL | 000004E0: 4B 4F 4E 53 54 41 4E 54 45 4E 56 45 4B 54 4F 52 |KONSTANTENVEKTOR| 000004F0: 45 4E 22 3B 4E 33 3A 99 00 1C 0D 58 02 8B 20 4E |EN";N3:....X.. N| 00000500: 33 B2 30 20 A7 20 49 35 B2 30 3A 8F 20 49 4E 56 |3.0 . I5.0:. INV| 00000510: 45 52 53 45 20 44 52 55 43 4B 45 4E 00 2B 0D 62 |ERSE DRUCKEN.+.b| 00000520: 02 81 20 49 B2 31 20 A4 20 4E 31 00 45 0D 6C 02 |.. I.1 . N1.E.l.| 00000530: 3A 20 99 22 1D 1D 1D 1D 1D 47 4C 45 49 43 48 55 |: .".....GLEICHU| 00000540: 4E 47 22 3B 49 00 56 0D 76 02 3A 20 81 20 4A B2 |NG";I.V.v.: . J.| 00000550: 31 20 A4 20 4E 32 00 69 0D 80 02 3A 20 20 99 A3 |1 . N2.i...: ..| 00000560: 32 30 29 4A 3B 22 20 22 3B 00 89 0D 8A 02 3A 20 |20)J;" ";.....: | 00000570: 20 85 20 41 28 49 2C 4A 29 3A 8F 20 4B 4F 45 46 | . A(I,J):. KOEF| 00000580: 46 49 5A 49 45 4E 54 45 4E 00 93 0D 94 02 3A 20 |FIZIENTEN.....: | 00000590: 82 20 4A 00 A6 0D 9E 02 3A 20 8B 20 4E 33 B3 31 |. J.....: . N3.1| 000005A0: 20 A7 20 37 31 30 00 B7 0D A8 02 3A 20 81 20 4A | . 710.....: . J| 000005B0: B2 31 20 A4 20 4E 33 00 F5 0D B2 02 3A 20 20 20 |.1 . N3.....: | 000005C0: 85 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." | 000005D0: 20 20 20 20 20 20 20 43 20 20 22 3B 5A 28 49 2C | C ";Z(I,| 000005E0: 4A 29 3A 8F 20 4B 4F 4E 53 54 41 4E 54 45 4E 56 |J):. KONSTANTENV| 000005F0: 45 4B 54 4F 52 00 FF 0D BC 02 3A 20 82 20 4A 00 |EKTOR.....: . J.| 00000600: 07 0E C6 02 82 20 49 00 0D 0E D0 02 8E 00 3D 0E |..... I.......=.| 00000610: 88 13 8F 20 47 41 55 53 53 2D 4A 4F 52 44 41 4E |... GAUSS-JORDAN| 00000620: 20 4D 41 54 52 49 58 2D 49 4E 56 45 52 53 49 4F | MATRIX-INVERSIO| 00000630: 4E 20 55 4E 44 20 4C 4F 45 53 55 4E 47 00 46 0E |N UND LOESUNG.F.| 00000640: 8D 13 99 22 05 22 00 6E 0E 92 13 8F 20 46 55 45 |...".".n.... FUE| 00000650: 52 20 4D 45 48 52 46 41 43 48 45 20 4B 4F 4E 53 |R MEHRFACHE KONS| 00000660: 54 41 4E 54 45 4E 56 45 4B 54 4F 52 45 4E 00 7E |TANTENVEKTOREN.~| 00000670: 0E 93 13 8F 20 56 41 52 49 41 42 4C 45 4E 00 A1 |.... VARIABLEN..| 00000680: 0E 95 13 8F 20 20 20 41 20 20 20 20 20 20 4B 4F |.... A KO| 00000690: 45 46 46 49 5A 49 45 4E 54 45 4E 4D 41 54 52 49 |EFFIZIENTENMATRI| 000006A0: 58 00 BB 0E 96 13 8F 20 20 20 42 20 20 20 20 20 |X...... B | 000006B0: 20 48 49 4C 46 53 41 52 52 41 59 00 D9 0E 97 13 | HILFSARRAY.....| 000006C0: 8F 20 20 20 42 31 20 20 20 20 20 47 52 4F 45 53 |. B1 GROES| 000006D0: 53 54 45 52 20 57 45 52 54 00 F9 0E 98 13 8F 20 |STER WERT...... | 000006E0: 20 20 5A 20 20 20 20 20 20 4B 4F 4E 53 54 41 4E | Z KONSTAN| 000006F0: 54 45 4E 56 45 4B 54 4F 52 00 16 0F 99 13 8F 20 |TENVEKTOR...... | 00000700: 20 20 44 33 20 20 20 20 20 44 45 54 45 52 4D 49 | D3 DETERMI| 00000710: 4E 41 4E 54 45 45 00 33 0F 9A 13 8F 20 20 20 45 |NANTEE.3.... E| 00000720: 31 20 20 20 20 20 46 45 48 4C 45 52 41 4E 5A 45 |1 FEHLERANZE| 00000730: 49 47 45 00 50 0F 9B 13 8F 20 20 20 48 31 20 20 |IGE.P.... H1 | 00000740: 20 20 20 48 49 4C 46 53 56 41 52 49 41 42 4C 45 | HILFSVARIABLE| 00000750: 00 6B 0F 9C 13 8F 20 20 20 49 32 20 20 20 20 20 |.k.... I2 | 00000760: 48 49 4C 46 53 4D 41 54 52 49 58 00 86 0F 9D 13 |HILFSMATRIX.....| 00000770: 8F 20 20 20 49 33 20 20 20 20 20 5A 45 49 4C 45 |. I3 ZEILE| 00000780: 4E 49 4E 44 45 58 00 A2 0F 9E 13 8F 20 20 20 49 |NINDEX...... I| 00000790: 34 20 20 20 20 20 53 50 41 4C 54 45 4E 49 4E 44 |4 SPALTENIND| 000007A0: 45 58 00 CF 0F 9F 13 8F 20 20 20 49 35 20 20 20 |EX...... I5 | 000007B0: 20 20 41 4E 5A 45 49 47 45 20 46 55 45 52 20 49 | ANZEIGE FUER I| 000007C0: 4E 56 45 52 53 45 53 20 44 52 55 43 4B 45 4E 00 |NVERSES DRUCKEN.| 000007D0: F0 0F A0 13 8F 20 20 20 4E 32 20 20 20 20 20 41 |..... N2 A| 000007E0: 4E 5A 41 48 4C 20 44 52 20 53 50 41 4C 54 45 4E |NZAHL DR SPALTEN| 000007F0: 00 1D 10 A1 13 8F 20 20 20 4E 33 20 20 20 20 20 |...... N3 | 00000800: 41 4E 5A 41 48 4C 20 44 45 52 20 4B 4F 4E 53 54 |ANZAHL DER KONST| 00000810: 41 4E 54 45 4E 56 45 4B 54 4F 52 45 4E 00 38 10 |ANTENVEKTOREN.8.| 00000820: A2 13 8F 20 20 20 50 31 20 20 20 20 20 50 49 56 |... P1 PIV| 00000830: 4F 54 2D 49 4E 44 45 58 00 56 10 A3 13 8F 20 20 |OT-INDEX.V.... | 00000840: 20 57 20 20 20 20 20 20 4C 4F 45 53 55 4E 47 53 | W LOESUNGS| 00000850: 4D 41 54 52 49 58 00 76 10 A4 13 8F 20 20 20 5A |MATRIX.v.... Z| 00000860: 20 20 20 20 20 20 4B 4F 4E 53 54 41 4E 54 45 4E | KONSTANTEN| 00000870: 56 45 4B 54 4F 52 00 8F 10 A5 13 8F 20 45 4E 44 |VEKTOR...... END| 00000880: 45 20 44 45 52 20 56 41 52 49 41 42 4C 45 4E 00 |E DER VARIABLEN.| 00000890: 95 10 D8 13 8F 00 9B 10 E2 13 8F 00 CC 10 EC 13 |................| 000008A0: 45 31 B2 30 3A 8F 20 57 49 52 44 20 31 20 47 45 |E1.0:. WIRD 1 GE| 000008B0: 53 45 54 5A 54 2C 46 41 4C 4C 53 20 4D 41 54 52 |SETZT,FALLS MATR| 000008C0: 49 58 20 53 49 4E 47 55 4C 41 45 52 00 F9 10 F6 |IX SINGULAER....| 000008D0: 13 49 35 B2 30 3A 8F 20 46 41 4C 4C 53 20 30 2C |.I5.0:. FALLS 0,| 000008E0: 44 52 55 43 4B 45 20 44 49 45 20 49 4E 56 45 52 |DRUCKE DIE INVER| 000008F0: 53 45 20 4D 41 54 52 49 58 00 FF 10 00 14 8F 00 |SE MATRIX.......| 00000900: 0A 11 0A 14 8F 20 4E 33 3D 31 00 16 11 14 14 81 |..... N3=1......| 00000910: 49 B2 31 A4 4E 32 00 24 11 1E 14 3A 20 81 4A B2 |I.1.N2.$...: .J.| 00000920: 31 A4 4E 32 00 39 11 28 14 3A 20 20 42 28 49 2C |1.N2.9.(.: B(I,| 00000930: 4A 29 B2 41 28 49 2C 4A 29 00 42 11 32 14 3A 20 |J).A(I,J).B.2.: | 00000940: 82 4A 00 53 11 3C 14 3A 20 81 20 4A B2 31 20 A4 |.J.S.<.: . J.1 .| 00000950: 20 4E 33 00 68 11 46 14 3A 20 20 57 28 49 2C 4A | N3.h.F.: W(I,J| 00000960: 29 B2 5A 28 49 2C 4A 29 00 72 11 50 14 3A 20 82 |).Z(I,J).r.P.: .| 00000970: 20 4A 00 82 11 5A 14 3A 20 49 32 28 49 2C 33 29 | J...Z.: I2(I,3)| 00000980: B2 30 00 8A 11 64 14 82 20 49 00 93 11 6E 14 44 |.0...d.. I...n.D| 00000990: 33 B2 31 00 9F 11 78 14 81 49 B2 31 A4 4E 32 00 |3.1...x..I.1.N2.| 000009A0: A7 11 82 14 3A 20 8F 00 D6 11 8C 14 3A 20 8F 20 |....: ......: . | 000009B0: 53 55 43 48 45 20 4E 41 43 48 20 44 45 4D 20 47 |SUCHE NACH DEM G| 000009C0: 52 4F 45 53 53 54 45 4E 20 50 49 56 4F 54 2D 45 |ROESSTEN PIVOT-E| 000009D0: 4C 45 4D 45 4E 54 00 DE 11 96 14 3A 20 8F 00 E9 |LEMENT.....: ...| 000009E0: 11 A0 14 3A 20 42 31 B2 30 00 FA 11 AA 14 3A 20 |...: B1.0.....: | 000009F0: 81 20 4A B2 31 20 A4 20 4E 32 00 14 12 B4 14 3A |. J.1 . N2.....:| 00000A00: 20 20 8B 20 49 32 28 4A 2C 33 29 B2 31 20 A7 20 | . I2(J,3).1 . | 00000A10: 35 33 39 30 00 26 12 BE 14 3A 20 20 81 20 4B B2 |5390.&...: . K.| 00000A20: 31 20 A4 20 4E 32 00 41 12 C8 14 3A 20 20 20 8B |1 . N2.A...: .| 00000A30: 20 49 32 28 4B 2C 33 29 B1 31 20 A7 20 36 31 33 | I2(K,3).1 . 613| 00000A40: 30 00 5B 12 D2 14 3A 20 20 20 8B 28 49 32 28 4B |0.[...: .(I2(K| 00000A50: 2C 33 29 B2 31 29 A7 35 33 38 30 00 79 12 DC 14 |,3).1).5380.y...| 00000A60: 3A 20 20 20 8B 28 42 31 B1 B2 B6 28 42 28 4A 2C |: .(B1...(B(J,| 00000A70: 4B 29 29 29 A7 35 33 38 30 00 86 12 E6 14 3A 20 |K))).5380.....: | 00000A80: 20 20 49 33 B2 4A 00 93 12 F0 14 3A 20 20 20 49 | I3.J.....: I| 00000A90: 34 B2 4B 00 A8 12 FA 14 3A 20 20 20 42 31 B2 B6 |4.K.....: B1..| 00000AA0: 28 42 28 4A 2C 4B 29 29 00 B2 12 04 15 3A 20 20 |(B(J,K)).....: | 00000AB0: 82 4B 00 BB 12 0E 15 3A 20 82 4A 00 D5 12 18 15 |.K.....: .J.....| 00000AC0: 3A 20 49 32 28 49 34 2C 33 29 B2 49 32 28 49 34 |: I2(I4,3).I2(I4| 00000AD0: 2C 33 29 AA 31 00 E6 12 22 15 3A 20 49 32 28 49 |,3).1...".: I2(I| 00000AE0: 2C 31 29 B2 49 33 00 F7 12 2C 15 3A 20 49 32 28 |,1).I3...,.: I2(| 00000AF0: 49 2C 32 29 B2 49 34 00 43 13 36 15 3A 20 8F 20 |I,2).I4.C.6.: . | 00000B00: 5A 45 49 4C 45 4E 56 45 52 54 41 55 53 43 48 55 |ZEILENVERTAUSCHU| 00000B10: 4E 47 2C 55 4D 20 44 41 53 20 50 49 56 4F 54 2D |NG,UM DAS PIVOT-| 00000B20: 45 4C 45 4D 45 4E 54 20 49 4E 20 44 49 45 20 44 |ELEMENT IN DIE D| 00000B30: 49 41 47 4F 4E 41 4C 45 20 5A 55 20 42 52 49 4E |IAGONALE ZU BRIN| 00000B40: 47 45 4E 00 57 13 40 15 3A 20 8B 28 49 33 B2 49 |GEN.W.@.: .(I3.I| 00000B50: 34 29 A7 35 35 38 30 00 64 13 4A 15 3A 20 44 33 |4).5580.d.J.: D3| 00000B60: B2 AB 44 33 00 72 13 54 15 3A 20 81 4C B2 31 A4 |..D3.r.T.: .L.1.| 00000B70: 4E 32 00 84 13 5E 15 3A 20 20 48 31 B2 42 28 49 |N2...^.: H1.B(I| 00000B80: 33 2C 4C 29 00 9B 13 68 15 3A 20 20 42 28 49 33 |3,L)...h.: B(I3| 00000B90: 2C 4C 29 B2 42 28 49 34 2C 4C 29 00 AD 13 72 15 |,L).B(I4,L)...r.| 00000BA0: 3A 20 20 42 28 49 34 2C 4C 29 B2 48 31 00 B6 13 |: B(I4,L).H1...| 00000BB0: 7C 15 3A 20 82 4C 00 C9 13 86 15 3A 20 8B 28 4E ||.: .L.....: .(N| 00000BC0: 33 B3 31 29 A7 35 35 38 30 00 D7 13 90 15 3A 20 |3.1).5580.....: | 00000BD0: 81 4C B2 31 A4 4E 33 00 E9 13 9A 15 3A 20 20 48 |.L.1.N3.....: H| 00000BE0: 31 B2 57 28 49 33 2C 4C 29 00 00 14 A4 15 3A 20 |1.W(I3,L).....: | 00000BF0: 20 57 28 49 33 2C 4C 29 B2 57 28 49 34 2C 4C 29 | W(I3,L).W(I4,L)| 00000C00: 00 12 14 AE 15 3A 20 20 57 28 49 34 2C 4C 29 B2 |.....: W(I4,L).| 00000C10: 48 31 00 1B 14 B8 15 3A 20 82 4C 00 50 14 C2 15 |H1.....: .L.P...| 00000C20: 3A 20 8F 20 44 49 56 49 53 49 4F 4E 20 56 4F 4E |: . DIVISION VON| 00000C30: 20 50 49 56 4F 54 2D 5A 45 49 4C 45 20 44 55 52 | PIVOT-ZEILE DUR| 00000C40: 43 48 20 50 49 56 4F 54 2D 45 4C 45 4D 45 4E 54 |CH PIVOT-ELEMENT| 00000C50: 00 62 14 CC 15 3A 20 50 31 B2 42 28 49 34 2C 49 |.b...: P1.B(I4,I| 00000C60: 34 29 00 71 14 D6 15 3A 20 44 33 B2 44 33 AC 50 |4).q...: D3.D3.P| 00000C70: 31 00 82 14 E0 15 3A 20 42 28 49 34 2C 49 34 29 |1.....: B(I4,I4)| 00000C80: B2 31 00 90 14 EA 15 3A 20 81 4C B2 31 A4 4E 32 |.1.....: .L.1.N2| 00000C90: 00 AA 14 F4 15 3A 20 20 42 28 49 34 2C 4C 29 B2 |.....: B(I4,L).| 00000CA0: 42 28 49 34 2C 4C 29 AD 50 31 00 B3 14 FE 15 3A |B(I4,L).P1.....:| 00000CB0: 20 82 4C 00 C6 14 08 16 3A 20 8B 28 4E 33 B3 31 | .L.....: .(N3.1| 00000CC0: 29 A7 35 37 30 30 00 D4 14 12 16 3A 20 81 4C B2 |).5700.....: .L.| 00000CD0: 31 A4 4E 33 00 EE 14 1C 16 3A 20 20 57 28 49 34 |1.N3.....: W(I4| 00000CE0: 2C 4C 29 B2 57 28 49 34 2C 4C 29 AD 50 31 00 F7 |,L).W(I4,L).P1..| 00000CF0: 14 26 16 3A 20 82 4C 00 FF 14 30 16 3A 20 8F 00 |.&.: .L...0.: ..| 00000D00: 23 15 3A 16 3A 20 8F 20 52 45 44 55 5A 49 45 52 |#.:.: . REDUZIER| 00000D10: 45 20 4E 49 43 48 54 2D 50 49 56 4F 54 2D 5A 45 |E NICHT-PIVOT-ZE| 00000D20: 49 4C 45 00 32 15 44 16 3A 20 81 4C 31 B2 31 A4 |ILE.2.D.: .L1.1.| 00000D30: 4E 32 00 47 15 4E 16 3A 20 20 8B 28 4C 31 B2 49 |N2.G.N.: .(L1.I| 00000D40: 34 29 A7 35 38 31 30 00 59 15 58 16 3A 20 20 54 |4).5810.Y.X.: T| 00000D50: B2 42 28 4C 31 2C 49 34 29 00 6B 15 62 16 3A 20 |.B(L1,I4).k.b.: | 00000D60: 20 42 28 4C 31 2C 49 34 29 B2 30 00 79 15 6C 16 | B(L1,I4).0.y.l.| 00000D70: 3A 20 81 4C B2 31 A4 4E 32 00 9A 15 76 16 3A 20 |: .L.1.N2...v.: | 00000D80: 20 42 28 4C 31 2C 4C 29 B2 42 28 4C 31 2C 4C 29 | B(L1,L).B(L1,L)| 00000D90: AB 42 28 49 34 2C 4C 29 AC 54 00 A3 15 80 16 3A |.B(I4,L).T.....:| 00000DA0: 20 82 4C 00 B6 15 8A 16 3A 20 8B 28 4E 33 B3 31 | .L.....: .(N3.1| 00000DB0: 29 A7 35 38 31 30 00 C4 15 94 16 3A 20 81 4C B2 |).5810.....: .L.| 00000DC0: 31 A4 4E 33 00 E5 15 9E 16 3A 20 20 57 28 4C 31 |1.N3.....: W(L1| 00000DD0: 2C 4C 29 B2 57 28 4C 31 2C 4C 29 AB 57 28 49 34 |,L).W(L1,L).W(I4| 00000DE0: 2C 4C 29 AC 54 00 EE 15 A8 16 3A 20 82 4C 00 F7 |,L).T.....: .L..| 00000DF0: 15 B2 16 3A 82 4C 31 00 FE 15 BC 16 82 49 00 04 |...:.L1......I..| 00000E00: 16 C6 16 8F 00 1E 16 D0 16 8F 20 53 50 41 4C 54 |.......... SPALT| 00000E10: 45 4E 56 45 52 54 41 55 53 43 48 55 4E 47 00 24 |ENVERTAUSCHUNG.$| 00000E20: 16 DA 16 8F 00 30 16 E4 16 81 49 B2 31 A4 4E 32 |.....0....I.1.N2| 00000E30: 00 3F 16 EE 16 3A 20 4C B2 4E 32 AB 49 AA 31 00 |.?...: L.N2.I.1.| 00000E40: 5D 16 F8 16 3A 20 8B 28 49 32 28 4C 2C 31 29 B2 |]...: .(I2(L,1).| 00000E50: 49 32 28 4C 2C 32 29 29 A7 35 39 36 30 00 6E 16 |I2(L,2)).5960.n.| 00000E60: 02 17 3A 20 49 33 B2 49 32 28 4C 2C 31 29 00 7F |..: I3.I2(L,1)..| 00000E70: 16 0C 17 3A 20 49 34 B2 49 32 28 4C 2C 32 29 00 |...: I4.I2(L,2).| 00000E80: 8D 16 16 17 3A 20 81 4B B2 31 A4 4E 32 00 9F 16 |....: .K.1.N2...| 00000E90: 20 17 3A 20 20 48 31 B2 42 28 4B 2C 49 33 29 00 | .: H1.B(K,I3).| 00000EA0: B6 16 2A 17 3A 20 20 42 28 4B 2C 49 33 29 B2 42 |..*.: B(K,I3).B| 00000EB0: 28 4B 2C 49 34 29 00 C8 16 34 17 3A 20 20 42 28 |(K,I4)...4.: B(| 00000EC0: 4B 2C 49 34 29 B2 48 31 00 D1 16 3E 17 3A 20 82 |K,I4).H1...>.: .| 00000ED0: 4B 00 D8 16 48 17 82 49 00 E4 16 52 17 81 4B B2 |K...H..I...R..K.| 00000EE0: 31 A4 4E 32 00 FD 16 5C 17 3A 20 8B 28 49 32 28 |1.N2...\.: .(I2(| 00000EF0: 4B 2C 33 29 B3 B1 31 29 A7 36 31 33 30 00 04 17 |K,3)..1).6130...| 00000F00: 66 17 82 4B 00 0D 17 70 17 45 31 B2 30 00 1E 17 |f..K...p.E1.0...| 00000F10: 7A 17 8B 28 49 35 B2 31 29 A7 36 31 35 30 00 24 |z..(I5.1).6150.$| 00000F20: 17 84 17 99 00 47 17 8E 17 99 22 93 9E 11 1D 1D |.....G....".....| 00000F30: 1D 1D 1D 1D 1D 1D 49 4E 56 45 52 53 45 20 4D 41 |......INVERSE MA| 00000F40: 54 52 49 58 22 3A 99 00 53 17 98 17 81 49 B2 31 |TRIX":..S....I.1| 00000F50: A4 4E 32 00 61 17 A2 17 3A 20 81 4A B2 31 A4 4E |.N2.a...: .J.1.N| 00000F60: 32 00 83 17 AC 17 3A 20 20 99 A3 31 31 29 B5 28 |2.....: ..11).(| 00000F70: 42 28 49 2C 4A 29 AC 31 30 30 AA 2E 35 29 AD 31 |B(I,J).100..5).1| 00000F80: 30 30 3B 00 8C 17 B6 17 3A 20 82 4A 00 94 17 C0 |00;.....: .J....| 00000F90: 17 3A 20 99 00 9B 17 CA 17 82 49 00 A4 17 D4 17 |.: .......I.....| 00000FA0: 99 22 05 22 00 C4 17 DE 17 99 22 1D 1D 1D 1D 1D |."."......".....| 00000FB0: 1D 1D 1D 44 45 54 45 52 4D 49 4E 41 4E 54 45 3D |...DETERMINANTE=| 00000FC0: 22 3B 44 33 00 EC 17 E8 17 8E 3A 8F 20 46 41 4C |";D3......:. FAL| 00000FD0: 4C 53 20 44 49 45 20 49 4E 56 45 52 53 45 20 47 |LS DIE INVERSE G| 00000FE0: 45 44 52 55 43 4B 54 20 57 49 52 44 00 F5 17 F2 |EDRUCKT WIRD....| 00000FF0: 17 45 31 B2 31 00 22 18 06 18 8E 3A 8F 20 45 4E |.E1.1."....:. EN| 00001000: 44 45 20 44 45 53 20 47 41 55 53 53 2D 4A 4F 52 |DE DES GAUSS-JOR| 00001010: 44 41 4E 2D 55 4E 54 45 52 50 52 4F 47 52 41 4D |DAN-UNTERPROGRAM| 00001020: 4D 53 00 28 18 0F 27 80 00 31 18 CC D8 3A 20 82 |MS.(..'..1...: .| 00001030: 4C 00 00 00 FF 10 20 F0 53 |L..... .S |
.. .... 53280,15:. 53281,12:.".".M.... S
IMULTANE LOESUNG LINEARER GLEICHUNGEN.Z.
... MIT HILFE DER GAUSS-JORDAN-ELIMINATI
ON...... VERARBEITUNG MEHRFACHER KONSTAN
TENVEKTOREN...... VARIABLEN...... N3
ANZAHL DER LOESUNGSVEKTOREN...... E
1 FEHLERANZEIGE.".... M1 MAXIM
ALE LAENGE.C.... N1 ANZAHL DER ZEI
LEN.E.... N2 ANZAHL DER SPALTEN...
... I2 HILFSMATRIX...... ENDE DER
VARIABLEN.........P.M1.8.R.Z.. Z(8,8),A(
8,8),W(8,8),B(8,8),I2(8,3).X.D.....N..".
..........SIMULTANE LOESUNG MIT HILFE".2
.S.."........DER GAUSS-JORDAN-ELIMINATIO
N".N.X.. 500:. EINGABE-ROUTINE.P.... 500
0:. GAUSS-JORDAN-ROUTINE.V.......... N1.
5 . 290... .."... MATRIX";......
N3.0 . ."KONSTANTEN";.C.....R.... I.1 .
N1...H.: . J.1 . N2...R.: ..11)A(I,J);.
....: . J.....: . N3.0 . 270.:...: . J.1
. N3:. KONSTANTENVEKTOREN.N...: ..10)Z
(I,J);.X...: . J.`...: ..H.... I.R."..".
."...,.. E1.1 . N3.0 . ..6)"....FEHLER:
MATRIX SINGULAER.":. 400.H.6..".
LOESUNG".N.@.....J.. I.1 . N2...T.: . J.
1 . N3...^.: ..11).(W(I,J).100..5).100;
...H.: . J.".R.: ..*.|.. I.3....".".>...
. 9999.D.....\.... EINGABE DER DATEN.B..
...K...I5.1.Q.......&.."....ANZAHL DER G
LEICHUNGEN:";N1...+..".."...0.. N1.M1 .
550.E.:.. N1.2 . 9999.O.D.N2.N1...N.."..
.ANZAHL KONSTANTENVEKTOREN";N3:....X.. N
3.0 . I5.0:. INVERSE DRUCKEN.+.B.. I.1 .
N1.E.L.: .".....GLEICHUNG";I.V.V.: . J.
1 . N2.I...: ..20)J;" ";.....: . A(I,J
):. KOEFFIZIENTEN.....: . J.....: . N3.1
. 710.....: . J.1 . N3.....: ."
C ";Z(I,J):. KONSTANTENV
EKTOR.....: . J...F.. I...P...=.... GAUS
S-JORDAN MATRIX-INVERSION UND LOESUNG.F.
...".".N.... FUER MEHRFACHE KONSTANTENVE
KTOREN.~.... VARIABLEN...... A KO
EFFIZIENTENMATRIX...... B HILFSAR
RAY.Y.... B1 GROESSTER WERT......
Z KONSTANTENVEKTOR...... D3
DETERMINANTEE.3.... E1 FEHLERANZE
IGE.P.... H1 HILFSVARIABLE.K....
I2 HILFSMATRIX...... I3 ZEILE
NINDEX...... I4 SPALTENINDEX.O....
I5 ANZEIGE FUER INVERSES DRUCKEN.
.. .. N2 ANZAHL DR SPALTEN......
N3 ANZAHL DER KONSTANTENVEKTOREN.8.
... P1 PIVOT-INDEX.V.... W
LOESUNGSMATRIX.V.... Z KONSTANTEN
VEKTOR...... ENDE DER VARIABLEN...X.....
....L...E1.0:. WIRD 1 GESETZT,FALLS MATR
IX SINGULAER.....I5.0:. FALLS 0,DRUCKE D
IE INVERSE MATRIX............ N3=1......
I.1.N2.$...: .J.1.N2.9.(.: B(I,J).A(I,J
).B.2.: .J.S.<.: . J.1 . N3.H.F.: W(I,J
).Z(I,J).R.P.: . J...Z.: I2(I,3).0...D..
I...N.D3.1...X..I.1.N2.....: ..V...: .
SUCHE NACH DEM GROESSTEN PIVOT-ELEMENT..
...: .... .: B1.0.....: . J.1 . N2.....:
. I2(J,3).1 . 5390.&...: . K.1 . N2.A
.H.: . I2(K,3).1 . 6130.[.R.: .(I2(K
,3).1).5380.Y...: .(B1...(B(J,K))).538
0.....: I3.J.....: I4.K.....: B1..
(B(J,K)).....: .K.....: .J.U...: I2(I4,
3).I2(I4,3).1...".: I2(I,1).I3...,.: I2(
I,2).I4.C.6.: . ZEILENVERTAUSCHUNG,UM DA
S PIVOT-ELEMENT IN DIE DIAGONALE ZU BRIN
GEN.W.@.: .(I3.I4).5580.D.J.: D3..D3.R.T
.: .L.1.N2...^.: H1.B(I3,L)...H.: B(I3
,L).B(I4,L)...R.: B(I4,L).H1...|.: .L.I
...: .(N3.1).5580.W...: .L.1.N3.....: H
1.W(I3,L).....: W(I3,L).W(I4,L).....:
W(I4,L).H1.....: .L.P.B.: . DIVISION VON
PIVOT-ZEILE DURCH PIVOT-ELEMENT.B.L.: P
1.B(I4,I4).Q.V.: D3.D3.P1.....: B(I4,I4)
.1.....: .L.1.N2.....: B(I4,L).B(I4,L).
P1.....: .L.F...: .(N3.1).5700.T...: .L.
1.N3.....: W(I4,L).W(I4,L).P1...&.: .L.
..0.: ..#.:.: . REDUZIERE NICHT-PIVOT-ZE
ILE.2.D.: .L1.1.N2.G.N.: .(L1.I4).5810.
Y.X.: T.B(L1,I4).K.B.: B(L1,I4).0.Y.L.
: .L.1.N2...V.: B(L1,L).B(L1,L).B(I4,L)
.T.....: .L.....: .(N3.1).5810.D...: .L.
1.N3.....: W(L1,L).W(L1,L).W(I4,L).T...
..: .L.....:.L1......I...F.....P.. SPALT
ENVERTAUSCHUNG.$.Z...0....I.1.N2.?...: L
.N2.I.1.]...: .(I2(L,1).I2(L,2)).5960.N.
..: I3.I2(L,1)....: I4.I2(L,2).....: .K
.1.N2... .: H1.B(K,I3)...*.: B(K,I3).B
(K,I4).H.4.: B(K,I4).H1.Q.>.: .K.X.H..I
...R..K.1.N2...\.: .(I2(K,3)..1).6130...
F..K...P.E1.0...Z..(I5.1).6150.$.....G..
.."...........INVERSE MATRIX":..S....I.1
.N2.A...: .J.1.N2.....: ..11).(B(I,J).1
00..5).100;.....: .J.....: ....J..I...T.
.".".D...."........DETERMINANTE=";D3....
..:. FALLS DIE INVERSE GEDRUCKT WIRD....
.E1.1."....:. ENDE DES GAUSS-JORDAN-UNTE
RPROGRAMMS.(..'..1.LX: .L..... .S
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL