version 1.14, 2004/07/29 08:13:42 |
version 1.15, 2005/06/16 05:07:23 |
|
|
/* $OpenXM: OpenXM/src/kan96xx/Kan/poly4.c,v 1.13 2004/06/12 07:29:46 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/kan96xx/Kan/poly4.c,v 1.14 2004/07/29 08:13:42 takayama Exp $ */ |
#include <stdio.h> |
#include <stdio.h> |
#include "datatype.h" |
#include "datatype.h" |
#include "stackm.h" |
#include "stackm.h" |
Line 41 struct matrixOfPOLY *parts(f,v) |
|
Line 41 struct matrixOfPOLY *parts(f,v) |
|
int *ev; |
int *ev; |
struct object *evList; |
struct object *evList; |
struct object *list; |
struct object *list; |
struct object ob; |
struct object ob = OINIT; |
POLY ans; |
POLY ans; |
POLY h; |
POLY h; |
extern struct ring *CurrentRingp; |
extern struct ring *CurrentRingp; |
Line 128 struct object parts2(f,v) |
|
Line 128 struct object parts2(f,v) |
|
int *ev; |
int *ev; |
struct object *evList; |
struct object *evList; |
struct object *list; |
struct object *list; |
struct object ob; |
struct object ob = OINIT; |
POLY ans; |
POLY ans; |
POLY h; |
POLY h; |
POLY ft; |
POLY ft; |
struct object ob1,ob2,rob; |
struct object ob1 = OINIT; |
|
struct object ob2 = OINIT; |
|
struct object rob = OINIT; |
|
|
|
|
if (f ISZERO || v ISZERO) { |
if (f ISZERO || v ISZERO) { |