#ifndef JESSICA_INCLUDED
#define JESSICA_INCLUDED

/* from file jessica.c  */

extern fsub fcn(integer *, integer *, doublereal *,doublereal *,integer *);

#endif