RosettaCodeData/Task/Determinant-and-permanent/Stata/determinant-and-permanent-2.stata
2023-07-01 13:44:08 -04:00

19 lines
272 B
Text

: a=1,1,1,0\1,1,0,1\1,0,1,1\0,1,1,1
: a
[symmetric]
1 2 3 4
+-----------------+
1 | 1 |
2 | 1 1 |
3 | 1 0 1 |
4 | 0 1 1 1 |
+-----------------+
: det(a)
-3
: sumrec(a,-1)
-3
: sumrec(a,1)
9