OpenXM/src/kan96xx/Kan/extern.h - diff

Return to extern.h CVS log

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

Diff for /OpenXM/src/kan96xx/Kan/extern.h between version 1.1 and 1.24

version 1.1, 1999/10/08 02:12:01

version 1.24, 2004/09/09 11:42:22

Line 1

/* $OpenXM: OpenXM/src/kan96xx/Kan/extern.h,v 1.23 2004/09/09 03:14:46 takayama Exp $ */

/*********** global variables for module stackmachine***************/

extern int VerboseStack;

extern int DebugStack;

extern FILE *Fstack;

#if defined(__CYGWIN__)

extern sigjmp_buf EnvOfStackMachine;

#else

extern jmp_buf EnvOfStackMachine;

#endif

extern struct object NullObject;

extern struct object NoObject;

extern int Lookup[TYPES][TYPES];

Line 60 void printObjectArray(struct object ob,int nl,FILE *fp

Line 65 void printObjectArray(struct object ob,int nl,FILE *fp

/* stackmachine.c misc*/

void scanner(void);

void ctrlC(int sig);

void cancelAlarm();

int executeToken(struct tokens token);

int executePrimitive(struct object ob);

int isLiteral(char *str);

Line 74 void KSpush(struct object ob);

Line 80 void KSpush(struct object ob);

char * KSstringPop(void);

int KSstackPointer(void);

struct object KSdupErrors(void);

struct object KSpeek(int k);

/* stackmachine.c context */

struct context *newContext0(struct context *super,char *name);

Line 83 void KsetContext(struct object contextobj);

Line 90 void KsetContext(struct object contextobj);

void contextControl(actionOfContextControl ctl);

struct object getSuperContext(struct object contextObj) ;

/* stackmachine.c back-trace */

void tracePushName(char *s);

void traceClearStack(void);

char *tracePopName(void);

char *traceShowStack(void);

/* kclass.c */

int initClassDataBase();

void fprintClass(FILE *fp,struct object ob);

Line 115 struct object *cdr(struct object *list);

Line 128 struct object *cdr(struct object *list);

void printObjectList(struct object *op);

int memberQ(struct object *list1,struct object list2);

struct object KvJoin(struct object listo1,struct object listo2);

struct object Kcar(struct object listo);

struct object Kcdr(struct object listo);

struct object KlistToArray(struct object listo);

struct object KarrayToList(struct object ob);

/* list:conversion */

struct object listToArray(struct object *op);

struct object *arrayToList(struct object ob);

Line 129 struct object KaoMult(struct object aa,struct object b

Line 148 struct object KaoMult(struct object aa,struct object b

struct object KooDiv2(struct object ob1,struct object ob2);

struct object KoNegate(struct object ob1);

struct object KreduceRationalFunction(struct object ob);

struct object KooPower(struct object ob1,struct object ob2);

/* for rational function object */

struct object KoInverse(struct object ob);

Line 149 struct object KooLess(struct object o1,struct object o

Line 169 struct object KooLess(struct object o1,struct object o

/** Conversion */

struct object KdataConversion(struct object ob1, char *key);

struct object Kto_int32(struct object ob);

struct object KpoInteger(int i);

struct object KpoString(char *s);

struct object KpoPOLY(POLY f);

Line 156 struct object KpoArrayOfPOLY(struct arrayOfPOLY *ap);

Line 177 struct object KpoArrayOfPOLY(struct arrayOfPOLY *ap);

struct object KpoMatrixOfPOLY(struct matrixOfPOLY *mp);

struct object KpoRingp(struct ring *ringp);

struct object KpoDouble(double a);

struct object KpoUniversalNumber(struct coeff *u);

struct object KintToUniversalNumber(int n);

#define KopInteger(o) ( (o).lc.ival )

#define KopString(o) ( (o).lc.str )

#define KopPOLY(o) ( (o).lc.poly )

Line 181 int objArrayToOrderMatrix(struct object oA,int order[]

Line 204 int objArrayToOrderMatrix(struct object oA,int order[]

int KsetOrderByObjArray(struct object oA);

struct object oGetOrderMatrix(struct ring *ringp); /* order.c */

struct object KgetOrderMatrixOfCurrentRing();

struct object oRingToOXringStructure(struct ring *ringp); /* order.c */

int KsetUpRing(struct object ob1,struct object ob2, struct object ob3,struct object ob4,struct object ob5);

void KshowRing(struct ring *ringp);

struct object KdefaultPolyRing(struct object num);

Line 204 struct object Keval(struct object obj);

Line 228 struct object Keval(struct object obj);

/** misc **/

struct object KtoRecords(struct object ob1);

struct object KstringToArgv(struct object ob1);

void Kclose(void);

int warningKan(char *s);

int warningKanNoStrictMode(char *s);

int errorKan1(char *s,char *m);

struct object test(struct object ob);

struct object Kextension(struct object ob);

struct object KgbExtension(struct object ob);

struct object KmpzExtension(struct object ob);

struct object Krest(struct object ob);

struct object Kjoin(struct object ob1, struct object ob2);

/** Utilities */

char *KremoveSpace(char *s);

Line 234 POLY arrayToPOLY(struct object ob);

Line 262 POLY arrayToPOLY(struct object ob);

struct object POLYToArray(POLY f);

struct object oPrincipalPart(struct object ob);

struct object oInitW(struct object ob,struct object oWeight);

struct object KordWsAll(struct object ob,struct object oWeight);

/* :misc */

struct object homogenizeObject(struct object ob,int *gradep);

struct object homogenizeObject_vec(struct object ob,int *gradep);

struct object homogenizeObject_go(struct object ob,int *gradep);

void KresetDegreeShift(void);

int oGrade(struct object ob);

struct ring *oRingp(struct object ob);

struct object KisOrdered(struct object of);

struct object KvectorToSchreyer_es(struct object obarray);

POLY objArrayToPOLY(struct object ob);

struct object POLYtoObjArray(POLY f,int size);

struct object KgetExponents(struct object obPoly,struct object type);

/* hilbert.c */

struct object hilberto(struct object obgb,struct object obvlist);

Line 256 char *KobjectToBinary(struct object ob,int *size);

Line 290 char *KobjectToBinary(struct object ob,int *size);

int mmLarger_tower3(POLY ff,POLY gg,struct object *gbList); /* order.c */

struct object KschreyerSkelton(struct object g);

/* misc */

struct object KregionMatches(struct object sobj, struct object keyArray);

int objToInteger(struct object ob);

/* shell.c */

struct object KoxWhich(struct object cmdo,struct object patho);

struct object KoxShell(struct object ob);

void KoxShellHelp(char *key,FILE *fp);

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>