| version 1.16, 2003/08/27 03:11:12 |
version 1.17, 2003/09/10 07:41:25 |
|
|
| /* $OpenXM: OpenXM/src/kan96xx/Kan/ecart.c,v 1.15 2003/08/26 05:52:43 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/kan96xx/Kan/ecart.c,v 1.16 2003/08/27 03:11:12 takayama Exp $ */ |
| #include <stdio.h> |
#include <stdio.h> |
| #include "datatype.h" |
#include "datatype.h" |
| #include "extern2.h" |
#include "extern2.h" |
| Line 745 static POLY reduction_ecart1_mod(r,gset) |
|
| Line 745 static POLY reduction_ecart1_mod(r,gset) |
|
| KshowRing(TraceLift_ringmod); **/ |
KshowRing(TraceLift_ringmod); **/ |
| |
|
| r = modulop(r,TraceLift_ringmod); |
r = modulop(r,TraceLift_ringmod); |
| rp = r->m->ringp; /* reset rp */ |
if (r != POLYNULL) rp = r->m->ringp; /* reset rp */ |
| |
|
| /* printf("r=%s (mod p)\n",POLYToString(head(r),'*',1)); **/ |
/* printf("r=%s (mod p)\n",POLYToString(head(r),'*',1)); **/ |
| |
|
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to ecart.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / kan96xx / Kan