Changeset 662ece in git for Singular/LIB


Ignore:
Timestamp:
Feb 22, 2013, 11:21:00 AM (11 years ago)
Author:
Oleksandr Motsak <motsak@…>
Branches:
(u'spielwiese', '6e5adcba05493683b94648c659a729c189812c77')
Children:
e070751c183f5cec7c3ec5339a0b53ff93302566
Parents:
a77d2792a2d6c14b59535b46c2dee9aba649b9b0
git-author:
Oleksandr Motsak <motsak@mathematik.uni-kl.de>2013-02-22 11:21:00+01:00
git-committer:
Oleksandr Motsak <motsak@mathematik.uni-kl.de>2013-02-22 11:24:00+01:00
Message:
DeRahm - related changes
File:
1 edited

Legend:

Unmodified
Added
Removed

  • Singular/LIB/derham.lib

    ra77d27 r662ece  
    499499      annihilators we computed for L[i]  ->this will ensure  we can compute
    500500      the maps of the MV complex*/
    501       minroot=minIntRoot(findminintroot);
     501      minroot=minIntRoot0(findminintroot);
    502502      for (j=1; j<=i; j++)
    503503      {
    … …  
    583583        s-parametric annihilators we computed for L[i]  ->this will
    584584        ensure  we can compute the maps of the MV complex*/
    585         minroot=minIntRoot(findminintroot);
     585        minroot=minIntRoot0(findminintroot);
    586586        for (j=1; j<=i; j++)
    587587        {
    … …  
    34203420  for (i=1; i<=size(G4); i++)
    34213421  {
    3422     minmax[i]=minIntRoot(G4[i],1);
     3422    minmax[i]=minIntRoot0(G4[i],1);
    34233423    if (size(minmax[i])!=0)
    34243424    {
    … …  
    42964296////////////////////////////////////////////////////////////////////////////////////
    42974297
    4298 static proc minIntRoot(list L,list #)
    4299 "USAGE:minIntRoot(L [,M]); L list, M optinonal list
     4298static proc minIntRoot0(list L,list #)
     4299"USAGE:minIntRoot0(L [,M]); L list, M optinonal list
    43004300ASSUME:L a list of univariate polynomials with rational coefficients @*
    43014301       the variable of the polynomial is s if size(#)==0 (needed for proc
Note: See TracChangeset for help on using the changeset viewer.