diff --git a/cholesky.rkt b/cholesky.rkt index e48b3e5..6d5430b 100644 --- a/cholesky.rkt +++ b/cholesky.rkt @@ -61,7 +61,7 @@ (for*/fold: : [Matrix Real] ([L : [Matrix Real] (build-cholesky-column A - (make-matrix 0 0 0) + (make-matrix 1 1 0) 0 n)]) ([k : Natural (in-range 1 n)])