Changeset 977f94 in git for kernel/kutil.cc


Ignore:
Timestamp:
Oct 5, 2006, 12:30:03 PM (18 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
ded4ee6c4c561eaf2513cbc7df1f8b1d60dd0ed1
Parents:
1270db5f01f485ad9468a63f65555465d4ccf057
Message:
*hannes: format


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

Legend:

Unmodified
Added
Removed
  • kernel/kutil.cc

    r1270db r977f94  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: kutil.cc,v 1.30 2006-08-14 17:08:36 wienand Exp $ */
     4/* $Id: kutil.cc,v 1.31 2006-10-05 10:30:03 Singular Exp $ */
    55/*
    66* ABSTRACT: kernel: utils for kStd
     
    10221022  (*Lp).length = 0;
    10231023}
    1024          
     1024
    10251025void initEcartPairMora (LObject* Lp,poly f,poly g,int ecartF,int ecartG)
    10261026{
     
    21782178  }
    21792179  tmp2 = p_NSet(nCopy(pGetCoeff(zeroPoly)), leadRing);
    2180   for (int i = 1; i <= leadRing->N; i++) {
     2180  for (int i = 1; i <= leadRing->N; i++)
     2181  {
    21812182    pSetExp(tmp2, i, p_GetExp(zeroPoly, i, tailRing));
    21822183  }
     
    22542255}
    22552256
    2256 /* 
     2257/*
    22572258 * Create the Groebner basis of the vanishing polynomials.
    22582259 */
     
    24032404      }
    24042405      poly tmp = p_ISet((long) ((p)->coef), currRing);
    2405       for (int i = 1; i <= currRing->N; i++) {
     2406      for (int i = 1; i <= currRing->N; i++)
     2407      {
    24062408        pSetExp(tmp, i, p_GetExp(p, i, strat->tailRing));
    24072409      }
     
    34403442  long tmp = coeff;
    34413443  int ind = 0;
    3442   while (tmp % 2 == 0) {
     3444  while (tmp % 2 == 0)
     3445  {
    34433446    tmp = tmp / 2;
    34443447    ind++;
     
    40364039/* obsolete
    40374040#ifdef HAVE_RING2TOM
    4038         if (currRing->cring == 1) {
     4041        if (currRing->cring == 1)
     4042        {
    40394043            With = kRingFindDivisibleByInS(strat, pos, &Ln, &With_s);
    40404044        } else
     
    40494053/* Obsolete
    40504054#ifdef HAVE_RING2TOM
    4051         if (currRing->cring == 1) {
     4055        if (currRing->cring == 1)
     4056        {
    40524057           j = kRingFindDivisibleByInT(strat->T, strat->sevT, strat->tl, &Ln);
    40534058        } else
Note: See TracChangeset for help on using the changeset viewer.