LINEARE.GLEICHU

00000000: 01 08 1A 08 05 00 99 C7  28 31 34 37 29 3A 45 25  |........(147):E%|
00000010: B2 30 3A 47 45 B2 31 30  AE 33 00 39 08 0A 00 85  |.0:GE.10.3.9....|
00000020: 20 22 44 49 4D 45 4E 53  49 4F 4E 20 44 45 52 20  | "DIMENSION DER |
00000030: 4D 41 54 52 49 58 22 3B  4E 00 55 08 14 00 86 20  |MATRIX";N.U.... |
00000040: 41 28 4E 2C 4E 29 2C 41  49 28 4E 2C 4E 29 2C 55  |A(N,N),AI(N,N),U|
00000050: 28 4E 2C 4E 29 00 6C 08  19 00 86 20 42 28 4E 29  |(N,N).l.... B(N)|
00000060: 2C 58 28 4E 29 2C 5A 28  4E 2C 4E 29 00 84 08 1E  |,X(N),Z(N,N)....|
00000070: 00 81 20 49 B2 31 20 A4  20 4E 3A 81 20 4A B2 31  |.. I.1 . N:. J.1|
00000080: 20 A4 20 4E 00 A3 08 28  00 99 20 22 5A 45 49 4C  | . N...(.. "ZEIL|
00000090: 45 3A 20 22 3B 49 3B 22  53 50 41 4C 54 45 3A 22  |E: ";I;"SPALTE:"|
000000A0: 3B 4A 3B 00 B8 08 32 00  85 20 41 28 49 2C 4A 29  |;J;...2.. A(I,J)|
000000B0: 3A 82 20 4A 3A 82 20 49  00 C3 08 37 00 43 24 B2  |:. J:. I...7.C$.|
000000C0: 54 49 24 00 D5 08 3C 00  8D 20 31 30 30 30 3A 45  |TI$...<.. 1000:E|
000000D0: 24 B2 54 49 24 00 E7 08  3F 00 8B 20 45 25 B2 31  |$.TI$...?.. E%.1|
000000E0: 20 A7 20 44 45 B2 30 00  01 09 41 00 99 C7 28 31  | . DE.0...A...(1|
000000F0: 34 37 29 3A 99 22 44 45  54 2E 20 3D 20 22 3B 44  |47):."DET. = ";D|
00000100: 45 00 1C 09 43 00 99 3A  99 22 49 4E 56 45 52 53  |E...C..:."INVERS|
00000110: 45 20 4D 41 54 52 49 5A  45 22 3A 99 00 34 09 46  |E MATRIZE":..4.F|
00000120: 00 81 20 49 B2 31 20 A4  20 4E 3A 81 20 4A B2 31  |.. I.1 . N:. J.1|
00000130: 20 A4 20 4E 00 42 09 50  00 8B 20 4A B2 31 20 A7  | . N.B.P.. J.1 .|
00000140: 20 99 00 69 09 5A 00 5A  25 B2 41 49 28 49 2C 4A  | ..i.Z.Z%.AI(I,J|
00000150: 29 AC 47 45 3A 5A B2 5A  25 AD 47 45 3A 99 20 5A  |).GE:Z.Z%.GE:. Z|
00000160: 2C 3A 82 20 4A 3A 82 20  49 00 9A 09 5F 00 8B 20  |,:. J:. I..._.. |
00000170: B6 28 44 45 29 B3 2E 30  30 30 30 31 20 A7 20 99  |.(DE)..00001 . .|
00000180: 3A 99 22 4C 49 4E 45 41  52 20 41 42 48 41 45 4E  |:."LINEAR ABHAEN|
00000190: 47 49 47 22 3A 89 20 31  36 30 00 BB 09 64 00 99  |GIG":. 160...d..|
000001A0: 3A 99 22 11 47 45 42 45  4E 20 53 49 45 20 42 2D  |:.".GEBEN SIE B-|
000001B0: 56 45 4B 54 4F 52 20 45  49 4E 22 00 D8 09 6E 00  |VEKTOR EIN"...n.|
000001C0: 81 20 49 B2 31 20 A4 20  4E 3A 99 20 22 11 42 28  |. I.1 . N:. ".B(|
000001D0: 22 3B 49 3B 22 29 22 3B  00 F6 09 78 00 85 20 42  |";I;")";...x.. B|
000001E0: 28 49 29 3A 8B 20 42 28  49 29 B2 AB 39 39 39 39  |(I):. B(I)..9999|
000001F0: 20 89 20 31 36 30 00 09  0A 7D 00 58 28 49 29 B2  | . 160...}.X(I).|
00000200: 30 3A 82 20 49 3A 99 3A  99 00 21 0A 82 00 81 20  |0:. I:.:..!.... |
00000210: 49 B2 31 20 A4 20 4E 3A  81 20 4A B2 31 20 A4 20  |I.1 . N:. J.1 . |
00000220: 4E 00 3C 0A 8C 00 58 28  49 29 B2 58 28 49 29 AA  |N.<...X(I).X(I).|
00000230: 41 49 28 49 2C 4A 29 AC  42 28 4A 29 00 59 0A 96  |AI(I,J).B(J).Y..|
00000240: 00 82 20 4A 3A 99 22 58  28 22 3B 49 3B 22 29 22  |.. J:."X(";I;")"|
00000250: 2C 58 28 49 29 3A 82 20  49 00 69 0A 98 00 99 22  |,X(I):. I.i...."|
00000260: 11 57 45 49 54 45 52 3F  22 00 7C 0A 99 00 A1 4C  |.WEITER?".|....L|
00000270: 24 3A 8B 4C 24 B2 22 22  A7 31 35 33 00 92 0A 9B  |$:.L$."".153....|
00000280: 00 99 3A 99 3A 8B 20 4C  24 B3 B1 22 4E 22 A7 31  |..:.:. L$.."N".1|
00000290: 30 30 00 AC 0A A0 00 85  20 22 44 52 45 49 45 43  |00...... "DREIEC|
000002A0: 4B 53 4D 41 54 2E 20 3A  22 3B 46 24 00 C2 0A AA  |KSMAT. :";F$....|
000002B0: 00 8B 20 46 24 B2 22 4A  22 20 A7 20 8D 20 35 30  |.. F$."J" . . 50|
000002C0: 30 30 00 E4 0A B4 00 99  3A 99 22 41 4E 46 41 4E  |00......:."ANFAN|
000002D0: 47 3A 20 22 3B 43 24 3B  22 20 20 45 4E 44 45 3A  |G: ";C$;"  ENDE:|
000002E0: 22 3B 45 24 00 04 0B BE  00 85 20 22 4D 41 54 52  |";E$...... "MATR|
000002F0: 49 5A 45 4E 20 53 50 45  49 43 48 45 52 4E 3A 20  |IZEN SPEICHERN: |
00000300: 22 3B 46 24 00 15 0B C8  00 8B 20 46 24 B2 22 4E  |";F$...... F$."N|
00000310: 22 20 A7 20 80 00 2B 0B  D2 00 85 20 22 46 49 4C  |" . ..+.... "FIL|
00000320: 45 4E 41 4D 45 3A A0 22  3B 46 24 00 42 0B DC 00  |ENAME:.";F$.B...|
00000330: 9F 20 31 30 2C 38 2C 32  2C 46 24 AA 22 2C 53 2C  |. 10,8,2,F$.",S,|
00000340: 57 22 00 4C 0B E6 00 98  31 30 2C 4E 00 64 0B F0  |W".L....10,N.d..|
00000350: 00 81 20 49 B2 31 20 A4  20 4E 3A 81 20 4A B2 31  |.. I.1 . N:. J.1|
00000360: 20 A4 20 4E 00 7B 0B FA  00 98 31 30 2C 41 28 49  | . N.{....10,A(I|
00000370: 2C 4A 29 3A 82 20 4A 3A  82 20 49 00 93 0B 04 01  |,J):. J:. I.....|
00000380: 81 20 49 B2 31 20 A4 20  4E 3A 81 20 4A B2 31 20  |. I.1 . N:. J.1 |
00000390: A4 20 4E 00 AB 0B 0E 01  98 31 30 2C 41 49 28 49  |. N......10,AI(I|
000003A0: 2C 4A 29 3A 82 20 4A 3A  82 20 49 00 C4 0B 18 01  |,J):. J:. I.....|
000003B0: 9F 20 31 2C 38 2C 31 35  3A 84 31 2C 41 2C 42 24  |. 1,8,15:.1,A,B$|
000003C0: 2C 43 2C 44 00 D4 0B 22  01 99 3A 99 41 2C 42 24  |,C,D..."..:.A,B$|
000003D0: 2C 43 2C 44 00 E1 0B 27  01 A0 20 31 3A A0 20 31  |,C,D...'.. 1:. 1|
000003E0: 30 00 EF 0B 2C 01 8B 20  41 B2 30 20 A7 20 80 00  |0...,.. A.0 . ..|
000003F0: F9 0B 36 01 89 20 32 31  30 00 07 0C E8 03 81 20  |..6.. 210...... |
00000400: 4B B2 31 20 A4 20 4E 00  16 0C F2 03 55 28 4B 2C  |K.1 . N.....U(K,|
00000410: 4B AB 31 29 B2 31 00 24  0C FC 03 81 20 4A B2 4B  |K.1).1.$.... J.K|
00000420: 20 A4 20 4E 00 39 0C 06  04 53 B2 30 3A 8B 20 4B  | . N.9...S.0:. K|
00000430: B2 31 20 89 20 31 30 37  30 00 49 0C 10 04 81 20  |.1 . 1070.I.... |
00000440: 50 B2 31 20 A4 20 4B AB  31 00 61 0C 1A 04 53 B2  |P.1 . K.1.a...S.|
00000450: 53 AA 55 28 4B 2C 50 AB  31 29 AC 55 28 50 2C 4A  |S.U(K,P.1).U(P,J|
00000460: 29 00 69 0C 24 04 82 20  50 00 7D 0C 2E 04 55 28  |).i.$.. P.}...U(|
00000470: 4B 2C 4A 29 B2 41 28 4B  2C 4A 29 AB 53 00 85 0C  |K,J).A(K,J).S...|
00000480: 38 04 82 20 4A 00 98 0C  3D 04 8B 20 4B AA 31 B1  |8.. J...=.. K.1.|
00000490: 4E 20 89 20 31 31 36 30  00 A8 0C 42 04 81 20 49  |N . 1160...B.. I|
000004A0: B2 4B AA 31 20 A4 20 4E  00 B0 0C 4C 04 53 B2 30  |.K.1 . N...L.S.0|
000004B0: 00 C1 0C 51 04 8B 20 4B  B2 31 20 89 20 31 31 34  |...Q.. K.1 . 114|
000004C0: 30 00 D1 0C 56 04 81 20  50 B2 31 20 A4 20 4B AB  |0...V.. P.1 . K.|
000004D0: 31 00 E9 0C 60 04 53 B2  53 AA 55 28 49 2C 50 AB  |1...`.S.S.U(I,P.|
000004E0: 31 29 AC 55 28 50 2C 4B  29 00 F1 0C 6A 04 82 20  |1).U(P,K)...j.. |
000004F0: 50 00 11 0D 6F 04 8B 20  B6 28 55 28 4B 2C 4B 29  |P...o.. .(U(K,K)|
00000500: 29 B3 2E 30 30 30 30 31  20 A7 20 45 25 B2 31 3A  |)..00001 . E%.1:|
00000510: 8E 00 30 0D 74 04 55 28  49 2C 4B AB 31 29 B2 28  |..0.t.U(I,K.1).(|
00000520: 41 28 49 2C 4B 29 AB 53  29 AD 55 28 4B 2C 4B 29  |A(I,K).S).U(K,K)|
00000530: 00 38 0D 7E 04 82 20 49  00 40 0D 88 04 82 20 4B  |.8.~.. I.@.... K|
00000540: 00 49 0D 92 04 44 45 B2  31 00 64 0D 9C 04 81 20  |.I...DE.1.d.... |
00000550: 49 B2 31 20 A4 20 4E 3A  44 45 B2 44 45 AC 55 28  |I.1 . N:DE.DE.U(|
00000560: 49 2C 49 29 00 6C 0D A6  04 82 20 49 00 83 0D AB  |I,I).l.... I....|
00000570: 04 8B 20 B6 28 44 45 29  B3 2E 30 30 30 30 31 20  |.. .(DE)..00001 |
00000580: A7 20 8E 00 91 0D B0 04  81 20 4A B2 31 20 A4 20  |. ....... J.1 . |
00000590: 4E 00 9F 0D BA 04 81 20  49 B2 4A 20 A4 20 4E 00  |N...... I.J . N.|
000005A0: A7 0D C4 04 53 B2 30 00  B7 0D CE 04 81 20 4B B2  |....S.0...... K.|
000005B0: 4A 20 A4 20 49 AB 31 00  D1 0D D8 04 53 B2 53 AA  |J . I.1.....S.S.|
000005C0: 55 28 49 2C 4B AB 31 29  AC 5A 28 4B 2C 4A AB 31  |U(I,K.1).Z(K,J.1|
000005D0: 29 00 D9 0D E2 04 82 20  4B 00 FD 0D EC 04 8B 20  |)...... K...... |
000005E0: 49 B2 4A 20 A7 20 5A 28  49 2C 4A AB 31 29 B2 28  |I.J . Z(I,J.1).(|
000005F0: 31 AB 53 29 AD 55 28 49  2C 49 AB 31 29 00 1F 0E  |1.S).U(I,I.1)...|
00000600: F6 04 8B 20 49 B3 B1 4A  20 A7 20 5A 28 49 2C 4A  |... I..J . Z(I,J|
00000610: AB 31 29 B2 AB 53 AD 55  28 49 2C 49 AB 31 29 00  |.1)..S.U(I,I.1).|
00000620: 27 0E 00 05 82 20 49 00  3A 0E 0A 05 81 20 49 B2  |'.... I.:.... I.|
00000630: 4A 20 A4 20 31 20 A9 20  AB 31 00 42 0E 14 05 53  |J . 1 . .1.B...S|
00000640: B2 30 00 55 0E 1E 05 8B  20 4A B3 49 AA 31 20 89  |.0.U.... J.I.1 .|
00000650: 20 31 33 35 30 00 65 0E  28 05 81 20 4B B2 49 AA  | 1350.e.(.. K.I.|
00000660: 31 20 A4 20 4A 00 7B 0E  32 05 53 B2 53 AA 55 28  |1 . J.{.2.S.S.U(|
00000670: 49 2C 4B 29 AC 5A 28 4B  2C 4A 29 00 83 0E 3C 05  |I,K).Z(K,J)...<.|
00000680: 82 20 4B 00 A3 0E 46 05  8B 20 49 B2 4A 20 A7 20  |. K...F.. I.J . |
00000690: 5A 28 49 2C 4A 29 B2 28  31 AB 53 29 AD 55 28 49  |Z(I,J).(1.S).U(I|
000006A0: 2C 49 29 00 C1 0E 50 05  8B 20 49 B3 B1 4A 20 A7  |,I)...P.. I..J .|
000006B0: 20 5A 28 49 2C 4A 29 B2  AB 53 AD 55 28 49 2C 49  | Z(I,J)..S.U(I,I|
000006C0: 29 00 C9 0E 5A 05 82 20  49 00 D1 0E 64 05 82 20  |)...Z.. I...d.. |
000006D0: 4A 00 DF 0E 6E 05 81 20  49 B2 31 20 A4 20 4E 00  |J...n.. I.1 . N.|
000006E0: ED 0E 78 05 81 20 4A B2  31 20 A4 20 4E 00 FB 0E  |..x.. J.1 . N...|
000006F0: 7D 05 41 49 28 49 2C 4A  29 B2 30 00 09 0F 82 05  |}.AI(I,J).0.....|
00000700: 81 20 4D B2 4A 20 A4 20  4E 00 24 0F 8C 05 58 31  |. M.J . N.$...X1|
00000710: B2 5A 28 49 2C 4D 29 3A  8B 20 4D B3 49 20 A7 20  |.Z(I,M):. M.I . |
00000720: 58 31 B2 30 00 41 0F 8E  05 58 32 B2 5A 28 4D 2C  |X1.0.A...X2.Z(M,|
00000730: 4A AB 31 29 3A 8B 20 4D  B3 4A 20 A7 20 58 32 B2  |J.1):. M.J . X2.|
00000740: 30 00 5B 0F 91 05 41 49  28 49 2C 4A 29 B2 41 49  |0.[...AI(I,J).AI|
00000750: 28 49 2C 4A 29 AA 58 31  AC 58 32 00 6B 0F 96 05  |(I,J).X1.X2.k...|
00000760: 82 20 4D 3A 82 20 4A 3A  82 20 49 00 71 0F A0 05  |. M:. J:. I.q...|
00000770: 8E 00 7D 0F 88 13 99 C7  28 31 34 37 29 00 95 0F  |..}.....(147)...|
00000780: 89 13 81 20 49 B2 31 20  A4 20 4E 3A 81 20 4A B2  |... I.1 . N:. J.|
00000790: 30 20 A4 20 4E 00 A3 0F  92 13 8B 20 4A B2 30 20  |0 . N...... J.0 |
000007A0: A7 20 99 00 CC 0F 9C 13  5A 25 B2 55 28 49 2C 4A  |. ......Z%.U(I,J|
000007B0: 29 AC 47 45 3A 5A B2 5A  25 AD 47 45 3A 99 5A 2C  |).GE:Z.Z%.GE:.Z,|
000007C0: 3A 82 20 4A 3A 82 20 49  3A 99 3A 99 00 E4 0F A6  |:. J:. I:.:.....|
000007D0: 13 81 20 49 B2 31 20 A4  20 4E 3A 81 20 4A B2 30  |.. I.1 . N:. J.0|
000007E0: 20 A4 20 4E 00 F2 0F B0  13 8B 20 4A B2 30 20 A7  | . N...... J.0 .|
000007F0: 20 99 00 18 10 BA 13 5A  25 B2 5A 28 49 2C 4A 29  | ......Z%.Z(I,J)|
00000800: AC 47 45 3A 5A B2 5A 25  AD 47 45 3A 99 20 5A 2C  |.GE:Z.Z%.GE:. Z,|
00000810: 3A 82 20 4A 3A 82 20 49  00 20 10 70 17 99 3A 99  |:. J:. I. .p..:.|
00000820: 00 26 10 AC 17 8E 00 00  00                       |.&.......       |

.......G(147):E%.0:GE.10.3.9.... "DIMENS
ION DER MATRIX";N.U.... A(N,N),AI(N,N),U
(N,N).L.... B(N),X(N),Z(N,N)...... I.1 .
 N:. J.1 . N...(.. "ZEILE: ";I;"SPALTE:"
;J;...2.. A(I,J):. J:. I.C.7.C$.TI$.U.<.
. 1000:E$.TI$...?.. E%.1 . DE.0...A..G(1
47):."DET. = ";DE...C..:."INVERSE MATRIZ
E":..4.F.. I.1 . N:. J.1 . N.B.P.. J.1 .
 ..I.Z.Z%.AI(I,J).GE:Z.Z%.GE:. Z,:. J:. 
I..._.. .(DE)..00001 . .:."LINEAR ABHAEN
GIG":. 160...D..:.".GEBEN SIE B-VEKTOR E
IN".X.N.. I.1 . N:. ".B(";I;")";...X.. B
(I):. B(I)..9999 . 160...}.X(I).0:. I:.:
..!.... I.1 . N:. J.1 . N.<...X(I).X(I).
AI(I,J).B(J).Y.... J:."X(";I;")",X(I):. 
I.I....".WEITER?".|....L$:.L$."".153....
..:.:. L$.."N".100... .. "DREIECKSMAT. :
";F$.B.... F$."J" . . 5000......:."ANFAN
G: ";C$;"  ENDE:";E$...... "MATRIZEN SPE
ICHERN: ";F$...H.. F$."N" . ..+.R.. "FIL
ENAME: ";F$.B.... 10,8,2,F$.",S,W".L....
10,N.D.... I.1 . N:. J.1 . N.{....10,A(I
,J):. J:. I...... I.1 . N:. J.1 . N.....
.10,AI(I,J):. J:. I.D.... 1,8,15:.1,A,B$
,C,D.T."..:.A,B$,C,D...'.  1:  10...,.. 
A.0 . ....6.. 210...... K.1 . N.....U(K,
K.1).1.$.... J.K . N.9...S.0:. K.1 . 107
0.I.... P.1 . K.1.A...S.S.U(K,P.1).U(P,J
).I.$.. P.}...U(K,J).A(K,J).S...8.. J...
=.. K.1.N . 1160...B.. I.K.1 . N...L.S.0
.A.Q.. K.1 . 1140.Q.V.. P.1 . K.1...`.S.
S.U(I,P.1).U(P,K)...J.. P...O.. .(U(K,K)
)..00001 . E%.1:..0.T.U(I,K.1).(A(I,K).S
).U(K,K).8.~.. I.@.... K.I...DE.1.D.... 
I.1 . N:DE.DE.U(I,I).L.... I...... .(DE)
..00001 . ....... J.1 . N...... I.J . N.
..D.S.0...N.. K.J . I.1.Q.X.S.S.U(I,K.1)
.Z(K,J.1).Y.... K...... I.J . Z(I,J.1).(
1.S).U(I,I.1)...... I..J . Z(I,J.1)..S.U
(I,I.1).'.... I.:.... I.J . 1 . .1.B...S
.0.U.... J.I.1 . 1350.E.(.. K.I.1 . J.{.
2.S.S.U(I,K).Z(K,J)...<.. K...F.. I.J . 
Z(I,J).(1.S).U(I,I).A.P.. I..J . Z(I,J).
.S.U(I,I).I.Z.. I.Q.D.. J...N.. I.1 . N.
..X.. J.1 . N...}.AI(I,J).0...... M.J . 
N.$...X1.Z(I,M):. M.I . X1.0.A...X2.Z(M,
J.1):. M.J . X2.0.[...AI(I,J).AI(I,J).X1
.X2.K.... M:. J:. I.Q. ...}....G(147)...
... I.1 . N:. J.0 . N...... J.0 . ..L...
Z%.U(I,J).GE:Z.Z%.GE:.Z,:. J:. I:.:.....
.. I.1 . N:. J.0 . N...... J.0 . ......Z
%.Z(I,J).GE:Z.Z%.GE:. Z,:. J:. I. .P..:.
.&.......

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL