src/gsl-test.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

/* This file is part of mingw-cross-env.       */
/* See doc/index.html for further information. */

#include <stdio.h>
#include <gsl/gsl_sf_bessel.h>

int main(int argc, char *argv[]) 
{
    double x, y;

    (void)argc;
    (void)argv;

    x = 5.0;
    y = gsl_sf_bessel_J0 (x);
    printf ("J0(%g) = %.18e\n", x, y);
    return 0;
}