version 1.57, 2018/03/29 01:32:54 |
version 1.58, 2019/11/12 10:52:05 |
|
|
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* |
* |
* $OpenXM: OpenXM_contrib2/asir2000/parse/parse.h,v 1.56 2017/08/31 02:36:21 noro Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/parse/parse.h,v 1.57 2018/03/29 01:32:54 noro Exp $ |
*/ |
*/ |
# if defined(VISUAL) || defined(__MINGW32__) |
# if defined(VISUAL) || defined(__MINGW32__) |
#include <time.h> |
#include <time.h> |
Line 181 typedef struct oPF { |
|
Line 181 typedef struct oPF { |
|
int (*pari)(); |
int (*pari)(); |
double (*libm)(); |
double (*libm)(); |
int (*simplify)(); |
int (*simplify)(); |
|
#if defined(INTERVAL) |
|
void (**intervalfunc)(); |
|
#endif |
} *PF; |
} *PF; |
|
|
typedef struct oPFAD { |
typedef struct oPFAD { |
Line 530 void getmemberp(FNODE,Obj **); |
|
Line 533 void getmemberp(FNODE,Obj **); |
|
void help(char *); |
void help(char *); |
void instov(PFINS ,V *); |
void instov(PFINS ,V *); |
Obj memberofstruct(COMP,char *); |
Obj memberofstruct(COMP,char *); |
void mkpf(char *,Obj ,int ,V *,int (*)(),double (*)(),int (*)(),PF *); |
#if defined(INTERVAL) |
|
void mkpf(char *,Obj ,int ,V *,int (*)(),double (*)(),int (*)(),void (*[])(), PF *); |
|
#else |
|
void mkpf(char *,Obj ,int ,V *,int (*)(),double (*)(),int (*)(), PF *); |
|
#endif |
void mkpfins(PF ,V *,V *); |
void mkpfins(PF ,V *,V *); |
void mkuf(char *,char *,NODE,SNODE,int,int,char *,MODULE); |
void mkuf(char *,char *,NODE,SNODE,int,int,char *,MODULE); |
void newstruct(int,struct oCOMP **); |
void newstruct(int,struct oCOMP **); |
Line 820 void show_debug_window(int on); |
|
Line 827 void show_debug_window(int on); |
|
void init_cmdwin(); |
void init_cmdwin(); |
void searchpf(char *name,FUNC *fp); |
void searchpf(char *name,FUNC *fp); |
void searchc(char *name,FUNC *fp); |
void searchc(char *name,FUNC *fp); |
|
#if defined(INTERVAL) |
void mkpf(char *name,Obj body,int argc,V *args, |
void mkpf(char *name,Obj body,int argc,V *args, |
int (*parif)(),double (*libmf)(), int (*simp)(),PF *pfp); |
int (*parif)(),double (*libmf)(), int (*simp)(), void (*intervalfunc[])(), PF *pfp); |
|
#else |
|
void mkpf(char *name,Obj body,int argc,V *args, |
|
int (*parif)(),double (*libmf)(), int (*simp)(), PF *pfp); |
|
#endif |
void mkpfins(PF pf,V *args,V *vp); |
void mkpfins(PF pf,V *args,V *vp); |
void _mkpfins(PF pf,Obj *args,V *vp); |
void _mkpfins(PF pf,Obj *args,V *vp); |
void _mkpfins_with_darray(PF pf,Obj *args,int *darray,V *vp); |
void _mkpfins_with_darray(PF pf,Obj *args,int *darray,V *vp); |