[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

RE: netCDF-3.5.1, CYGWIN and NAG f95 (fwd)

------- Forwarded Message

Date:    Tue, 13 Apr 2004 08:30:54 +0200
From:    Anlauf Harald <address@hidden>
To:      "'Russ Rew'" <address@hidden>
cc:      address@hidden, address@hidden
Subject: RE: netCDF-3.5.1, CYGWIN and NAG f95 

Hi Russ,

thanks for your comments.  Just for clarification to this patch:

> > 2) The following patch should be applied to the source distribution
> > 
> > --- ./nf_test/nf_test.F.orig        1997-06-11 
> 18:20:48.000000000 +0200
> > +++ ./nf_test/nf_test.F.    2004-04-06 14:41:37.375000000 +0200
> > @@ -81,6 +81,9 @@
> >  !  DIGITAL Visual Fortran needs DFPORT for iargc
> >     USE DFPORT
> >          implicit        none
> > +#elif defined(NAGf90Fortran)
> > +        USE F90_UNIX_ENV, only : iargc, getarg
> > +        implicit        none
> >  #else
> >          implicit        none
> >          integer         iargc
> 
> It's not clear to me whether this change is intended to be independent
> of your first patch to cfortran.h.  Should this change be made
> independently of whether patch 1) is made, or only if patch 1) is also
> made?

This patch should be made anyway, since the NAG compiler provides access to
iargc and getarg only via the above mentioned module.  I do not know if
there is even a way sanctioned by the (current) Fortran standard to access
these, ignoring non-portable solutions.

(If you browse through the above file, you find also a variant for Cray that
uses the former POSIX.9 API for Fortran77, which is sort of obsoleted,
although it is implemented on several platforms.)

Since it is conceivable that others will follow the "NAG way", which looks
quite clean to me, the above could then be easily extended to the followers.

Regards,
-Harald

-- 
Harald Anlauf
Deutscher Wetterdienst (DWD)           | Phone:  +49-(0)69/678667-41
FE1/AP03 - Assimilation & Modelle      | Fax:    +49-(0)69/678667-54
63067 Offenbach                        | e-Mail: address@hidden


 

------- End of Forwarded Message