diff options
author | Norbert Preining <norbert@preining.info> | 2023-08-22 03:01:06 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2023-08-22 03:01:06 +0000 |
commit | cf3e954514eb50bea0335bdc97d6b76f80f5d03e (patch) | |
tree | 84960c9724915fd64626f3b8c532a671ea7e87f2 /macros/luatex/latex/lualinalg/lualinalg.sty | |
parent | f4e4c48e897bec27fd8d07ba278c03c6f0c64336 (diff) |
CTAN sync 202308220301
Diffstat (limited to 'macros/luatex/latex/lualinalg/lualinalg.sty')
-rw-r--r-- | macros/luatex/latex/lualinalg/lualinalg.sty | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/macros/luatex/latex/lualinalg/lualinalg.sty b/macros/luatex/latex/lualinalg/lualinalg.sty index 5d3e502a8d..5c62f329fa 100644 --- a/macros/luatex/latex/lualinalg/lualinalg.sty +++ b/macros/luatex/latex/lualinalg/lualinalg.sty @@ -1,9 +1,9 @@ % The lualinalg package % Authors: Chetan Shirore and Ajit Kumar -% Version 1.6, Date=09-Aug-2023 +% Version 1.7, Date=21-Aug-2023 % Licensed under LaTeX Project Public License v1.3c or later. The complete license text is available at http://www.latex-project.org/lppl.txt. -\ProvidesPackage{lualinalg}[1.6] +\ProvidesPackage{lualinalg}[1.7] \RequirePackage{xkeyval} \RequirePackage{amsmath} \RequirePackage{luamaths} @@ -1132,7 +1132,7 @@ function vector.gs(inptTbl, brckt, dignum) local str = "" k = #inptTbl - if vector.euclidnorm(inptTbl[1]) ~= complex(0.0) then + if complex.round(vector.euclidnorm(inptTbl[1])) ~= complex("0.0") then tbl[1] = vector.mulnum(inptTbl[1], 1 / vector.euclidnorm(inptTbl[1])) else tbl[1] = vector.mulnum(inptTbl[1], 1) @@ -1146,7 +1146,7 @@ function vector.gs(inptTbl, brckt, dignum) setmetatable(tbl[j], vector_meta) tbl[i] = vector.sub(tbl[i], vector.mulnum(tbl[j], vector.dot(tbl[i], tbl[j]))) end - if vector.euclidnorm(tbl[i]) ~= complex(0.0) then + if complex.round(vector.euclidnorm(tbl[i])) ~= complex("0.0") then tbl[i] = vector.mulnum(tbl[i], 1 / vector.euclidnorm(tbl[i])) end tbl[i] = vector.mulnum(tbl[i], 1.0) @@ -1179,7 +1179,7 @@ function vector.gsX(inptTbl, brckt, dignum) k = #inptTbl str = str .. "\\ \\newline Take given vectors as $v_1,\\ldots, v_" .. k .. "$ in order." - if vector.euclidnorm(inptTbl[1]) ~= complex(0.0) then + if complex.round(vector.euclidnorm(inptTbl[1])) ~= complex("0.0") then tbl[1] = vector.mulnum(inptTbl[1], 1.0 / vector.euclidnorm(inptTbl[1])) else tbl[1] = vector.mulnum(inptTbl[1], 1.0) @@ -1188,7 +1188,7 @@ function vector.gsX(inptTbl, brckt, dignum) str = str .. "\\ \\newline Step " .. cnt .. ": $$ u_" .. cnt .. "=v_" .. cnt .. "=" str = str .. brcktL .. vector.show(inptTbl[1], dignum) .. brcktR str = str .. " $$ e_" .. cnt .. "=" - if vector.euclidnorm(tbl[1]) ~= complex(0.0) then + if complex.round(vector.euclidnorm(tbl[1])) ~= complex("0.0") then str = str .. "\\frac{u_{" .. cnt .. "}}" .. "{||u_{" .. cnt .. "}||} =" end str = str .. brcktL .. vector.show(tbl[1], dignum) .. brcktR @@ -1200,7 +1200,7 @@ function vector.gsX(inptTbl, brckt, dignum) tmpTbl[i] = vector.sub(tbl[i], vector.mulnum(tbl[j], vector.dot(tbl[i], tbl[j]))) tbl[i] = vector.sub(tbl[i], vector.mulnum(tbl[j], vector.dot(tbl[i], tbl[j]))) end - if vector.euclidnorm(tbl[i]) ~= complex(0.0) then + if complex.round(vector.euclidnorm(tbl[i])) ~= complex("0.0") then tbl[i] = vector.mulnum(tbl[i], 1 / vector.euclidnorm(tbl[i])) else tbl[i] = vector.mulnum(tbl[i], 1.0) |