9 lines
134 B
Tcl
9 lines
134 B
Tcl
|
set mat {
|
||
|
|
{1 2 3 4}
|
||
|
|
{4 5 6 7}
|
||
|
|
{7 8 9 10}
|
||
|
|
{10 11 12 13}
|
||
|
|
}
|
||
|
|
puts [::math::linearalgebra::det $mat]
|
||
|
|
puts [permanent $mat]
|