|
D.5.6.2 spectralNeg
Procedure from library reszeta.lib (see reszeta_lib).
- Usage:
- spectralNeg(L);
L = list of rings
- Assume:
- L is output of resolution of singularities
- Return:
- list of numbers, each a spectral number in (-1,0]
Example:
| LIB "reszeta.lib";
ring R=0,(x,y,z),dp;
ideal I=x3+y4+z5;
list L=resolve(I,"K");
spectralNeg(L);
==> [1]:
==> -13/60
==> [2]:
==> -1/60
LIB"gmssing.lib";
ring r=0,(x,y,z),ds;
poly f=x3+y4+z5;
spectrum(f);
==> [1]:
==> _[1]=-13/60
==> _[2]=-1/60
==> _[3]=1/30
==> _[4]=7/60
==> _[5]=11/60
==> _[6]=7/30
==> _[7]=17/60
==> _[8]=19/60
==> _[9]=11/30
==> _[10]=23/60
==> _[11]=13/30
==> _[12]=29/60
==> _[13]=31/60
==> _[14]=17/30
==> _[15]=37/60
==> _[16]=19/30
==> _[17]=41/60
==> _[18]=43/60
==> _[19]=23/30
==> _[20]=49/60
==> _[21]=53/60
==> _[22]=29/30
==> _[23]=61/60
==> _[24]=73/60
==> [2]:
==> 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
|
|