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

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

This archive contains answers to questions sent to Unidata support through mid-2025. Note that the archive is no longer being updated. We provide the archive for reference; many of the answers presented here remain technically correct, even if somewhat outdated. For the most up-to-date information on the use of NSF Unidata software and data services, please consult the Software Documentation first.

  • Subject: [netCDF #CQM-787807]: netCDF4 f90 interface - problem with
  • Date: Wed, 30 Apr 2008 08:09:34 -0600
> 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