<div dir="ltr"><div class="gmail_default" style="font-family:comic sans ms,sans-serif;color:#38761d">Yes and so is _8 - I couldn't find an f77 way to do it, this is a nag way to do it and I tested with pgi to make sure that a true f77 compiler still works.   I'm open to better solutions.</div></div><div class="gmail_extra"><br><div class="gmail_quote">On Fri, Sep 4, 2015 at 4:43 PM, Wei-keng Liao <span dir="ltr"><<a href="mailto:wkliao@eecs.northwestern.edu" target="_blank">wkliao@eecs.northwestern.edu</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Hi, Jim,<br>
<br>
Isn't using the call selected_int_kind() a Fortran 90+ feature?<br>
<br>
Wei-keng<br>
<div><div class="h5"><br>
On Sep 4, 2015, at 5:27 PM, Jim Edwards wrote:<br>
<br>
> No it doesn't like _8  either  - here is a patch that fixes that problem - I also tested it with pgi.<br>
><br>
> Now I have another error but it'll wait until next week, have a great weekend.<br>
><br>
> (here is the other error, haven't looked into it at all yet...)<br>
> Error: mcoll_testf77.f, line 497: Inconsistent structure for arg 2 in call to MPI_ALLREDUCE<br>
><br>
> Error: mcoll_testf77.f, line 499: Inconsistent structure for arg 2 in call to MPI_ALLREDUCE<br>
><br>
><br>
><br>
> On Fri, Sep 4, 2015 at 4:20 PM, Wei-keng Liao <<a href="mailto:wkliao@eecs.northwestern.edu">wkliao@eecs.northwestern.edu</a>> wrote:<br>
> Hi, Jim,<br>
><br>
> Is NAG compiler OK with _8 modifier?<br>
> Could you try manually change 4294967295 to 4294967295_8 and see if it compiles?<br>
><br>
> Wei-keng<br>
><br>
> On Sep 4, 2015, at 3:12 PM, Jim Edwards wrote:<br>
><br>
> > Actually I still have a problem and I'm not sure how it should be resolved...<br>
> ><br>
> > Error: ../../src/libf/pnetcdf.inc, line 79: Integer literal 4294967295 too large for default KIND<br>
> ><br>
> > Error: ../../src/libf/pnetcdf.inc, line 80: Integer literal 9223372036854775806 too large for default KIND<br>
> ><br>
> > Warning: mcoll_testf77.f, line 30: Unused PARAMETER NREADS<br>
> ><br>
> > Errors in declarations, no further processing for MCOLL_TESTF<br>
> ><br>
> > Error: ../../src/libf/pnetcdf.inc, line 79: Integer literal 4294967295 too large for default KIND<br>
> ><br>
> > Error: ../../src/libf/pnetcdf.inc, line 80: Integer literal 9223372036854775806 too large for default KIND<br>
> ><br>
> > I'm not sure of an F77 conformant way to define these constants - are you?<br>
> ><br>
> > On Fri, Sep 4, 2015 at 1:39 PM, Wei-keng Liao <<a href="mailto:wkliao@eecs.northwestern.edu">wkliao@eecs.northwestern.edu</a>> wrote:<br>
> > Thanks, Jim. I have applied your patch.<br>
> ><br>
> > I do not have an access to a NAG compiler.<br>
> > Please check it builds and tests fine.<br>
> ><br>
> > Wei-keng<br>
> ><br>
> > On Sep 4, 2015, at 11:49 AM, Jim Edwards wrote:<br>
> ><br>
> > > Here is a patch for pnetcdf R2088 to the nag/6.0 compiler.   I also needed a compiler flag           -mismatch_all to turn errors about data type mismatches into warnings.<br>
> > ><br>
> > ><br>
> > ><br>
> > > --<br>
> > > Jim Edwards<br>
> > ><br>
> > > CESM Software Engineer<br>
> > > National Center for Atmospheric Research<br>
> > > Boulder, CO<br>
> > > <pnetcdfR2088.nag6port><br>
> ><br>
> ><br>
> ><br>
> ><br>
> > --<br>
> > Jim Edwards<br>
> ><br>
> > CESM Software Engineer<br>
> > National Center for Atmospheric Research<br>
> > Boulder, CO<br>
><br>
><br>
><br>
><br>
> --<br>
> Jim Edwards<br>
><br>
> CESM Software Engineer<br>
> National Center for Atmospheric Research<br>
> Boulder, CO<br>
</div></div>> <pnetcdf2089.nagpatch><br>
<br>
</blockquote></div><br><br clear="all"><div><br></div>-- <br><div class="gmail_signature"><div dir="ltr"><div><div><div>Jim Edwards<br><br></div><font size="1">CESM Software Engineer<br></font></div><font size="1">National Center for Atmospheric Research<br></font></div><font size="1">Boulder, CO</font> <br></div></div>
</div>