version 1.5, 2013/02/21 07:30:56 |
version 1.13, 2014/03/17 02:49:39 |
|
|
/* |
/* |
$OpenXM: OpenXM/src/hgm/mh/src/sfile.h,v 1.4 2013/02/20 05:56:16 takayama Exp $ |
$OpenXM: OpenXM/src/hgm/mh/src/sfile.h,v 1.12 2014/03/15 00:43:47 takayama Exp $ |
*/ |
*/ |
struct SFILE { |
struct SFILE { |
int byFile; |
int byFile; |
Line 18 struct MH_RESULT { |
|
Line 18 struct MH_RESULT { |
|
int rank; |
int rank; |
struct SFILE **sfpp; /* sfpp[0], ..., spff[size-1] */ |
struct SFILE **sfpp; /* sfpp[0], ..., spff[size-1] */ |
int size; |
int size; |
|
char *message; |
|
int t_success; |
|
double series_error; |
|
double recommended_abserr; |
}; |
}; |
|
|
|
struct mh_token { |
|
int type; |
|
double dval; |
|
int ival; |
|
}; |
|
|
struct SFILE *mh_fopen(char *name, char *mode, int byFile); |
struct SFILE *mh_fopen(char *name, char *mode, int byFile); |
char *mh_fgets(char *str,int size,struct SFILE *sfp); |
char *mh_fgets(char *str,int size,struct SFILE *sfp); |
Line 28 int mh_outstr(char *str,int size,struct SFILE *sfp); |
|
Line 38 int mh_outstr(char *str,int size,struct SFILE *sfp); |
|
void *mh_malloc(int s); |
void *mh_malloc(int s); |
int mh_free(void *p); |
int mh_free(void *p); |
int mh_exit(int n); |
int mh_exit(int n); |
|
void mh_check_intr(int interval); |
|
void mh_error(char *s,int code); |
|
struct mh_token mh_getoken(char s[],int smax,struct SFILE *sfp); |
|
void mh_print_token(struct mh_token tk,char *s); |
|
#define MH_TOKEN_EOF -1 |
|
#define MH_TOKEN_ID 1 |
|
#define MH_TOKEN_EQ 2 |
|
#define MH_TOKEN_DOUBLE 3 |
|
#define MH_TOKEN_INT 4 |
|
|
|
|
#define MH_SSIZE 1024 |
#define MH_SSIZE 1024 |
#define MH_RESET_EXIT 0x7fffffff |
#define MH_RESET_EXIT 0x7fffffff |
|
|
|
#define myabs(x) ((x)<0?(-(x)):(x)) |
|
#define mymax(x,y) ((x)>(y)?(x):(y)) |
|
#define mymin(x,y) ((x)<(y)?(x):(y)) |
|
|
/* prototypes in wmain.c */ |
/* prototypes in wmain.c */ |
struct MH_RESULT *mh_main(int argc,char *argv[]); |
struct MH_RESULT *mh_main(int argc,char *argv[]); |
/* prototypes in rk.c*/ |
/* prototypes in rk.c*/ |
struct MH_RESULT mh_rkmain(double x0,double y0[],double xn); |
struct MH_RESULT mh_rkmain(double x0,double y0[],double xn); |
|
/* prototype in jack-n.c */ |
|
struct MH_RESULT *jk_main(int argc,char *argv[]); |
|
|
|
/* Significant digit control used both in wmain.c and jack-n.c */ |
|
#define M_ASSIGNED_SERIES_ERROR_DEFAULT 1e-5 |