[back] [prev] [next] [index] [root]
a := ModuleModul(M)
| ideal | a |
|
| module | M |
See also: ModuleDet, ModuleDen
kash> O:=OrderMaximal(Poly(Zx, [1,-10,-3,-2]));;
kash> o:=OrderMaximal(O,3,3);;
kash> Oa:=OrderMaximal(OrderAbs(o));;
kash> L:=List(Factor(10*Oa),i->i[1]);;
kash> M:=IdealBasis(IdealMove(L[2]*L[6]/2, o));
{<5, [4, 1, 2] / 2><1, [2, 3, 2] / 2><1 / 2>
[1 -2 -1]
[0 1 1]
[0 0 1]
}
kash> I := ModuleModul(M);
<
[20 6 4]
[ 0 1 0]
[ 0 0 1]
/16>
kash> I*ModuleId(O,3) < M;
> false
<- back[back] [prev] [next] [index] [root]