RosettaCodeData/Task/Determinant-and-permanent/Pluto/determinant-and-permanent.pluto
2026-04-30 12:34:36 -04:00

28 lines
521 B
Text

require "matrix"
local arrays = {
{ {1, 2},
{3, 4} },
{ {-2, 2, -3},
{-1, 1, 3},
{ 2, 0, -1} },
{ { 1, 2, 3, 4},
{ 4, 5, 6, 7},
{ 7, 8, 9, 10},
{10, 11, 12, 13} },
{ { 0, 1, 2, 3, 4},
{ 5, 6, 7, 8, 9},
{10, 11, 12, 13, 14},
{15, 16, 17, 18, 19},
{20, 21, 22, 23, 24} }
}
for arrays as array do
local m = matrix.from(array)
print(m)
print($"\nDeterminant: {m:det()}")
print($"Permanent : {m:perm()}\n")
end