#
# struve.txt 22 May 11

# Struve L_0 for non-negative arguments x
# J. MacLeod, Chebyshev expansions for modified Struve and
# related functions, Mathematics of Computation, 60, 735-747, 1993

!msgpostfix Modified Struve function\n

!need all
 0.52468736791485599138e0
-0.35612460699650586196e0
 0.20487202864009927687e0
-0.10418640520402693629e0
 0.4634211095548429228e-1
-0.1790587192403498630e-1
 0.597968695481143177e-2
-0.171777547693565429e-2
 0.42204654469171422e-3
-0.8796178522094125e-4
 0.1535434234869223e-4
-0.219780769584743e-5
 0.24820683936666e-6
-0.2032706035607e-7
 0.90984198421e-9
 0.2561793929e-10
-0.710609790e-11
 0.32716960e-12
 0.2300215e-13
-0.292109e-14
-0.3566e-16
 0.1832e-16
-0.10e-18
-0.11e-18

2.00326510241160643125e0
0.195206851576492081e-2
0.38239523569908328e-3
0.7534280817054436e-4
0.1495957655897078e-4
0.299940531210557e-5
0.60769604822459e-6
0.12399495544506e-6
0.2523262552649e-7
0.504634857332e-8
0.97913236230e-9
0.18389115241e-9
0.3376309278e-10
0.611179703e-11
0.108472972e-11
0.18861271e-12
0.3280345e-13
0.565647e-14
0.93300e-15
0.15881e-15
0.2791e-16
0.389e-17
0.70e-18
0.16e-18


!msgpostfix Compute Struve function, 0th order, when x > 20\n

!need all
-0.37043e-5
 0.173565e-4
-0.487613e-4
 0.17343e-3
-0.1753062e-2
 0.3989422793

 0.32312e-5
-0.142078e-4
 0.342468e-4
-0.869791e-4
 0.4564324e-3
-0.0124669441


!msgpostfix Compute Struve function, 1st order, when x > 20\n

!need all
 0.42414e-5
-0.20092e-4
 0.580759e-4
-0.223203e-3
 0.29218256e-2
 0.3989422819

-0.36594e-5
 0.1622e-4
-0.398708e-4
 0.1064741e-3
-0.63904e-3
 0.0374008364

#-0.75

