version 1.2, 2000/01/16 07:55:38 |
version 1.3, 2003/04/09 01:06:57 |
|
|
/* $OpenXM$ */ |
/* $OpenXM: OpenXM/src/kan96xx/Kan/extern2.h,v 1.2 2000/01/16 07:55:38 takayama Exp $ */ |
/* poly.c */ |
/* poly.c */ |
void KinitKan(void); |
void KinitKan(void); |
MONOMIAL newMonomial(struct ring *ringp); |
MONOMIAL newMonomial(struct ring *ringp); |
Line 185 int (*grade)(POLY f); |
|
Line 185 int (*grade)(POLY f); |
|
#define checkRing2(f,g) {\ |
#define checkRing2(f,g) {\ |
if ((f)->m->ringp != (g)->m->ringp) {\ |
if ((f)->m->ringp != (g)->m->ringp) {\ |
fprintf(stderr,"f and g must be in a same ring. Type in ctrl-\\");\ |
fprintf(stderr,"f and g must be in a same ring. Type in ctrl-\\");\ |
getchar(); getchar(); exit();\ |
getchar(); getchar(); exit(1);\ |
}\ |
}\ |
} |
} |
|
|