Changeset beef52 in git


Ignore:
Timestamp:
Jun 22, 2010, 3:05:48 PM (14 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '79dfb9a6d258bfeb991428bdb25b8f55e9e809b2')
Children:
53f7163fe201cc7e502b3ed7c9ca438af57b001a
Parents:
075c01df3d8723eddf341fd2b5aebb368f0b6768
Message:
pDeleteLm -> pLmDelete

git-svn-id: file:///usr/local/Singular/svn/trunk@12894 2c84dea3-7e68-4137-9b89-c4e89433aadc
Location:
kernel
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • kernel/polys.cc

    r075c01 rbeef52  
    240240      {
    241241        // exponent to large: it is not a monomial
    242         p_DeleteLm(&rc,r);
     242        p_LmDelete(&rc,r);
    243243        return s_save;
    244244      }
     
    248248    {
    249249      // 1st char of is not a varname
    250       p_DeleteLm(&rc,r);
     250      p_LmDelete(&rc,r);
    251251      s--;
    252252      return s;
     
    254254  }
    255255done:
    256   if (r->cf->nIsZero(pGetCoeff(rc))) p_DeleteLm(&rc,r);
     256  if (r->cf->nIsZero(pGetCoeff(rc))) p_LmDelete(&rc,r);
    257257  else
    258258  {
     
    270270        if( p_GetExp(rc, k, r) > 1 )
    271271        {
    272           p_DeleteLm(&rc, r);
     272          p_LmDelete(&rc, r);
    273273          goto finish;
    274274        }
     
    691691  poly q;
    692692
    693   while ((*p!=NULL) && (pGetComp(*p)==k)) pDeleteLm(p);
     693  while ((*p!=NULL) && (pGetComp(*p)==k)) pLmDelete(p);
    694694  if (*p==NULL) return;
    695695  q = *p;
     
    702702  {
    703703    if (pGetComp(pNext(q))==k)
    704       pDeleteLm(&(pNext(q)));
     704      pLmDelete(&(pNext(q)));
    705705    else
    706706    {
     
    922922    if (pGetExp(pNext(h),n)!=0)
    923923    {
    924       pDeleteLm(&pNext(h));
     924      pLmDelete(&pNext(h));
    925925    }
    926926    else
     
    984984      res=pAdd(res,m);
    985985    }
    986     pDeleteLm(&h);
     986    pLmDelete(&h);
    987987  }
    988988  omFreeSize((ADDRESS)me,(pVariables+1)*sizeof(int));
  • kernel/spectrum.cc

    r075c01 rbeef52  
    4848    pIter(h);
    4949  }
    50   while( h!=(poly)NULL );
     50  while( h!=NULL );
    5151
    5252  return  FALSE;
     
    106106int     isMultiple( poly f,poly m )
    107107{
    108   while( f!=(poly)NULL )
     108  while( f!=NULL )
    109109  {
    110110    // ---------------------------------------------------
     
    139139{
    140140  poly m  = pOne();
    141   poly wc = (poly)NULL;
     141  poly wc = NULL;
    142142  int  mdegree;
    143143
     
    180180  poly    *ptr = &f;
    181181
    182   while( (*ptr)!=(poly)NULL )
     182  while( (*ptr)!=NULL )
    183183  {
    184184    if( pLmCmp( *ptr,hc )>=0 )
     
    204204  poly    *ptr = &f;
    205205
    206   while( (*ptr)!=(poly)NULL )
     206  while( (*ptr)!=NULL )
    207207  {
    208208    if( !isMultiple( Z,*ptr ) )
     
    212212    else
    213213    {
    214       pDeleteLm(ptr);
     214      pLmDelete(ptr);
    215215    }
    216216  }
     
    307307  int         carry,k;
    308308  multiCnt    C( pVariables,0 );
    309   poly        Z = (poly)NULL;
     309  poly        Z = NULL;
    310310
    311311  int         well = isWell( );
     
    326326      // ---------------------------
    327327
    328       NF->insert_node( m,(poly)NULL );
     328      NF->insert_node( m,NULL );
    329329    }
    330330    else if( isMultiple( Z,m ) )
     
    361361      nf = normalFormHC( nf,hc );
    362362
    363       if( pNext( nf )==(poly)NULL )
     363      if( pNext( nf )==NULL )
    364364      {
    365365        // ----------------------------------
     
    376376        nf = normalFormZ( nf,Z );
    377377
    378         if( pNext( nf )==(poly)NULL )
     378        if( pNext( nf )==NULL )
    379379        {
    380380          // ----------------------------------
     
    404404            nfhard = normalFormZ ( nfhard,Z );
    405405
    406             if( nfhard==(poly)NULL )
     406            if( nfhard==NULL )
    407407            {
    408408              NF->delete_monomial( m );
     
    435435    while( node!=(spectrumPolyNode*)NULL )
    436436    {
    437       if( node->nf!=(poly)NULL && pNext( node->nf )==(poly)NULL )
     437      if( node->nf!=NULL && pNext( node->nf )==NULL )
    438438      {
    439439        NF->delete_monomial( node->nf );
Note: See TracChangeset for help on using the changeset viewer.