(j3.2006) implicit none (external)

[Bill Long]

> On Jun 2, 2017, at 8:02 AM, Steve Lionel <steve at stevelionel.com> wrote:
> 
> Upon further reflection, I think John is right. There are other ways to have an explicit interface that don't imply EXTERNAL.

But that would not be an explicit interface for ?an external or dummy procedure?.   Any explicit interface for an external or dummy procedure automatically gives the name the EXTERNAL  attribute. 

I think that Johns proposed edit is merely a statement that for external or dummy procedures that already have an explicit interface, the ?shall? requirement is already satisfied.  You only have to be proactive for the cases of implicit interfaces.   But, in arguing that the existing text is OK, I would contend that ?shall? means ?the requirement has to be satisfied (somehow)? and not ?the programmer has to explicitly do something extra?. 


Cheers,
Bill

> 
> Steve
> 
> On Fri, Jun 2, 2017 at 5:01 AM, <john.reid at stfc.ac.uk> wrote:
> J3,
> 
> C893 says "If IMPLICIT NONE with an implicit-none-spec of EXTERNAL appears within a scoping unit, the name of an external or dummy procedure in that scoping unit or in a contained subprogram or BLOCK construct shall be explicitly declared to have the EXTERNAL attribute."
> 
> I think we need the edit
> 
> [120:25] After "procedure" add "with an implicit interface".
> 
> or am I missing something?
> 
> John.
> _______________________________________________
> J3 mailing list
> J3 at mailman.j3-fortran.org
> http://mailman.j3-fortran.org/mailman/listinfo/j3
> 
> 
> 
> -- 
> .
> _______________________________________________
> J3 mailing list
> J3 at mailman.j3-fortran.org
> http://mailman.j3-fortran.org/mailman/listinfo/j3

Bill Long                                                                       longb at cray.com
Principal Engineer, Fortran Technical Support &   voice:  651-605-9024
Bioinformatics Software Development                      fax:  651-605-9143
Cray Inc./ 2131 Lindau Lane/  Suite 1000/  Bloomington, MN  55425