source: git/kernel/hutil.h @ 998298c

spielwiese
Last change on this file since 998298c was 998298c, checked in by Hans Schönemann <hannes@…>, 14 years ago
structs.h cleanup git-svn-id: file:///usr/local/Singular/svn/trunk@12463 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 2.3 KB
Line 
1#ifndef HUTIL_H
2#define HUTIL_H
3/****************************************
4*  Computer Algebra System SINGULAR     *
5****************************************/
6/*
7* ABSTRACT
8*/
9typedef int * scmon;
10typedef scmon * scfmon;
11typedef int * varset;
12struct monrec;
13typedef struct monrec monh;
14typedef monh * monp;
15typedef monp * monf;
16struct monrec
17{
18  scfmon mo;
19  int a;
20};
21
22typedef struct sindlist indlist;
23typedef indlist * indset;
24struct sindlist
25{
26  indset nx;
27  intvec * set;
28};
29
30#define LEN_MON (sizeof(scfmon) + sizeof(int))
31
32extern struct omBin_s* indlist_bin;
33
34extern scfmon hexist, hstc, hrad, hwork;
35extern scmon hpure, hpur0;
36extern varset hvar, hsel;
37extern int hNexist, hNstc, hNrad, hNvar, hNpure;
38extern monf stcmem, radmem;
39extern int hisModule;
40extern monf stcmem, radmem;
41extern indset ISet, JSet;
42extern int  hCo, hMu, hMu2;
43
44
45scfmon hInit(ideal S, ideal Q, int * Nexist, ring tailRing = currRing);
46void hDelete(scfmon ev, int ev_length);
47void hComp(scfmon exist, int Nexist, int ak, scfmon stc, int * Nstc);
48void hSupp(scfmon stc, int Nstc, varset var, int * Nvar);
49void hOrdSupp(scfmon stc, int Nstc, varset var, int Nvar);
50void hStaircase(scfmon stc, int * Nstc, varset var, int Nvar);
51void hRadical(scfmon rad, int * Nrad, int Nvar);
52void hLexS(scfmon stc, int Nstc, varset var, int Nvar);
53void hLexR(scfmon rad, int Nrad, varset var, int Nvar);
54void hPure(scfmon stc, int a, int *Nstc, varset var, int Nvar,
55 scmon pure, int *Npure);
56void hElimS(scfmon stc, int * e1, int a2, int e2,varset var, int Nvar);
57void hElimR(scfmon rad, int * e1, int a2, int e2,varset var, int Nvar);
58void hLex2S(scfmon stc, int e1, int a2, int e2,varset var,
59 int Nvar, scfmon w);
60void hLex2R(scfmon rad, int e1, int a2, int e2,varset var,
61 int Nvar, scfmon w);
62void hStepS(scfmon stc, int Nstc, varset var, int Nvar,int *a, int *x);
63void hStepR(scfmon rad, int Nrad, varset var, int Nvar,int *a);
64monf hCreate(int Nvar);
65void hKill(monf xmem, int Nvar);
66scfmon hGetmem(int lm, scfmon old, monp monmem);
67scmon hGetpure(scmon p);
68void hDimSolve(scmon pure, int Npure, scfmon rad, int Nrad,
69 varset var, int Nvar);
70void hIndMult(scmon pure, int Npure, scfmon rad, int Nrad,
71 varset var, int Nvar);
72void hIndAllMult(scmon pure, int Npure, scfmon rad, int Nrad,
73 varset var, int Nvar);
74void hDegreeSeries(intvec *s1, intvec *s2, int *co, int *mu);
75
76#endif
Note: See TracBrowser for help on using the repository browser.