This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/49431] is it illegal?
- From: "jvdelisle at gcc dot gnu.org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: Thu, 16 Jun 2011 05:19:09 +0000
- Subject: [Bug fortran/49431] is it illegal?
- Auto-submitted: auto-generated
- References: <bug-49431-4@http.gcc.gnu.org/bugzilla/>
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