diff options
author | Norbert Preining <norbert@preining.info> | 2023-08-05 03:01:59 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2023-08-05 03:01:59 +0000 |
commit | d40e7963c06e1302f226c67f32c143dcc5fa958a (patch) | |
tree | b2a2f6f21f5f15e9e8b1c538a094131b87bbc29b /macros/luatex/latex/lualinalg/lualinalg.sty | |
parent | 319c90e45fc96ba6f15edcf00b24e484d9d92f2b (diff) |
CTAN sync 202308050301
Diffstat (limited to 'macros/luatex/latex/lualinalg/lualinalg.sty')
-rw-r--r-- | macros/luatex/latex/lualinalg/lualinalg.sty | 21 |
1 files changed, 10 insertions, 11 deletions
diff --git a/macros/luatex/latex/lualinalg/lualinalg.sty b/macros/luatex/latex/lualinalg/lualinalg.sty index de120d131a..c16cfa1e14 100644 --- a/macros/luatex/latex/lualinalg/lualinalg.sty +++ b/macros/luatex/latex/lualinalg/lualinalg.sty @@ -1,18 +1,17 @@ % The lualinalg package % Authors: Chetan Shirore and Ajit Kumar -% version 1.3, Date=03-Aug-2023 +% version 1.4, Date=04-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.3] +\ProvidesPackage{lualinalg}[1.4] \RequirePackage{xkeyval} \RequirePackage{amsmath} \RequirePackage{luamaths} \RequirePackage{luacode} \begin{luacode*} -local complex = require "lualinalg-complex" - local lfrac = require "lualinalg-fractions" + -- matrices part matrices = {} @@ -774,9 +773,9 @@ function matrix.gauss0E(mtx, augmt, fom, dignum) tostring(stepCnt) .. ": Divide row " .. tostring(r) .. - " by " .. + " by $" .. tostring(complex.round(complex(m), dignum)) .. - ".$$" .. + "$. $$" .. tostring(matrix.show(matrix.concath(mtx, augmt), fom, dignum)) .. "$$" end @@ -798,9 +797,9 @@ function matrix.gauss0E(mtx, augmt, fom, dignum) tostring(stepCnt) .. ": Multiply row " .. tostring(r) .. - " by " .. + " by $" .. tostring(complex.round(complex(m), dignum)) .. - " and subtract it from row " .. + "$ and subtract it from row " .. tostring(i) .. ".$$" .. tostring( @@ -1183,9 +1182,9 @@ function vector.gsX(inptTbl, brckt, dignum) str = str .. "\\ \\newline Take given vectors as $v_1,\\ldots, v_" .. k .. "$ in order." if vector.euclidnorm(inptTbl[1]) ~= complex(0.0) then - tbl[1] = vector.mulnum(inptTbl[1], 1 / vector.euclidnorm(inptTbl[1])) + tbl[1] = vector.mulnum(inptTbl[1], 1.0 / vector.euclidnorm(inptTbl[1])) else - tbl[1] = vector.mulnum(inptTbl[1], 1) + tbl[1] = vector.mulnum(inptTbl[1], 1.0) end setmetatable(tbl[1], vector_meta) str = str .. "\\ \\newline Step " .. cnt .. ": $$ u_" .. cnt .. "=v_" .. cnt .. "=" @@ -1206,7 +1205,7 @@ function vector.gsX(inptTbl, brckt, dignum) if 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) + tbl[i] = vector.mulnum(tbl[i], 1.0) end cnt = cnt + 1 |