J = testModule(t, I)This computes the test module $\tau(\omega_R, I^t)$ of an ideal $I$ in a domain $R$ of index not divisible by the characteristic $p > 0$. It returns a list with two entries. The first is the ideal of $R$ isomorphic viewed as an ideal of $R$ isomorphic to $\tau(\omega_R, J^t)$. The second is an ideal $R$ isomorphic to $\omega_R$, in which the first module sits as a subideal.
We begin with example in a regular ring.
|
|
|
|
We now include an example in a non-Gorenstein ring
|
|
|
|
|
|
|
The source of this document is in NonPrincipalTestIdeals.m2:1009:0.