| version 1.1, 2002/02/04 07:58:28 |
version 1.2, 2002/02/09 06:21:02 |
|
|
| /* $OpenXM$ */ |
/* $OpenXM: OpenXM/src/kan96xx/Kan/poly3a.c,v 1.1 2002/02/04 07:58:28 takayama Exp $ */ |
| #include <stdio.h> |
#include <stdio.h> |
| #include "datatype.h" |
#include "datatype.h" |
| #include "extern2.h" |
#include "extern2.h" |
| Line 314 void monomialMult_differential_difference(e,f,mt) |
|
| Line 314 void monomialMult_differential_difference(e,f,mt) |
|
| } |
} |
| |
|
| /* Note also that mpMult_diff assumes coefficients and Dx commutes each other*/ |
/* Note also that mpMult_diff assumes coefficients and Dx commutes each other*/ |
| POLY mpMult_diff(POLY f,POLY g) |
POLY mpMult_difference(POLY f,POLY g) |
| { |
{ |
| int k; |
int k; |
| POLY r,temp; |
POLY r,temp; |
| mt_declare_locals() |
mt_declare_locals() |
| struct multTable *mt; |
struct multTable *mt; |
| |
|
| /* printf("mpMult_diff(%s,%s)\n",POLYToString(f,'*',1),POLYToString(g,'*',1)); */ |
/* printf("mpMult_difference(%s,%s)\n",POLYToString(f,'*',1),POLYToString(g,'*',1)); */ |
| |
|
| if (f == POLYNULL || g == POLYNULL) return(POLYNULL); |
if (f == POLYNULL || g == POLYNULL) return(POLYNULL); |
| checkRing(f,g); |
checkRing(f,g); |