Reduced row echelon form: Difference between revisions

Content added Content deleted
(add FreeBASIC)
(Added Wren)
Line 4,012: Line 4,012:
0.000000 1.000000 0.000000 1.000000
0.000000 1.000000 0.000000 1.000000
0.000000 0.000000 1.000000 -2.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>
</pre>