Mercurial > mxe-octave
annotate src/gsl-test.c @ 3909:586b26b09042
set QT_PLUGIN_PATH in octave.vbs
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Fri, 17 Apr 2015 14:53:00 -0400 |
parents | 14b3f5ea78ae |
children |
rev | line source |
---|---|
2351
8a6c466753e2
Improve comment style of all test programs
Volker Grabsch <vog@notjusthosting.com>
parents:
2333
diff
changeset
|
1 /* |
8a6c466753e2
Improve comment style of all test programs
Volker Grabsch <vog@notjusthosting.com>
parents:
2333
diff
changeset
|
2 * This file is part of MXE. |
2353
99516e73b368
Move doc/index.html -> index.html
Volker Grabsch <vog@notjusthosting.com>
parents:
2351
diff
changeset
|
3 * See index.html for further information. |
2351
8a6c466753e2
Improve comment style of all test programs
Volker Grabsch <vog@notjusthosting.com>
parents:
2333
diff
changeset
|
4 */ |
1926
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
5 |
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
6 #include <stdio.h> |
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
7 #include <gsl/gsl_sf_bessel.h> |
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
8 |
2358
14b3f5ea78ae
Cleanup coding style via "make cleanup-style"
Volker Grabsch <vog@notjusthosting.com>
parents:
2353
diff
changeset
|
9 int main(int argc, char *argv[]) |
1926
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
10 { |
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
11 double x, y; |
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
12 |
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
13 (void)argc; |
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
14 (void)argv; |
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
15 |
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
16 x = 5.0; |
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
17 y = gsl_sf_bessel_J0 (x); |
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
18 printf ("J0(%g) = %.18e\n", x, y); |
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
19 return 0; |
c57294700cfd
add test program to package gsl
Tony Theodore <tonyt@logyst.com>
parents:
diff
changeset
|
20 } |