" <------------------------- sam163.txt ---------------------------->
" Determinants. pdet written by dr. richard w. parks, u. of wash., seattle
Gd#pdet a
n#(Ra)[1]
i#1
b#a[;i]
b[Ii]#0
a#a_(bJ.Xa[i;])%a[i;i]
$(nZi#i+1)/3
d#X/1 1Ta
G
pdet 2 2 R 1 2 3 4
pdet 3 3 R 1 2 3 2 3 4 3 4 5
pdet 5 5 R 3 7 1 2 5 6 4 3 0 2 0 3 0 1 2 1 0 6 5 3 2 1 0 2 0
pdet 2 2 R -1 2 0 1
pdet 3 3 R 1 2 -1 3 0 1 4 2 1
pdet 4 4 R 3 0 -1 2 4 1 3 2 6 -1 2 0 1 2 4 1
)off