maximaで正方行列の小行列式を一度に全て計算して書き出す関数

maxima で正方行列 X = (X_ij) の(i,j)小行列式を全て書き出す関数が以下である．

minors(X):=for i:1 while i<=matrix_size(X)[1] do (for j:1 while j<=matrix_size(X)[1] do print(i,j,"=",determinant(minor(X,i,j))))

単純にminor関数を繰り返して計算しているだけである．出力はi j = (i,j)小行列式 という形で出力している．

例