Changeset 2e85a1 in git


Ignore:
Timestamp:
Dec 14, 2012, 4:50:23 PM (11 years ago)
Author:
Martin Lee <martinlee84@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b4f17ed1d25f93d46dbe29e4b499baecc2fd51bb')
Children:
6bb9d98190052a76f6d3e74e821b63ea531d8124
Parents:
0486a3f557b13057ce2046dfee2f6fabc0dad2ac
Message:
fix: rInit due to fixed Z/n^m init
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/ipshell.cc

    r0486a3 r2e85a1  
    5757#include <coeffs/mpr_complex.h>
    5858#include <coeffs/longrat.h>
     59#include <coeffs/rmodulon.h>
    5960
    6061#include <numeric/mpr_base.h>
     
    52165217        //ringtype = 1;       // Use Z/2^ch
    52175218        cf=nInitChar(n_Z2m,(void*)(long)modExponent);
     5219        //TODO free modBase -> will be set inside nInitChar
    52185220      }
    52195221      else
    52205222      {
    52215223        //ringtype = 3;
    5222         cf=nInitChar(n_Zpn,(void*)(long)modBase);
     5224        ZnmInfo info;
     5225        info.base= modBase;
     5226        info.exp= modExponent;
     5227        cf=nInitChar(n_Znm,(void*) &info); //exponent is missing
     5228        //TODO free modBase -> will be set inside nInitChar
    52235229      }
    52245230    }
     
    52275233    {
    52285234      //ringtype = 2;
    5229       const int ch = mpz_get_ui(modBase);
    5230       cf=nInitChar(n_Zn,(void*)(long)ch);
     5235      ZnmInfo info;
     5236      info.base= modBase;
     5237      info.exp= modExponent;
     5238      cf=nInitChar(n_Zn,(void*) &info);
     5239        //TODO free modBase -> will be set inside nInitChar
    52315240    }
    52325241    assume( cf != NULL );
Note: See TracChangeset for help on using the changeset viewer.