Prev: Ada vs Fortran for scientific applications
Next: Compaq Visual Fortran v6.6 Professional doesn't Compile !!!
From: Herman D. Knoble on 21 Nov 2006 10:49
Is the following use of double-contains clauses legal and F90 Standard?
Thanks.
Skip


module testab

contains

subroutine a()
print *, "sub a"
call b()
contains
subroutine b()
print *, "sub b"
end subroutine b
end subroutine a
end module testab

program testc
use testab
call a()
end program testc



From: Michael Metcalf on 21 Nov 2006 11:08

"Herman D. Knoble" <SkipKnobleLESS(a)SPAMpsu.DOT.edu> wrote in message
news:q776m25ug9l3t5ab9vt0ej2sgjujise434(a)4ax.com...
> Is the following use of double-contains clauses legal and F90 Standard?
> Thanks.
> Skip
>
>
Yes. A module procedure may contain an internal procedure. On the other
hand, an internal procedure may not contain a further level of internal
procedure.

Regards,

Mike Metcalf


 | 
Pages: 1
Prev: Ada vs Fortran for scientific applications
Next: Compaq Visual Fortran v6.6 Professional doesn't Compile !!!