20231114  223750.307
 
toms424_test():
  FORTRAN77 version
  Test toms424().
 
  CCQUAD, the ACM TOMS algorithm 424
  for Clenshaw-Curtis quadrature to estimate
  the integral of F(X) on [A,B].
 
  A =    0.000000000000000    
  B =    1.000000000000000    
 
  F(X)=1
  Integral estimate:    1.000000000000000    
  Error estimate:       0.000000000000000    
  Evaluations of F =      7
 
  Scaled Discrete Cosine Transform:
 
   12.00000000000000    
   0.000000000000000    
   0.000000000000000    
   0.000000000000000    
   0.000000000000000    
   0.000000000000000    
   0.000000000000000    
 
  F(X)=X
  Integral estimate:   0.5000000000000000    
  Error estimate:       0.000000000000000    
  Evaluations of F =      7
 
  Scaled Discrete Cosine Transform:
 
   6.000000000000000    
  -3.000000000000000    
   0.000000000000000    
   0.000000000000000    
   0.000000000000000    
   0.000000000000000    
   0.000000000000000    
 
  F(X)=X*2
  Integral estimate:   0.3333333432674408    
  Error estimate:       0.000000000000000    
  Evaluations of F =      7
 
  Scaled Discrete Cosine Transform:
 
   4.500000000000000    
  -3.000000000000000    
  0.7500000000000000    
   0.000000000000000    
   0.000000000000000    
   0.000000000000000    
   0.000000000000000    
 
  F(X)=X*3
  Integral estimate:   0.2500000000000000    
  Error estimate:       0.000000000000000    
  Evaluations of F =      7
 
  Scaled Discrete Cosine Transform:
 
   3.750000000000000    
  -2.812500000000000    
   1.125000000000000    
 -0.1875000000000000    
 -0.5960464477539062E-07
  0.1192092895507812E-06
 -0.1192092895507812E-06
 
  F(X)=EXP(X)
  Integral estimate:    1.718281865119934    
  Error estimate:      0.1059638137235197E-06
  Evaluations of F =     19
 
  Scaled Discrete Cosine Transform:
 
   63.12195587158203    
  -15.30704975128174    
   1.893756747245789    
 -0.1569977104663849    
  0.9781789034605026E-02
 -0.4878762993030250E-03
  0.2050399780273438E-04
 -0.9911077540891711E-06
 -0.8022512929528602E-06
  0.4183548298897222E-06
 -0.9432624210603535E-06
  0.3935417680622777E-07
 -0.1907348632812500E-05
 -0.9930284932124778E-06
  0.3472159733064473E-06
  0.9573523129802197E-07
  0.1349586398191605E-06
  0.3477384211691970E-06
 -0.9536743164062500E-06
 
  F(X)=SQRT(X)
  Integral estimate:   0.6666666865348816    
  Error estimate:      0.6593303965019004E-06
  Evaluations of F =    163
 
  F(X)=1/(1+X*X)
  Integral estimate:   0.7853981256484985    
  Error estimate:      0.3708733515850327E-06
  Evaluations of F =     19
 
  Scaled Discrete Cosine Transform:
 
   27.96792984008789    
   4.798538208007812    
 -0.4530929923057556    
 -0.3070300221443176    
 -0.3384946659207344E-01
  0.8356167003512383E-02
  0.3092885017395020E-02
  0.1626395242055878E-03
 -0.1163736887974665E-03
 -0.2904943721659947E-04
  0.2347457552787091E-06
  0.1283066239921027E-05
  0.9536743164062500E-06
  0.1474452346883481E-06
 -0.2943504000540997E-06
  0.1411845005350187E-06
 -0.2241758920717984E-06
  0.2469314495101571E-06
 -0.2384185791015625E-06
 
toms424_test():
  Normal end of execution.
 
20231114  223750.307