PR 24207 may interest you

[Steve Kargl]

On Wed, Oct 05, 2005 at 11:17:51AM -0700, Steve Kargl wrote:
> On Wed, Oct 05, 2005 at 03:09:19PM +0200, Paul THOMAS wrote:
> > Steve,
> > 
> > A reply on the list because the fix is common to PR24207 and the
> > problem with the Polyhedron test induct.f90.
> 
> Paul, the patch indeed fixes the problme for the code in PR24207.
> I however have hit another PRIVATE/PUBLIC and NAMELIST problem
> with the fds code.  I reduce it to a test case.
> 

Here's the reduced test case.


module rad
   implicit none
   private
   integer a
   logical d
   public a
   contains
     subroutine init_radiation
        namelist /radi/ a, d
        read(5,radi)
     end subroutine init_radiation
end module rad

'd' is private to rad, and so should be available to init_radiation.

Lahey says the code is conforming.

-- 
Steve