i1 : R = QQ[x,y,u,v]/ideal(x*y-u*v);
|
i2 : D = divisor(x);
o2 : WeilDivisor on R
|
i3 : coefficients(D)
o3 = {1, 1}
o3 : List
|
i4 : E = divisor(x*u);
o4 : WeilDivisor on R
|
i5 : coefficients(E)
o5 = {1, 1, 2}
o5 : List
|
i6 : F = divisor({0, 1/2, -2/3}, {ideal(y, u), ideal(x,u), ideal(x,v)}, CoefficientType => QQ)
o6 = 0*Div(y, u) + 1/2*Div(x, u) + -2/3*Div(x, v)
o6 : QWeilDivisor on R
|
i7 : coefficients(F)
1 2
o7 = {0, -, - -}
2 3
o7 : List
|
i8 : G = divisor({0.5, -0.667}, {ideal(x,u), ideal(x,v)}, CoefficientType => RR)
o8 = .5*Div(x, u) + -.667*Div(x, v)
o8 : RWeilDivisor on R
|
i9 : coefficients(G)
o9 = {.5, -.667}
o9 : List
|