Changeset 6d8067 in git for Singular


Ignore:
Timestamp:
Sep 1, 2016, 12:49:01 PM (8 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
a807c5a8eb9a2ad1143f248981fa1bdcac697a5b
Parents:
d4e6a9eab50cd94d6a7a4660b9b587bfe8242de6
git-author:
Hans Schoenemann <hannes@mathematik.uni-kl.de>2016-09-01 12:49:01+02:00
git-committer:
Hans Schoenemann <hannes@mathematik.uni-kl.de>2016-09-01 12:50:11+02:00
Message:
fix (JP Flori): ring construction im mprimdec.lib
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/mprimdec.lib

    rd4e6a9 r6d8067  
    11//////////////////////////////////////////////////////////////////////////////
    22
    3 version="version mprimdec.lib 4.0.0.0 Jun_2013 "; // $Id$
     3version="version mprimdec.lib 4.0.3.3 Sep_2016 "; // $Id$
    44category="Commutative Algebra";
    55
     
    223223  {
    224224    def BAS=basering;
    225     execute("ring Rloc=("+charstr(basering)+","+varstr(basering)+"),dummy,("+ordstr(basering)+");");
     225    execute("ring Rloc=("+charstr(basering)+","+varstr(basering)+"),dummy,(C,dp);");
    226226    module @N=imap(BAS, @N);
    227227    poly @q=prepareSat(@N);
     
    633633  if(size(ann)==0)
    634634  {
    635     execute("ring Rloc=("+charstr(basering)+","+varstr(basering)+"),dummy,("+ordstr(basering)+");");
     635    execute("ring Rloc=("+charstr(basering)+","+varstr(basering)+"),dummy,(C,dp);");
    636636    module @N=imap(BAS, @N);
    637637    poly @q=prepareSat(@N);
     
    14231423  if(size(ann)==0)      //check, whether ann=0
    14241424  {
    1425    execute("ring Rloc=("+charstr(basering)+","+varstr(basering)+"),dummy,("+ordstr(basering)+");");
     1425   execute("ring Rloc=("+charstr(basering)+","+varstr(basering)+"),dummy,(C,dp);");
    14261426   module @N=clrSBmod(imap(BAS, @N));
    14271427   module @M=freemodule(nrows(@N));
Note: See TracChangeset for help on using the changeset viewer.