5
 1.0D0
(1 + 100*EXP(-X**2/PI**2))*J1(X)
  Test 5: Successful execution of function 5.
0.0 0.0 1.0e-13 6.2831853071795864769
100 14 -9
0 0 0
F
