PnetCDF Fortran Binding Issues

William Gropp gropp at mcs.anl.gov
Fri Aug 8 09:02:51 CDT 2003


At 08:39 AM 8/8/2003 -0500, Jianwei Li wrote:

>It's great that the conversion was applied automatically!
>The Fortran binding updates look perfect except that the
>indices/coordinates need to substract 1 from the Fortran
>indices/coordinates to get the C ones, while counts and
>strides don't. So in the put/get_var1, put/get_vara, and
>put/get_vars binding, I think the code segment
>
>     if (ln > 0) {
>         int li;
>         l3 = (size_t *)malloc( ln * sizeof(size_t) );
>         for (li=0; li<ln; li++)
>             l3[li] = v3[ln-1-li];
>     }
>
>need to be changed to:
>
>     if (ln > 0) {
>         int li;
>         l3 = (size_t *)malloc( ln * sizeof(size_t) );
>         for (li=0; li<ln; li++)
>             l3[li] = v3[ln-1-li]-1;
>     }
>
>as I indicated in my previous emails.

Done.  I also added one to the index where the value is an output value.

Bill




More information about the parallel-netcdf mailing list