Reduced row echelon form: Difference between revisions
Added Wren
(add FreeBASIC) |
(Added Wren) |
||
Line 4,012:
0.000000 1.000000 0.000000 1.000000
0.000000 0.000000 1.000000 -2.000000
</pre>
=={{header|Wren}}==
{{libheader|Wren-fmt}}
{{libheader|Wren-matrix}}
The above module has a method for this built in as it's needed to implement matrix inversion using the Gauss-Jordan method.
<lang ecmascript>import "/matrix" for Matrix
import "/fmt" for Fmt
var m = Matrix.new([
[ 1, 2, -1, -4],
[ 2, 3, -1, -11],
[-2, 0, -3, 22]
])
System.print("Original:\n")
Fmt.mprint(m, 3, 0)
System.print("\nRREF:\n")
m.toReducedRowEchelonForm
Fmt.mprint(m, 3, 0)</lang>
{{out}}
<pre>
Original:
| 1 2 -1 -4|
| 2 3 -1 -11|
| -2 0 -3 22|
RREF:
| 1 0 0 -8|
| 0 1 0 1|
| 0 0 1 -2|
</pre>
| |||