Hi Toon,
On 5/25/19 7:01 PM, Steve Kargl wrote:
For WRF, I suppose you or Martin could be a good citizen and
contact the project to report a bug.
I have thought about this. As a person with experience building and
running weather forecasting codes, I would be first in line to try this.
But the SPEC code could be modified and not resemble a fresh WRF setup ...
The current version of netcdf has, in module_netcdf_nf_interfaces.F90,
!--------------------------------- nf_put_vara_double ----------------------
Interface
Function nf_put_vara_double(ncid, varid, start, counts, dvals) &
RESULT(status)
USE netcdf_nf_data, ONLY: RK8
Integer, Intent(IN) :: ncid, varid
Integer, Intent(IN) :: start(*), counts(*)
Real(RK8), Intent(IN) :: dvals(*)
Integer :: status
End Function nf_put_vara_double
End Interface
which looks good (well, it's not BIND(C)). In another file,
it has it as a simple INTEGER declaration with EXTERNAL.
I don't know which of the two is actually used.