Changeset c22d84 in git


Ignore:
Timestamp:
Dec 20, 2000, 12:23:47 PM (22 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')
Children:
85e6342bb6f468ed007878e11c55866a1428299c
Parents:
24d587c69f03ebf0b0771f514b3c9bc6364a93ed
Message:
*hannes: pPow and nNormalize


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

Legend:

Unmodified
Added
Removed

  • Singular/maps.cc

    r24d587 rc22d84  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: maps.cc,v 1.33 2000-12-19 18:31:43 obachman Exp $ */
     4/* $Id: maps.cc,v 1.34 2000-12-20 11:23:47 Singular Exp $ */
    55/*
    66* ABSTRACT - the mapping of polynomials to other rings
    … …  
    215215
    216216  memcpy(names, currRing->names, currRing->N*sizeof(char*));
    217   memcpy(&(names[currRing->N]), theImageRing->names, (theImageRing->N*sizeof(char*)));
     217  memcpy(&(names[currRing->N]), theImageRing->names,
     218          (theImageRing->N*sizeof(char*)));
    218219  sip_sring tmpR;
    219220
    … …  
    368369          if (BVERBOSE(V_IMAP))
    369370            Print("// par %s: par %d -> nr %d\n",preim_par[i],i+1,j+1);
    370           /* var i+1 from preimage ring is var j+1  (index j+1) from image ring */
     371          /*par i+1 from preimage ring is var j+1  (index j+1) from image ring*/
    371372          par_perm[i]=j+1;
    372373          break;
    … …  
    381382            if (BVERBOSE(V_IMAP))
    382383              Print("// par %s: nr %d -> par %d\n",preim_par[i],i+1,j+1);
    383             /* var i+1 from preimage ring is par j+1 (index j) from image ring */
     384            /*par i+1 from preimage ring is par j+1 (index j) from image ring */
    384385            par_perm[i]=-(j+1);
    385386          }

  • Singular/polys1.cc

    r24d587 rc22d84  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: polys1.cc,v 1.59 2000-12-20 11:15:48 obachman Exp $ */
     4/* $Id: polys1.cc,v 1.60 2000-12-20 11:23:47 Singular Exp $ */
    55
    66/*
    … …  
    302302  {
    303303    rc = pMult(rc,pCopy(p));
     304    pNormalize(rc);
    304305    i--;
    305306  }
    … …  
    361362          if (rc == NULL)
    362363            return pMonPower(p,i);
    363           /* else: binom */
     364          /* else: binom ?*/
    364365          int char_p=rChar(currRing);
    365366          if (pNext(rc) != NULL)
Note: See TracChangeset for help on using the changeset viewer.