i1 : R = QQ[x, y, z] o1 = R o1 : PolynomialRing
i2 : D = divisor({-8, 2}, {ideal(x), ideal(y)}) o2 = -8*Div(x) + 2*Div(y) of R o2 : WDiv
i3 : getPrimeDivisors( D ) o3 = {1*Div(x) of R, 1*Div(y) of R} o3 : List