NF_GLOBAL and nfmpi_put_var_real

[Rene Redler]

P.S.:

I forgot to mention that probably all dimensions need to be
declared as I described in my previous mail. For my if was
helpful to take a look into pnetcdf/src/libf/mpifnetcdf.h
to learn what is expected to the respective calls, although
this is probably not the way the developers like us to go ;)

In your example below

ierr=nfmpi_def_var(ncid,"P0",NF_REAL,0_8,0_8,t_id)

will probably help to force the 0 arguments passed as
integer*8 to the lib functions.


Yu-Heng Tseng schrieb:
> Hi,
> 
> I got some problems in the testing.
> 1. It seems  NF_GLOBAL causes some errors in  nfmpi_put_att_text().
> Same thing  happens to NF_UNLIMITED
> Is that right?
> 
> 2. nfmpi_put_var_real() seems not giving me right answer.
> I added a couple of lines within the test program (/fandc/pnf_test.F).
> real*4 pt
> pt=5.0
> ierr=nfmpi_def_var(ncid,"P0",NF_REAL,0,0,t_id)
> ierr=nfmpi_put_var_real(ncid,t_id,pt)
> 
> It goes wrong in the output. Same for nfmpi_put_var_double() etc
> Any idea how to fix this?
> Thanks!
> 
> Cheers
> 
> Yu-heng