TOMS418_PRB:
  Test ACM algorithm 418, which uses
  Filon quadrature to approximate integrals
  of functions of the form F(X)*COS(W*X)
  or F(X)*SIN(W*X).
 
TEST01
  Use FSPL2 to estimate the integrals of
  the form F(X) * COS ( W * X )
 
  Use integrand factors:
  F(X) = 1, X, X*X.
 
  A =    0.000000000000000    
  B =    6.283185482025146    
 
             W                      Approximate             Exact
 
    1:     1.000000000000000      0.2431067969155265E-06  0.1748455531469517E-06
    X:     1.000000000000000      0.1741950086397992E-05  0.1072883605957031E-05
  X*X:     1.000000000000000       12.56640338897705       12.56637763977051    
 
    1:     2.000000000000000      0.1729295746599746E-06  0.1748455531469517E-06
    X:     2.000000000000000      0.9933930869010510E-06  0.1102685928344727E-05
  X*X:     2.000000000000000       3.141604900360107       3.141599655151367    
 
    1:     10.00000000000000      0.9396929385729891E-06  0.2702129791032348E-06
    X:     10.00000000000000      0.5819785201310879E-05  0.1697540255918284E-05
  X*X:     10.00000000000000      0.1256734877824783      0.1256743818521500    
 
 
TEST02
  Use FSPL2 to estimate the integrals of
  the form F(X) * SIN ( W * X )
 
  Use integrand factors:
  F(X) = 1, X, X*X.
 
  A =    0.000000000000000    
  B =    6.283185482025146    
 
             W                      Approximate             Exact
 
    1:     1.000000000000000      0.9356963914797234E-07   0.000000000000000    
    X:     1.000000000000000      -6.283184528350830      -6.283185482025146    
  X*X:     1.000000000000000      -39.47842025756836      -39.47841644287109    
 
    1:     2.000000000000000     -0.1871392782959447E-06   0.000000000000000    
    X:     2.000000000000000      -3.141593217849731      -3.141592741012573    
  X*X:     2.000000000000000      -19.73921012878418      -19.73920822143555    
 
    1:     10.00000000000000      0.4498532746310957E-06   0.000000000000000    
    X:     10.00000000000000     -0.6283145546913147     -0.6283185482025146    
  X*X:     10.00000000000000      -3.947818040847778      -3.947841882705688