|  |  D.5.4.15 multformaldivisor Procedure from librarydivisors.lib(see  divisors_lib).
 
Example:Usage:
multformaldivisor(n ,A); A*n; n = integer, A = formaldivisor.
 
Assume:
n is an integer and A is a formal divisor on X.
Return:
a formal divisor on X
Theory:
The procedure will multiply the formal sum with n.
 |  | LIB "divisors.lib";
ring r=31991,(x,y,z),dp;
ideal I = y^2*z - x*(x-z)*(x+3*z);
qring Q = std(I);
divisor A = makeDivisor(ideal(x,z),ideal(1));
divisor B = makeDivisor(ideal(x,y),ideal(1));
formaldivisor fE= makeFormalDivisor(list(list(-5,A),list(2,B)));
fE*2;
==> -10*( (z,x) - (1) )
==> +4*( (y,x) - (1) )
==> 
 | 
 
 |