Changeset 389c6d in git for Singular/LIB/divisors.lib

Timestamp:

Dec 17, 2013, 4:28:18 PM (9 years ago)

Author:

Janko Boehm <boehm@…>

Branches:

(u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')

Children:

11d5e76bcdc92b3dbe9f408e58a599d4ef8e42a6

Parents:

141671bfa5615e95935e19fd940dd75a3b4bc7a1

Message:

Fixed a bug in divisors.lib

File:

• Singular/LIB/divisors.lib (modified) (2 diffs)

Singular/LIB/divisors.lib

@@ -335 +335 @@
 ASSUME:  A is a divisor on X.
 RETURN:  a list with a basis of the space of global sections of D.
-THEORY:  We assume that the qring of X satisfies the S2-condition. We compute sat((f*J) : I) /f
+THEORY:  We assume that the qring of X satisfies the S2-condition and that X is smooth. We compute sat((f*J) : I) /f
          where D = (I)-(J).
 KEYWORDS: divisors
@@ -370 +370 @@
 "
 {
-  return( deg(std(A.num))-deg(std(A.den)));
+  return( mult(std(A.num))-mult(std(A.den)));
 }
 example