version 1.4, 2005/06/16 05:07:23 |
version 1.5, 2020/10/06 11:33:46 |
|
|
/* $OpenXM: OpenXM/src/kan96xx/Kan/hilbert.c,v 1.3 2001/05/04 01:06:23 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/kan96xx/Kan/hilbert.c,v 1.4 2005/06/16 05:07:23 takayama Exp $ */ |
/* hilbert.c |
/* hilbert.c |
1992/06/16 |
1992/06/16 |
1992/06/18 |
1992/06/18 |
|
|
#include "extern.h" |
#include "extern.h" |
#include "extern2.h" |
#include "extern2.h" |
|
|
|
void warningHilbert(char str[]); |
|
void errorHilbert(char str[]); |
|
|
struct arrayOfPOLYold { |
struct arrayOfPOLYold { |
int n; |
int n; |
POLY *array; |
POLY *array; |
Line 219 static int polyToInt(POLY f) { |
|
Line 222 static int polyToInt(POLY f) { |
|
} |
} |
|
|
|
|
static shell(v,n) |
static void shell(v,n) |
int v[]; |
int v[]; |
int n; |
int n; |
{ |
{ |
Line 750 outputarrayOfPOLYold(set) |
|
Line 753 outputarrayOfPOLYold(set) |
|
#endif |
#endif |
|
|
|
|
warningHilbert(str) |
void warningHilbert(char str[]) |
char str[]; |
|
{ |
{ |
fprintf(stderr,"Warning (hilbert.c): %s\n",str); |
fprintf(stderr,"Warning (hilbert.c): %s\n",str); |
} |
} |
|
|
errorHilbert(str) |
void errorHilbert(char str[]) |
char str[]; |
|
{ |
{ |
errorKan1("%s\n",str); |
errorKan1("%s\n",str); |
} |
} |