Changeset 85fd90 in git for libpolys/polys/monomials


Ignore:
Timestamp:
Sep 28, 2011, 5:48:27 PM (13 years ago)
Author:
Burcin Erocal <burcin@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
d56ad872d739d42e59b1beb8ccc89be2a204530d
Parents:
32cc7e437ee85bf7d555756eb824eadce50d50c7
git-author:
Burcin Erocal <burcin@erocal.org>2011-09-28 17:48:27+02:00
git-committer:
Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 16:13:41+01:00
Message:
Fix rChangeCurrRing and make the interpreter pass precision info to real/complex coeffs constructor.
Location:
libpolys/polys/monomials
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • libpolys/polys/monomials/p_polys.cc

    r32cc7e r85fd90  
    29582958}
    29592959
    2960 /* -------------------------------------------------------- */
    2961 /*2
    2962 * change all global variables to fit the description of the new ring
    2963 */
    2964 
    2965 void p_SetGlobals(const ring r, BOOLEAN complete)
    2966 {
    2967 // // //  if (r->ppNoether!=NULL) p_Delete(&r->ppNoether,r); // ???
    2968 
    2969   if (complete)
    2970   {
    2971     test &= ~ TEST_RINGDEP_OPTS;
    2972     test |= r->options;
    2973   }
    2974 }
    29752960//
    29762961// resets the pFDeg and pLDeg: if pLDeg is not given, it is

  • libpolys/polys/monomials/p_polys.h

    r32cc7e r85fd90  
    18901890
    18911891/*-------------ring management:----------------------*/
    1892 void p_SetGlobals(const ring r, BOOLEAN complete = TRUE);
    18931892
    18941893// resets the pFDeg and pLDeg: if pLDeg is not given, it is

  • libpolys/polys/monomials/ring.cc

    r32cc7e r85fd90  
    102102//  return FALSE;
    103103//}
    104 
    105 /*
    106 
    107 /// internally changes the gloabl ring and resets the relevant
    108 /// global variables:
    109 /// SHOULD BE DEPRECATED NOW...?
    110 void rChangeCurrRing(ring r)
    111 {
    112  // if (!rMinpolyIsNULL(currRing))
    113  // {
    114  //   omCheckAddr(currRing->cf->minpoly);
    115  // }
    116   //------------ set global ring vars --------------------------------
    117   //currRing = r;
    118   //currQuotient=NULL;
    119   if (r != NULL)
    120   {
    121     rTest(r);
    122     //------------ set global ring vars --------------------------------
    123     //currQuotient=r->qideal;
    124 
    125     //------------ global variables related to coefficients ------------
    126     nSetChar(r->cf);
    127 
    128     //------------ global variables related to polys -------------------
    129     p_SetGlobals(r);
    130     //------------ global variables related to factory -----------------
    131   }
    132 }
    133 */
    134104
    135105ring rDefault(const coeffs cf, int N, char **n,int ord_size, int *ord, int *block0, int *block1)
Note: See TracChangeset for help on using the changeset viewer.