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

Return to kanExport1.c CVS log

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

version 1.12, 2004/07/30 11:21:55

version 1.13, 2004/07/31 02:23:02

Line 1

/* $OpenXM: OpenXM/src/kan96xx/Kan/kanExport1.c,v 1.11 2004/02/23 09:03:42 takayama Exp $ */

/* $OpenXM: OpenXM/src/kan96xx/Kan/kanExport1.c,v 1.12 2004/07/30 11:21:55 takayama Exp $ */

#include <stdio.h>

#include "datatype.h"

#include "stackm.h"

Line 1397 struct object KgetExponents(struct object obPoly,struc

tob = KgetExponents(getoa(obPoly,i),otype);

putoa(rob,i,tob);

}

return rob;

}else{

errorKan1("%s\n","KgetExponents(): argument must be a polynomial.");

}