OpenXM/src/kan96xx/Kan/order.c - diff

Return to order.c CVS log

Up to [local] / OpenXM / src / kan96xx / Kan

version 1.4, 2001/05/04 01:06:24

version 1.5, 2002/02/09 06:21:02

Line 1

/* $OpenXM: OpenXM/src/kan96xx/Kan/order.c,v 1.3 2000/06/09 08:02:02 takayama Exp $ */

/* $OpenXM: OpenXM/src/kan96xx/Kan/order.c,v 1.4 2001/05/04 01:06:24 takayama Exp $ */

#include <stdio.h>

#include "datatype.h"

#include "stackm.h"

Line 58 void showRing(level,ringp)

int P;

char *mtype;

extern char *F_isSameComponent;

POLY f;

fp = stdout;

N=ringp->n; M = ringp->m; L = ringp->l; C = ringp->c;

Line 92 void showRing(level,ringp)

Line 93 void showRing(level,ringp)

fprintf(fp,"\n");

fprintf(fp,"where ");

for (i=L; i<M; i++) {

fprintf(fp," %s %s - %s %s = %s, ",TransD[i],TransX[i],

fprintf(fp," %s %s - %s %s = ",TransD[i],TransX[i],

TransX[i],TransD[i],

TransX[i],TransD[i]);

TransD[i]);

f=ppSub(ppMult(cdd(1,i,1,ringp),cxx(1,i,1,ringp)),

ppMult(cxx(1,i,1,ringp),cdd(1,i,1,ringp)));

fprintf(fp," %s, ",POLYToString(f,'*',0));

}

fprintf(fp,"\n\n");

}