00001 /*-----------------------------------------------------------------------------------*/ 00002 /* INRIA */ 00003 /*-----------------------------------------------------------------------------------*/ 00004 #include "machine.h" 00005 /*-----------------------------------------------------------------------------------*/ 00006 enum {NOT_A_KNOT, NATURAL, CLAMPED, PERIODIC, FAST, FAST_PERIODIC, 00007 MONOTONE, BY_ZERO, C0, LINEAR, BY_NAN, UNDEFINED}; 00008 /*-----------------------------------------------------------------------------------*/ 00009 typedef struct { char *str_type; int type; } TableType; 00010 /*-----------------------------------------------------------------------------------*/ 00011 typedef struct realhypermat 00012 { 00013 int dimsize; /* number of dimensions of the hyper matrix */ 00014 int size; /* total number of elements : size = dims[0]x... x dims[dimsize-1] */ 00015 int *dims; /* number of elements in each dimension */ 00016 double *R; /* points to the elements */ 00017 } RealHyperMat; 00018 /*-----------------------------------------------------------------------------------*/ 00019 extern int get_rhs_scalar_string(int num, int *length, int **tabchar); 00020 #define GetRhsScalarString(num,n,t) if (!get_rhs_scalar_string(num,n,t)) { return 0;} 00021 /*-----------------------------------------------------------------------------------*/ 00022 extern int get_rhs_real_hmat(int num, RealHyperMat *H); 00023 #define GetRhsRealHMat(pos,H) if (!get_rhs_real_hmat(pos,H)) { return 0;} 00024 /*-----------------------------------------------------------------------------------*/
1.5.1