Gauss-Jordan matrix inversion: Difference between revisions

Content added Content deleted
No edit summary
Line 2,518: Line 2,518:
{$mode ObjFPC}{$H+}
{$mode ObjFPC}{$H+}


const
const
MATRIX_1: array of array of Real = ((1, 2, 3), (4, 1, 6), (7, 8, 9));
MATRIX_1: array of array of Real = ((1, 2, 3),
(4, 1, 6),
(7, 8, 9));
MATRIX_2: array of array of Real = ((3.0, 1.0, 5.0, 9.0, 7.0),
MATRIX_2: array of array of Real = ((3.0, 1.0, 5.0, 9.0, 7.0),
(8.0, 2.0, 8.0, 0.0, 1.0),
(8.0, 2.0, 8.0, 0.0, 1.0),
Line 2,664: Line 2,666:
0.1002 -0.0673 -0.0562 -0.0626 0.0981
0.1002 -0.0673 -0.0562 -0.0626 0.0981
0.0241 0.0567 0.1258 0.0682 -0.2173</pre>
0.0241 0.0567 0.1258 0.0682 -0.2173</pre>



=={{header|Generic}}==
=={{header|Generic}}==