Fixing missing loop over k in LEQ

This commit is contained in:
Francesc Verdugo 2024-09-27 13:24:49 +02:00
parent 53ea3f5157
commit 3a82bf996d

View File

@ -340,15 +340,17 @@
"\n", "\n",
"```julia\n", "```julia\n",
"n,m = size(B)\n", "n,m = size(B)\n",
"for t in (k+1):m\n", "for k in 1:n\n",
" B[k,t] = B[k,t]/B[k,k]\n", " for t in (k+1):m\n",
"end\n", " B[k,t] = B[k,t]/B[k,k]\n",
"B[k,k] = 1\n", " end\n",
"for i in (k+1):n \n", " B[k,k] = 1\n",
" for j in (k+1):m\n", " for i in (k+1):n \n",
" B[i,j] = B[i,j] - B[i,k]*B[k,j]\n", " for j in (k+1):m\n",
" B[i,j] = B[i,j] - B[i,k]*B[k,j]\n",
" end\n",
" B[i,k] = 0\n",
" end\n", " end\n",
" B[i,k] = 0\n",
"end\n", "end\n",
"```" "```"
] ]
@ -527,15 +529,17 @@
"\n", "\n",
"```julia\n", "```julia\n",
"n,m = size(B)\n", "n,m = size(B)\n",
"for t in (k+1):m\n", "for k in 1:n\n",
" B[k,t] = B[k,t]/B[k,k]\n", " for t in (k+1):m\n",
"end\n", " B[k,t] = B[k,t]/B[k,k]\n",
"B[k,k] = 1\n", " end\n",
"for i in (k+1):n \n", " B[k,k] = 1\n",
" for j in (k+1):m\n", " for i in (k+1):n \n",
" B[i,j] = B[i,j] - B[i,k]*B[k,j]\n", " for j in (k+1):m\n",
" B[i,j] = B[i,j] - B[i,k]*B[k,j]\n",
" end\n",
" B[i,k] = 0\n",
" end\n", " end\n",
" B[i,k] = 0\n",
"end\n", "end\n",
"```\n", "```\n",
"\n", "\n",