impltable.c File Reference

#include "FTables.h"

Include dependency graph for impltable.c:

Go to the source code of this file.

Defines
#define	ARGS_fres   integer*,double *,double *,double *,double*,integer*
#define	ARGS_fadda   integer*,double *,double *,integer*,integer*,double*,integer*
#define	ARGS_fj2   integer *,double *,double *,double *,integer *,integer *,double*,integer *
Typedefs
typedef void(*)	fresf (ARGS_fres)
typedef void(*)	faddaf (ARGS_fadda)
typedef void(*)	fj2f (ARGS_fj2)
Functions
void C2F()	resid (ARGS_fres)
void C2F()	fres (ARGS_fres)
void C2F()	setfres (char *name, int *rep)
void C2F()	aplusp (ARGS_fadda)
void C2F()	fadda (ARGS_fadda)
void C2F()	setfadda (char *name, int *rep)
void C2F()	dgbydy (ARGS_fj2)
void C2F()	fj2 (ARGS_fj2)
void C2F()	setfj2 (char *name, int *rep)
void C2F()	fres (integer *ny, double *t, double *y, double *s, double *r, integer *ires)
void C2F()	fadda (integer *ny, double *t, double *y, integer *ml, integer *mu, double *p, integer *nrowp)
void C2F()	fj2 (integer *ny, double *t, double *y, double *s, integer *ml, integer *mu, double *p, integer *nrowp)
Variables
FTAB	FTab_fres []
FTAB	FTab_fadda []
FTAB	FTab_fj2 []
static fresf	fresfonc
static faddaf	faddafonc
static fj2f	fj2fonc

---

Define Documentation

#define ARGS_fadda   integer*,double *,double *,integer*,integer*,double*,integer*

Definition at line 13 of file impltable.c.

#define ARGS_fj2   integer *,double *,double *,double *,integer *,integer *,double*,integer *

Definition at line 16 of file impltable.c.

#define ARGS_fres   integer*,double *,double *,double *,double*,integer*

Definition at line 9 of file impltable.c.

---

Typedef Documentation

typedef void(*) faddaf(ARGS_fadda)

Definition at line 14 of file impltable.c.

typedef void(*) fj2f(ARGS_fj2)

Definition at line 17 of file impltable.c.

typedef void(*) fresf(ARGS_fres)

Definition at line 10 of file impltable.c.

---

Function Documentation

void C2F() aplusp

(

ARGS_fadda

)

void C2F() dgbydy

(

ARGS_fj2

)

void C2F() fadda	(	integer *	ny,
		double *	t,
		double *	y,
		integer *	ml,
		integer *	mu,
		double *	p,
		integer *	nrowp
	)

Definition at line 72 of file impltable.c.

{
        (*faddafonc)(ny,t,y,ml,mu,p,nrowp);
}

void C2F() fadda

(

ARGS_fadda

)

void C2F() fj2	(	integer *	ny,
		double *	t,
		double *	y,
		double *	s,
		integer *	ml,
		integer *	mu,
		double *	p,
		integer *	nrowp
	)

function call

Definition at line 91 of file impltable.c.

{
        (*fj2fonc)(ny,t,y,s,ml,mu,p,nrowp);
}

void C2F() fj2

(

ARGS_fj2

)

void C2F() fres	(	integer *	ny,
		double *	t,
		double *	y,
		double *	s,
		double *	r,
		integer *	ires
	)

function call

Definition at line 55 of file impltable.c.

References fresfonc, ires, s, t, and y.

{
        (*fresfonc)(ny,t,y,s,r,ires);
}

void C2F() fres

(

ARGS_fres

)

void C2F() resid

(

ARGS_fres

)

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

fixes the function associated to name

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

fixes the function associated to name

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

fixes the function associated to name

---

Variable Documentation

faddaf faddafonc [static]

the current function fixed by setfadda

Definition at line 70 of file impltable.c.

fj2f fj2fonc [static]

the current function fixed by setfj2

Definition at line 87 of file impltable.c.

fresf fresfonc [static]

the current function fixed by setfres

Definition at line 51 of file impltable.c.

Referenced by fres().

FTAB FTab_fadda[]

Initial value:

{
{"aplusp", (voidf)  C2F(aplusp)},
{(char *) 0, (voidf) 0}}

Definition at line 32 of file impltable.c.

FTAB FTab_fj2[]

Initial value:

{
        {"dgbydy", (voidf)  C2F(dgbydy)},
        {(char *) 0, (voidf) 0}}

Definition at line 41 of file impltable.c.

FTAB FTab_fres[]

Initial value:

{
        {"resid", (voidf)  C2F(resid)},
        {(char *) 0, (voidf) 0}}

Definition at line 24 of file impltable.c.

---