LU decomposition: Difference between revisions
Content added Content deleted
m (→{{header|Ada}}: add Ada version) |
m (→{{header|Ada}}: add "constant" to example matrices) |
||
Line 293: | Line 293: | ||
end Print; |
end Print; |
||
Example_1 : Ada.Numerics.Real_Arrays.Real_Matrix := |
Example_1 : constant Ada.Numerics.Real_Arrays.Real_Matrix := |
||
((1.0, 3.0, 5.0), |
((1.0, 3.0, 5.0), |
||
(2.0, 4.0, 7.0), |
(2.0, 4.0, 7.0), |
||
Line 299: | Line 299: | ||
P_1, L_1, U_1 : Ada.Numerics.Real_Arrays.Real_Matrix (Example_1'Range (1), |
P_1, L_1, U_1 : Ada.Numerics.Real_Arrays.Real_Matrix (Example_1'Range (1), |
||
Example_1'Range (2)); |
Example_1'Range (2)); |
||
Example_2 : Ada.Numerics.Real_Arrays.Real_Matrix := |
Example_2 : constant Ada.Numerics.Real_Arrays.Real_Matrix := |
||
((11.0, 9.0, 24.0, 2.0), |
((11.0, 9.0, 24.0, 2.0), |
||
(1.0, 5.0, 2.0, 6.0), |
(1.0, 5.0, 2.0, 6.0), |