source: git/kernel/combinatorics/hutil.h @ a3f0fea

spielwiese
Last change on this file since a3f0fea was a3f0fea, checked in by Reimer Behrends <behrends@…>, 5 years ago
Modify variable declarions for pSingular.
  • Property mode set to 100644
File size: 2.6 KB
Line 
1#ifndef HUTIL_H
2#define HUTIL_H
3/****************************************
4*  Computer Algebra System SINGULAR     *
5****************************************/
6/*
7* ABSTRACT
8*/
9
10#include "polys/monomials/ring.h"
11#include "kernel/polys.h"
12#include "misc/intvec.h"
13
14typedef int * scmon;
15typedef scmon * scfmon;
16typedef int * varset;
17struct monrec;
18typedef struct monrec monh;
19typedef monh * monp;
20typedef monp * monf;
21struct monrec
22{
23  scfmon mo;
24  int a;
25};
26
27typedef struct sindlist indlist;
28typedef indlist * indset;
29struct sindlist
30{
31  indset nx;
32  intvec * set;
33};
34
35#define LEN_MON (sizeof(scfmon) + sizeof(int))
36
37EXTERN_VAR omBin indlist_bin;
38
39EXTERN_VAR scfmon hexist, hstc, hrad, hwork;
40EXTERN_VAR scmon hpure, hpur0;
41EXTERN_VAR varset hvar, hsel;
42EXTERN_VAR int hNexist, hNstc, hNrad, hNvar, hNpure;
43EXTERN_VAR monf stcmem, radmem;
44EXTERN_VAR int hisModule;
45EXTERN_VAR monf stcmem, radmem;
46EXTERN_VAR indset ISet, JSet;
47EXTERN_VAR int  hCo, hMu, hMu2;
48
49
50void hDelete(scfmon ev, int ev_length);
51void hComp(scfmon exist, int Nexist, int ak, scfmon stc, int * Nstc);
52void hSupp(scfmon stc, int Nstc, varset var, int * Nvar);
53void hOrdSupp(scfmon stc, int Nstc, varset var, int Nvar);
54void hStaircase(scfmon stc, int * Nstc, varset var, int Nvar);
55void hRadical(scfmon rad, int * Nrad, int Nvar);
56void hLexS(scfmon stc, int Nstc, varset var, int Nvar);
57void hLexR(scfmon rad, int Nrad, varset var, int Nvar);
58void hPure(scfmon stc, int a, int *Nstc, varset var, int Nvar,
59 scmon pure, int *Npure);
60void hElimS(scfmon stc, int * e1, int a2, int e2,varset var, int Nvar);
61void hElimR(scfmon rad, int * e1, int a2, int e2,varset var, int Nvar);
62void hLex2S(scfmon stc, int e1, int a2, int e2,varset var,
63 int Nvar, scfmon w);
64void hLex2R(scfmon rad, int e1, int a2, int e2,varset var,
65 int Nvar, scfmon w);
66void hStepS(scfmon stc, int Nstc, varset var, int Nvar,int *a, int *x);
67void hStepR(scfmon rad, int Nrad, varset var, int Nvar,int *a);
68monf hCreate(int Nvar);
69void hKill(monf xmem, int Nvar);
70scfmon hGetmem(int lm, scfmon old, monp monmem);
71scmon hGetpure(scmon p);
72void hDimSolve(scmon pure, int Npure, scfmon rad, int Nrad,
73 varset var, int Nvar);
74void hIndMult(scmon pure, int Npure, scfmon rad, int Nrad,
75 varset var, int Nvar);
76void hIndAllMult(scmon pure, int Npure, scfmon rad, int Nrad,
77 varset var, int Nvar);
78void hDegreeSeries(intvec *s1, intvec *s2, int *co, int *mu);
79
80
81scfmon hInit(ideal S, ideal Q, int * Nexist, ring tailRing);
82void slicehilb(ideal I);
83void HilbertSeries_OrbitData(ideal S, int lV, bool ig, bool mgrad, bool odp, int trunDegHs);
84ideal  RightColonOperation(ideal i, poly w, int lV);
85#endif
Note: See TracBrowser for help on using the repository browser.