4
 1.0D0
CONST(1 - EXP(X)) * J0(X) / X . (QUADPACK, PAGE 118)
 Test 10: use NDIM2 = 11 to illustrate variant behaviour     
0.0 0.0 1.0e-13 6.2831853071795864769
100 11 -9
0 40 0
T
The previously chosen element (16,14) is unreachable. The equally
good, but marginally more expensive element (25,11) is chosen
instead.
