在fortran 90中，如何给出无穷大的求和上限？？？我正在使用NETBEANS 8.01

我尝试了以下代码：

program practice
    implicit none
    real :: a,b,c,d,E
    b = 10
    a = 20
    c = a*b
    do d = 1, -alog(0), 1
        E = c**d
    print*, "The value of E is: ", E
    end do
end program practice

这不起作用，因为未将alog（0）识别为限制。它显示出错误