[Bug fortran/49431] is it illegal?

[jvdelisle at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=49431

Jerry DeLisle <jvdelisle at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |jvdelisle at gcc dot
                   |                            |gnu.org

--- Comment #1 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> 2011-06-16 05:18:35 UTC ---
Using a double colon allows it to compile:

program main
  implicit none
  real distance
  real, external :: gcdist
  distance = gcdist ()
end program main

!  Computes the shortest (undirected) angular distance between the points
!  on the globe (LAT1,LON1) and (LAT2,LON2).
real function GCDIST()
   implicit none
   real :: D2R = 0.017453292519943  ! <--- here
   gcdist = D2R
end