Changeset ae816e in git


Ignore:
Timestamp:
Feb 7, 2012, 4:55:51 PM (12 years ago)
Author:
Oleksandr Motsak <motsak@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'c7af8613769b29c741d6c338945669719f1fc4f8')
Children:
108e2ec73be7e6a609b8fa8fb28be6af482e5dcc
Parents:
9ec1669f774f9fd5bc45c6c9b8b224cff15ab286
git-author:
Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-02-07 16:55:51+01:00
git-committer:
Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-02-07 19:23:14+01:00
Message:
fix multigrading.lib due to the change in Singular (use: 'div' not '/')
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/multigrading.lib

    r9ec166 rae816e  
    15731573  while(av[1]*bv[1] != 0)
    15741574  {
    1575     bv = bv - (bv[1] - bv[1]%av[1])/av[1] * av;
     1575    bv = bv - (bv[1] - bv[1]%av[1]) div av[1] * av;
    15761576    save = bv;
    15771577    bv = av;
     
    17131713      transform = unitMatrix(cc);
    17141714      transform[k+1,k] = 1;
    1715       a = -v[3]*D[k+1,k+1]/v[1];
     1715      a = -v[3]*D[k+1,k+1] div v[1];
    17161716      transform[k, k+1] = a;
    17171717      transform[k+1, k+1] = a+1;
     
    17231723      transform[k,k] = v[2];
    17241724      transform[k,k+1] = v[3];
    1725       transform[k+1,k] = -c/v[1];
    1726       transform[k+1,k+1] = b/v[1];
     1725      transform[k+1,k] = -c div v[1];
     1726      transform[k+1,k+1] = b div v[1];
    17271727      D = transform * D;
    17281728      P = transform * P;
     
    18211821              v2 = A[1..rr,j];
    18221822              transform = unitMatrix(cc);
    1823               transform[j,j] = v1[row]/gcdvec[1];
     1823              transform[j,j] = v1[row] div gcdvec[1];
    18241824              transform[column, column] = gcdvec[2];
    1825               transform[column,j] = -v2[row]/gcdvec[1];
     1825              transform[column,j] = -v2[row] div gcdvec[1];
    18261826              transform[j,column] = gcdvec[3];
    18271827              q = q*transform;
     
    18401840        if(A[row, j]!=0){
    18411841          transform = unitMatrix(cc);
    1842           transform[column, j] = (-A[row,j]+A[row, j]%A[row, column])/A[row, column];
     1842          transform[column, j] = (-A[row,j]+A[row, j]%A[row, column]) div A[row, column];
    18431843          if(A[row,j]<0){
    18441844            transform[column,j]=transform[column,j]+1;}
     
    20012001      {
    20022002        v = H[1..r,i];
    2003         mdeg = mdeg-(mdeg[row]-mdeg[row]%v[row])/v[row]*v;
     2003        mdeg = mdeg-(mdeg[row]-mdeg[row]%v[row]) div v[row]*v;
    20042004      }
    20052005    }
Note: See TracChangeset for help on using the changeset viewer.