Cygwin Binary on Wiki has been updated
Jerry DeLisle
jvdelisle@verizon.net
Wed Mar 24 01:13:00 GMT 2010
Hi Folks,
I have updated the wiki and the binary available there for the Cygwin build.
Regression testing shows one unexpected failure of atan2_1.f90
Given this:
do i = 1, 10
if(atan(1.0, i/10.0) -atan2(1.0, i/10.) /= 0.0) &
& print *, (atan(1.0, i/10.0) -atan2(1.0, i/10.))
if(atan(1.0d0,i/10.0d0)-atan2(1.0d0,i/10.0d0) /= 0.0d0) &
& print *, (atan(1.0d0,i/10.0d0)-atan2(1.0d0,i/10.0d0))
end do
The results are small but not exactly zero as expected.
$ ./a.exe
-4.50335449E-08
1.08094956596804792E-016
4.03570652E-08
3.26344853918136835E-017
2.59082231E-08
3.02492406123455737E-017
2.39143301E-08
-7.53520509877425582E-017
4.87428657E-08
-9.36750677027475831E-017
-2.40507294E-08
2.21177243187042905E-017
-1.97886663E-09
-1.94072188874905294E-017
1.57936935E-08
-2.93818788743571702E-017
-2.46570160E-08
-4.27175655959288747E-017
2.18556977E-08
-3.06287113727155003E-017
Maybe we change the test or XFAIL it?
Jerry
More information about the Fortran
mailing list