1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
|
#ifndef STAIRC_H
#define STAIRC_H
/****************************************
* Computer Algebra System SINGULAR *
****************************************/
/*
* ABSTRACT
*/
struct spolyrec ; typedef struct spolyrec polyrec; typedef polyrec * poly;
struct ip_sring ; typedef struct ip_sring * ring;
struct sip_sideal; typedef struct sip_sideal * ideal;
class intvec;
extern ring currRing;
void scComputeHC(ideal s,ideal Q, int k,poly &hEdge, ring tailRing = currRing);
#if 0 // - alternative implementation for tests
void scComputeHCw(ideal s,ideal Q, int k,poly &hEdge, ring tailRing = currRing);
#endif
intvec * scIndIntvec(ideal S, ideal Q=NULL);
// lists scIndIndset(ideal S, BOOLEAN all, ideal Q=NULL); // TODO: move to Singular/
int scDimInt(ideal s,ideal Q=NULL);
int scMultInt(ideal s,ideal Q=NULL);
int scMult0Int(ideal s,ideal Q=NULL, const ring tailRing = currRing);
void scPrintDegree(int co, int mu);
void scDegree(ideal s,intvec *modulweight,ideal Q=NULL);
ideal scKBase(int deg, ideal s, ideal Q=NULL, intvec * mv=NULL);
#endif
|
