Changeset bbd7c8 in git

Timestamp:

Feb 4, 2015, 5:54:25 PM (9 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

c416199867800cce181076de04f893dd65d4111c

Parents:

48d66afcfd578627347de972483894aa987b9f60

Message:

fix: invalid assigns in libs

Location:

Singular/LIB

Files:

• dmod.lib (modified) (1 diff)
• gmssing.lib (modified) (1 diff)
• reszeta.lib (modified) (1 diff)

Singular/LIB/dmod.lib

@@ -6311 +6311 @@
   vector V = M2[1];
   number bcand = leadcoef(V[1]); // 1st component
-  V[1]=0;
+  V=V-V[1];
   number ct = content(V); // content of the cofactors
   poly CF = ct*V[ncols(J)]; // polynomial in K[s]<x,dx>, cofactor to F

Singular/LIB/gmssing.lib

@@ -932 +932 @@
   module U,U0,U1,U2;
   matrix N;
-  s=0;
   for(i=size(F);i>=1;i--)
   {

Singular/LIB/reszeta.lib

@@ -4265 +4265 @@
              if(savedCent==1)
              {
-               vector otherComp;
-               otherComp[M[int(leadcoef(path[1,ncols(path)])),size(BO[4])-1]]
-                        =1;
+               vector otherComp=
+               gen(M[int(leadcoef(path[1,ncols(path)])),size(BO[4])-1]);
              }
              kill savedCent;