Rosetta Code

Reduced row echelon form: Difference between revisions

Page Discussion

Reduced row echelon form (view source)

Revision as of 14:17, 5 July 2019

232 bytes added ,  4 years ago
m
→‎{{header|Swift}}
(Add Factor example)
Line 3,557:
=={{header|Swift}}==
<lang Swift>
var lead = 0
for r in 0..<rows {
var rowCount = eCount
if (cols <= lead) { break }
var columnCount = mCount
var i = r
for (var r = 0; r < rowCount; ++r) {
while (matrixm[i][lead] == 0) {▼
if (columnCount <= lead) {
break i += 1
if (i == rowCountrows) {▼
}
var i = r
lead += 1
▲ while (matrix[i][lead] == 0) {
if (cols == lead) {
++i
lead -= 1
▲ if (i == rowCount) {
break
i = r
}
++lead
}
if (columnCount == lead) {
}
--lead
for j in 0..<cols {
break
let temp = m[r][j]
}
matrix m[r][j] = matrixm[i][j]▼
}
matrix m[i][j] = temp▼
}
for (var j = 0; j < columnCount; ++j) { }
var temp let div = matrixm[r][jlead]
if (div != 0) {▼
▲ matrix[r][j] = matrix[i][j]
for j in 0..<cols {
▲ matrix[i][j] = temp
matrix m[r][j] /= div▼
}
}
var div = matrix[r][lead]
}
▲ if (div != 0) {
for (var j = 0; j < columnCount; ++for j) in 0..<rows {
if (j != r) {
▲ matrix[r][j] /= div
let sub = m[j][lead]
}
for k in 0..<cols {
}
matrix m[j][k] -= (sub * matrixm[r][k])▼
for (var j = 0; j < rowCount; ++j) {
if (j != r) { }
}
var sub = matrix[j][lead]
for (var k = 0; k < columnCount; ++k) { }
lead += 1
▲ matrix[j][k] -= (sub * matrix[r][k])
}
}</lang>▼
}
}
++lead
▲}</lang>
 
=={{header|Tcl}}==
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/96054"