Changeset 4dbeb1 in git


Ignore:
Timestamp:
Aug 10, 2011, 3:23:20 PM (13 years ago)
Author:
Oleksandr Motsak <motsak@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'c7af8613769b29c741d6c338945669719f1fc4f8')
Children:
cf41549933e3a2f719c447992e836d965e3be351
Parents:
3705cd9bb524607a0a68e71450ae458b8cb98e69
git-author:
Oleksandr Motsak <motsak@mathematik.uni-kl.de>2011-08-10 15:23:20+02:00
git-committer:
Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 13:17:28+01:00
Message:
FIX: idNormalize -> id_Normalize(..., +ring), currRingHdl is defined in ipid.h
Location:
Singular
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • Singular/gms.cc

    r3705cd9 r4dbeb1  
    1111#ifdef HAVE_GMS
    1212
    13 #include <kernel/febase.h>
    14 #include <kernel/structs.h>
     13#include "gms.h"
     14
    1515#include <coeffs/numbers.h>
    1616#include <polys/polys.h>
    17 #include <kernel/ideals.h>
    18 #include <Singular/lists.h>
    19 #include <polys/matpol.h>
    20 #include <Singular/gms.h>
     17#include <kernel/febase.h>
    2118
     19#include "ipid.h"
    2220
    2321lists gmsNF(ideal p,ideal g,matrix B,int D,int K)
     
    2826  matrix B0=mpNew(MATROWS(B),MATCOLS(B));
    2927  for(int i=1;i<=MATROWS(B0);i++)
    30     for(int j=1;j<=MATCOLS(B0);j++)
     28     for(int j=1;j<=MATCOLS(B0);j++)
    3129      if(MATELEM(B,i,j)!=NULL)
    3230        MATELEM(B0,i,j)=pDiff(MATELEM(B,i,j),i+1);
     
    8684  idDelete((ideal *)&B0);
    8785
    88   idNormalize(r);
    89   idNormalize(q);
     86  id_Normalize(r, currRing);
     87  id_Normalize(q, currRing);
    9088
    9189  lists l=(lists)omAllocBin(slists_bin);
  • Singular/gms.h

    r3705cd9 r4dbeb1  
    1010#define GMS_H
    1111
    12 lists gmsNF(ideal p,ideal g,matrix B,int D,int K);
    13 BOOLEAN gmsNF(leftv res,leftv h);
     12#include <misc/auxiliary.h>
     13#include <polys/matpol.h>
     14
     15#include <kernel/structs.h>
     16#include <kernel/ideals.h>
     17
     18#include <Singular/lists.h>
     19lists gmsNF(ideal p, ideal g, matrix B, int D, int K);
     20BOOLEAN gmsNF(leftv res, leftv h);
    1421
    1522#endif /* GMS_H */
Note: See TracChangeset for help on using the changeset viewer.