i1 : R = ZZ/101[x,y] o1 = R o1 : PolynomialRing |
i2 : A = matrix{{x,y,x,y},{y,x,y,x},{x,y,x,y},{y,y,y,y},{x,x,y,y}}
o2 = | x y x y |
| y x y x |
| x y x y |
| y y y y |
| x x y y |
5 4
o2 : Matrix R <--- R
|
i3 : kroneckerNormalForm(A, ChangeMatrix => {false,false})
o3 = | 0 0 0 0 |
| 0 x 0 0 |
| 0 y 0 0 |
| 0 0 x-y 0 |
| 0 0 0 x-y |
5 4
o3 : Matrix R <--- R
|
i4 : kroneckerIndices(A,x,y)
o4 = ({0}, {0, 1}, {x - y, x - y})
o4 : Sequence
|
The object kroneckerIndices is a method function.