version 1.2, 1994/02/11 18:10:06 |
version 1.3, 1994/02/18 02:27:45 |
|
|
|
|
/* @(#)w_jn.c 5.1 93/09/24 */ |
/* @(#)w_jn.c 5.1 93/09/24 */ |
/* |
/* |
* ==================================================== |
* ==================================================== |
|
|
* ==================================================== |
* ==================================================== |
*/ |
*/ |
|
|
|
#ifndef lint |
|
static char rcsid[] = "$Id$"; |
|
#endif |
|
|
/* |
/* |
* wrapper jn(int n, double x), yn(int n, double x) |
* wrapper jn(int n, double x), yn(int n, double x) |
* floating point Bessel's function of the 1st and 2nd kind |
* floating point Bessel's function of the 1st and 2nd kind |