test_aquad3.f90 testing aquad3.c 1/x eps= 1.0000000000000000E-03 xmin=0.10000, xmax= 2., area= 2.99573320, exact= 2.99573227, err= 0.9256E-06 xmin=0.01000, xmax= 2., area= 5.29831887, exact= 5.29831737, err= 0.1507E-05 xmin=0.00100, xmax= 2., area= 7.60090412, exact= 7.60090246, err= 0.1655E-05 xmin=0.00010, xmax= 2., area= 9.90348922, exact= 9.90348755, err= 0.1668E-05 xmin=0.00001, xmax= 2., area= 12.20607432, exact= 12.20607265, err= 0.1670E-05 1.0/((x-0.3)*(x-0.3)+0.01) + 1.0/((x-0.9)*(x-0.9)+0.04) -6 xmin=0.00000, xmax= 1., area= 29.85832378, exact= 29.85832596, err= -0.2179E-05 test_aquad3.f90 finished