[netCDF #CQM-787807]: netCDF4 f90 interface - problem with

> I'm using netcdf-4.0-snapshot2008042720.
>
> I've been trying to convert the ftst_vars.F program to use the F90
> interface and struck a problem with file open modes. The original
> program uses
>
> mode_flag = IOR(NF_NETCDF4, NF_CLASSIC_MODEL);
> retval = nf_create(FILE_NAME, mode_flag, ncid)
>
> If I use
>
> mode_flag = IOR(NF90_NETCDF4, NF90_CLASSIC_MODEL)
> retval = nf90_create(FILE_NAME, mode_flag, ncid)
>
> I get an error with return value of -36.
>
> The problem seems to be that in netcdf4_constants.f90
> nf90_classic_model = 8
> while in netcdf.inc
> nf_classic_model = 256
>
> If I use the mode from the f77 values in the f90 call everything works
> properly.
>
> Regards
>
> Martin Dix
>
>

Howdy Martin!

Thanks for pointing this out. I have corrected it in the codebase. It will be
in the next snapshot I generate.

I have also added a test for this, so that if I break it I will notice. ;-)

Thanks, and keep on netCDFing!

Ed

Ticket Details
===================
Ticket ID: CQM-787807
Department: Support netCDF
Priority: Normal
Status: Closed