dassltable.c File Reference

#include "FTables.h"

Include dependency graph for dassltable.c:

Go to the source code of this file.

Defines
#define	ARGS_fresd   double *,double*,double*,double*,integer*,double*,integer*
#define	ARGS_fjacd   double *,double*,double*,double*,double*,double*,integer*
#define	ARGS_fsurfd   integer*,double *,double*,integer*,double*,double*,integer*
#define	ARGS_fsurf   integer*,double *,double*,integer*,double*
Typedefs
typedef integer *(*)	fresdf (ARGS_fresd)
typedef integer *(*)	fjacdf (ARGS_fjacd)
typedef integer *(*)	fsurfdf (ARGS_fsurfd)
typedef integer *(*)	fsurff (ARGS_fsurf)
Functions
void C2F()	dres1 (ARGS_fresd)
void C2F()	dres2 (ARGS_fresd)
void C2F()	res1 (ARGS_fresd)
void C2F()	res2 (ARGS_fresd)
void C2F()	fresd (ARGS_fresd)
void C2F()	setfresd (char *name, int *rep)
void C2F()	djac1 (ARGS_fjacd)
void C2F()	djac2 (ARGS_fjacd)
void C2F()	jac2 (ARGS_fjacd)
void C2F()	fjacd (ARGS_fjacd)
void C2F()	setfjacd (char *name, int *rep)
void C2F()	fsurf (ARGS_fsurf)
void C2F()	setfsurf (char *name, int *rep)
void C2F()	gr1 (ARGS_fsurfd)
void C2F()	gr2 (ARGS_fsurfd)
void C2F()	fsurfd (ARGS_fsurfd)
void C2F()	setfsurfd (char *name, int *rep)
void C2F()	fresd (double *t, double *y, double *ydot, double *res, integer *ires, double *rpar, integer *ipar)
void C2F()	fjacd (double *t, double *y, double *ydot, double *pd, double *cj, double *rpar, integer *ipar)
void C2F()	fsurfd (integer *neq, double *t, double *y, integer *ng, double *gout, double *rpar, integer *ipar)
void C2F()	fsurf (integer *ny, double *t, double *y, integer *ng, double *gout)
Variables
FTAB	FTab_fresd []
FTAB	FTab_fjacd []
FTAB	FTab_fsurf []
FTAB	FTab_fsurfd []
static fresdf	fresdfonc
static fjacdf	fjacdfonc
static fsurfdf	fsurfdfonc
static fsurff	fsurffonc

---

Define Documentation

#define ARGS_fjacd   double *,double*,double*,double*,double*,double*,integer*

Definition at line 12 of file dassltable.c.

#define ARGS_fresd   double *,double*,double*,double*,integer*,double*,integer*

Definition at line 9 of file dassltable.c.

#define ARGS_fsurf   integer*,double *,double*,integer*,double*

Definition at line 23 of file dassltable.c.

#define ARGS_fsurfd   integer*,double *,double*,integer*,double*,double*,integer*

Definition at line 19 of file dassltable.c.

---

Typedef Documentation

typedef integer*(*) fjacdf(ARGS_fjacd)

Definition at line 13 of file dassltable.c.

typedef integer*(*) fresdf(ARGS_fresd)

Definition at line 10 of file dassltable.c.

typedef integer*(*) fsurfdf(ARGS_fsurfd)

Definition at line 20 of file dassltable.c.

typedef integer*(*) fsurff(ARGS_fsurf)

Definition at line 24 of file dassltable.c.

---

Function Documentation

void C2F() djac1

(

ARGS_fjacd

)

void C2F() djac2

(

ARGS_fjacd

)

void C2F() dres1

(

ARGS_fresd

)

void C2F() dres2

(

ARGS_fresd

)

void C2F() fjacd	(	double *	t,
		double *	y,
		double *	ydot,
		double *	pd,
		double *	cj,
		double *	rpar,
		integer *	ipar
	)

function call

Definition at line 105 of file dassltable.c.

{
        (*fjacdfonc)(t,y,ydot,pd,cj,rpar,ipar);
}

void C2F() fjacd

(

ARGS_fjacd

)

void C2F() fresd	(	double *	t,
		double *	y,
		double *	ydot,
		double *	res,
		integer *	ires,
		double *	rpar,
		integer *	ipar
	)

function call

Definition at line 86 of file dassltable.c.

References fresdfonc, ires, res, t, and y.

{
        (*fresdfonc)(t,y,ydot,res,ires,rpar,ipar);
}

void C2F() fresd

(

ARGS_fresd

)

void C2F() fsurf	(	integer *	ny,
		double *	t,
		double *	y,
		integer *	ng,
		double *	gout
	)

function call

Definition at line 147 of file dassltable.c.

{
        (*fsurffonc)(ny, t, y, ng, gout) ;
}

void C2F() fsurf

(

ARGS_fsurf

)

void C2F() fsurfd	(	integer *	neq,
		double *	t,
		double *	y,
		integer *	ng,
		double *	gout,
		double *	rpar,
		integer *	ipar
	)

function call

Definition at line 125 of file dassltable.c.

{
        (*fsurfdfonc)(neq,t,y,ng,gout,rpar,ipar);
}

void C2F() fsurfd

(

ARGS_fsurfd

)

void C2F() gr1

(

ARGS_fsurfd

)

void C2F() gr2

(

ARGS_fsurfd

)

void C2F() jac2

(

ARGS_fjacd

)

void C2F() res1

(

ARGS_fresd

)

Referenced by loadwave(), and mclose().

Here is the caller graph for this function:

void C2F() res2

(

ARGS_fresd

)

void C2F() setfjacd	(	char *	name,
		int *	rep
	)

fixes the function associated to name

void C2F() setfresd	(	char *	name,
		int *	rep
	)

fixes the function associated to name

void C2F() setfsurf	(	char *	name,
		int *	rep
	)

fixes the function associated to name

void C2F() setfsurfd	(	char *	name,
		int *	rep
	)

fixes the function associated to name

---

Variable Documentation

fjacdf fjacdfonc [static]

the current function fixed by setfjacd

Definition at line 101 of file dassltable.c.

fresdf fresdfonc [static]

the current function fixed by setfresd

Definition at line 82 of file dassltable.c.

Referenced by fresd().

fsurfdf fsurfdfonc [static]

the current function fixed by setfsurfd

Definition at line 120 of file dassltable.c.

fsurff fsurffonc [static]

the current function fixed by setfsurf

Definition at line 143 of file dassltable.c.

FTAB FTab_fjacd[]

Initial value:

{
        {"djac1", (voidf)  C2F(djac1)},
        {"djac2", (voidf)  C2F(djac2)},
        {"jac2", (voidf)  C2F(jac2)},
        {(char *) 0, (voidf) 0}
}

Definition at line 50 of file dassltable.c.

FTAB FTab_fresd[]

Initial value:

{
        {"dres1", (voidf)  C2F(dres1)},
        {"dres2", (voidf)  C2F(dres2)},
        {"res1", (voidf)  C2F(res1)},
        {"res2", (voidf)  C2F(res2)},
        {(char *) 0, (voidf) 0}
}

Definition at line 34 of file dassltable.c.

FTAB FTab_fsurf[]

Initial value:

{
{(char *) 0, (voidf) 0}}

Definition at line 63 of file dassltable.c.

FTAB FTab_fsurfd[]

Initial value:

{
{"gr1", (voidf)  C2F(gr1)},
{"gr2", (voidf)  C2F(gr2)},
{(char *) 0, (voidf) 0}}

Definition at line 71 of file dassltable.c.

---