Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Bjoerk,
25. Aug 2011
Danke für deine Ausführungen und den Schwamm . Vielleicht kurz zur Erläuterung, weshalb ich deine Matrix fälschlicherweise als singulär bezeichnet habe. In der Baustatik benutzt man die Inverse bzw. die Determinante, um abzuschätzen, ob ein System stabil ist oder nicht. Wenn ein Diagonalelement Null ist, dann ist das System instabil (stürzt ein), wenn Det <= 0, ist das System zu weich (hängt...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Bjoerk,
25. Aug 2011
Bleib mal locker, kein Grund unfreundlich zu werden. Eine Matrix ist dann singulär, wenn sie keine Inverse hat. Mag sein, daß deine Matrix eine Inverse hat, man kann Sie aber nicht mit dem Gauß des TE berechnen, das war alles, was ich sagen wollte...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Bjoerk,
25. Aug 2011
Sorry Kumpel, im Sinne des Gauß Algorithmus ist diese Matrix singulär.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Bjoerk,
25. Aug 2011
FredlFesl, TMat oder TMatrix, ist sowas von egal. Und die SetLength’s Null kann man sich nur bei lokalen Variablen schenken (ich schreib’s der Vollständigkeit halber gelegentlich dennoch hin).
swarley, wenn du die Variante möchtest, in der die Lösung auf der rechten Seite steht, dann kenn ich das so:
procedure Inverse(const N: integer; var A: TMatrixGauss);
var
i,j,k : Integer;...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Bjoerk,
23. Aug 2011
Die rechte Seite brauchst du nicht zu übergeben, das kann Inverse erledigen.
type
TMat = array of array of double;
function Reziproke(const A: TMat): TMat;
var