Cholesky decomposition: Difference between revisions

Content added Content deleted
(Added solution for F#)
Line 2,451: Line 2,451:
$n = $a.count
$n = $a.count
$end = $n - 1
$end = $n - 1
$l = @(0) * $n
$l = 1..$n | foreach {$row = @(0) * $n; ,$row}
foreach ($i in 0..$end) {$l[$i] = @(0) * $n}
foreach ($k in 0..$end) {
foreach ($k in 0..$end) {
$m = $k - 1
$m = $k - 1
Line 2,473: Line 2,472:
$l
$l
}
}

function show($a) {
function show($a) {$a | foreach {"$_"}}
if($a) {
0..($a.Count - 1) | foreach{ if($a[$_]){"$($a[$_])"}else{""} }
}
}

$a1 = @(
$a1 = @(
@(25, 15, -5),
@(25, 15, -5),