https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100855
--- Comment #10 from Nadav Halahmi <nadavhalahmi560 at gmail dot com> --- (In reply to Dominique d'Humieres from comment #9) > I don't know if the test is coming from a real world problem. The modified > test > > program power > implicit none > > real :: sum, sum1, n, q > integer :: i, j > integer :: limit > real :: start, finish > > sum = 0d0 > sum1 = 0d0 > limit = 10000 > n = 2.0 > q = 0.5 > call CPU_TIME(start) > do i=1, limit > n = n*q > sum1 = sum1 + (i ** (0.05 + n)) > end do > do i=1, limit > sum = sum + (i ** 0.05) > end do > sum = sum1 + (limit-1)*sum > call CPU_TIME(finish) > print *, sum, n, sum1 > print '("Time = ",f6.3," seconds.")',finish-start > end program power > > yields > > 150945680. 0.00000000 15095.7852 > Time = 0.000 seconds. What did you try to show here?