ap1 38: f90 prog023.f
f90: compile start : prog023.f

*OFORT90 V01-04-/A 開始
*プログラム名 = PROG023
*プログラム名 = F
*プログラム数 = 0002 , エラーはありません。
ap1 39: a.out
m = ? (n_max = 2**m)
? 
10
m =           10
n_max =         1024
a, b = ?
? 
10, 20
a =    10.0000000000000000       b =    20.0000000000000000     
j, dx, Exact, Err1, Err2, Err3
  1  5.00000D+00  2.61972D+00  1.02744D-02  2.08643D-02  1.05144D-04
  2  2.50000D+00  2.61972D+00  2.63679D-03  5.29493D-03  7.11338D-06
  3  1.25000D+00  2.61972D+00  6.63851D-04  1.32907D-03  4.54656D-07
  4  6.25000D-01  2.61972D+00  1.66261D-04  3.32608D-04  2.85817D-08
  5  3.12500D-01  2.61972D+00  4.15840D-05  8.31733D-05  1.78898D-09
  6  1.56250D-01  2.61972D+00  1.03972D-05  2.07947D-05  1.11852D-10
  7  7.81250D-02  2.61972D+00  2.59937D-06  5.19875D-06  6.99085D-12
  8  3.90625D-02  2.61972D+00  6.49846D-07  1.29969D-06  4.37428D-13
  9  1.95313D-02  2.61972D+00  1.62462D-07  3.24924D-07  2.57572D-14
 10  9.76563D-03  2.61972D+00  4.06155D-08  8.12309D-08  3.55271D-15