Zitat:
DieMatrix[i,j] := - DieMatrix[i,j];
if DieMatrix[i,j] = 0 then
begin
DieMatrix[i,j] := 1E-1000; // Rundungsfehler wegen der Null
genau := false;
end;
das war ne spannende konstruktion
hat gut funktioniert, aber irgendwie bekam ich immer ne
access violation wenn ich das programm geschlossen habe, welche ich einfach nicht ausfindig machen konnte.
hab aber noch etwas anderes gefunden, was auch recht gut zu sein scheint:
http://www.gkinf.de/sdhp/linglsys.html
grüße, paresy