Changeset ed7a55c in git for Singular/LIB/gmssing.lib


Ignore:
Timestamp:
May 4, 2011, 6:43:04 PM (13 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
67803ecd35bc4dd74c768bc01e2b8fc76697c8b3
Parents:
1396fe648a0f4205e55e98d2dae5d30cb1b6163c
Message:
use div instead of /, part 3


git-svn-id: file:///usr/local/Singular/svn/trunk@14194 2c84dea3-7e68-4137-9b89-c4e89433aadc
File:
1 edited

Legend:

Unmodified
Added
Removed

  • Singular/LIB/gmssing.lib

    r1396fe red7a55c  
    853853  {
    854854    j=leadexp(H0[i])[nvars(basering)+1];
    855     a[i]=A[j,j]+ord(H0[i])/deg(var(1))-1;
     855    a[i]=A[j,j]+ord(H0[i]) div deg(var(1))-1;
    856856    w[i]=v[j]+n;
    857857  }
    858858  H=H*H0;
    859   H=simplify(jet(H/var(1)^(mindegree(H)/deg(var(1))),0),1);
     859  H=simplify(jet(H/var(1)^(mindegree(H) div deg(var(1))),0),1);
    860860
    861861  kill l;
    … …  
    10321032
    10331033  H0=H*H0;
    1034   H0=H0/var(1)^(mindegree(H0)/deg(var(1)));
     1034  H0=H0/var(1)^(mindegree(H0) div deg(var(1)));
    10351035
    10361036  return(A0,H0);
Note: See TracChangeset for help on using the changeset viewer.