Changeset 6f84e21 in git


Ignore:
Timestamp:
Mar 19, 2012, 6:56:53 PM (12 years ago)
Author:
Oleksandr Motsak <motsak@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '45e267b9942dec9429fe249ce3e5e44ab80a6a3a')
Children:
1090a989f7d101fde20b92a6a0a5544ba05b8f9b
Parents:
6725bc35b7238be24cfd7a910c9493d9a59d5a91
git-author:
Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-03-19 18:56:53+01:00
git-committer:
Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-03-19 19:03:54+01:00
Message:
fix: "? wrong type declaration. type 'help poly;'" was due to making 'denominator' & 'numerator' - reserved words (kernel functions)
Location:
Singular/LIB
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/multigrading.lib

    r6725bc3 r6f84e21  
    38283828  // this uniqueness if switching to this torsion ring.
    38293829
    3830   poly monom, summand, numerator;
    3831   poly denominator = 1;
     3830  poly monom, summand, @numerator;
     3831  poly @denominator = 1;
    38323832
    38333833  for( i = 1; i <= cc; i++)
     
    38533853    }
    38543854
    3855     denominator = denominator * (1 - monom);
     3855    @denominator = @denominator * (1 - monom);
    38563856  }
    38573857
     
    38783878      summand = summand + monom;
    38793879    }
    3880     numerator = numerator - (-1)^j * summand;
    3881   }
    3882 
    3883   if( denominator == 0 )
     3880    @numerator = @numerator - (-1)^j * summand;
     3881  }
     3882
     3883  if( @denominator == 0 )
    38843884  {
    38853885    ERROR("Multigrading not positive.");
    38863886  }
    38873887
    3888   poly denominator1 = denominator;
    3889   poly numerator1 = numerator;
     3888  poly denominator1 = @denominator;
     3889  poly numerator1 = @numerator;
    38903890
    38913891  export denominator1;
     
    38943894  if( numerator != 0 )
    38953895  {
    3896     poly d = gcd(denominator, numerator);
    3897 
    3898     poly denominator2 = denominator/d;
    3899     poly numerator2 = numerator/d;
     3896    poly d = gcd(@denominator, @numerator);
     3897
     3898    poly denominator2 = @denominator/d;
     3899    poly numerator2 = @numerator/d;
    39003900
    39013901    if( gcd(denominator2, numerator2) != 1 )
     
    39063906  else
    39073907  {
    3908     poly denominator2 = denominator;
    3909     poly numerator2 = numerator;
     3908    poly denominator2 = @denominator;
     3909    poly numerator2 = @numerator;
    39103910  }
    39113911
  • Singular/LIB/reesclos.lib

    r6725bc3 r6f84e21  
    406406  int length = size(images)-1;             // the number of generators
    407407  poly image;
    408   poly denominator = images[length+1];     // the universal denominator
     408  poly @denominator = images[length+1];     // the universal denominator
    409409
    410410  if (size(#)>0)
     
    429429  for (j=1;j<=length;j++)
    430430  {
    431     images[j] = (images[j]/denominator); // construct the fraction
     431    images[j] = (images[j]/@denominator); // construct the fraction
    432432    image = images[j];
    433433    if (dblvl>0)
Note: See TracChangeset for help on using the changeset viewer.