(j3.2006) types of actual arguments associated with dummy procedures

Robert Corbett Robert.Corbett
Fri May 15 02:49:04 EDT 2009


If a function is passed as an actual argument to a dummy procedure
in FORTRAN 77, the FORTRAN 77 standard requires the function and
the dummy procedure to have the same type (see Section 15.9.2 of
the FORTRAN 77 standard, page 15-16, lines 21-24).  In Fortran 90
and in later editions of the Fortran standard, the requirement is
clearly there if the interface of the dummy procedure is explicit
(see Section 12.14.1.2 p2 on page 173 of the Fortran 90 standard,
Section 12.4.1.2 p2 on page 202 of the Fortran 95 standard,
Section 12.4.1.3 p4 on page 271 of the Fortran 2003 standard, and
Section 12.5.2.9 p5 on page 300 of 09-007r1).  I have not found
text in the Fortran standards since FORTRAN 77 that requires a
function passed as an actual argument to a dummy procedure that
has implicit interface to have the same type as the type of the
dummy procedure.  Is there a requirement to that effect in the
Fortran standards?

Bob Corbett



More information about the J3 mailing list