h5tset_size is expecting an integer(size_t) in the second argument, but you are passing and integer (constant 18), instead pass INT(18,size_t).
Scot > On Feb 4, 2015, at 9:34 AM, Fabio Berzaghi <[email protected]> wrote: > > Dear All, > > I am not able to find what throws this error when compiling this .f90 file > with gfortran. I am copying part of the code which doesn't give any other > errors. > > the variables are declared as > integer :: hdferr > integer(HID_T):: atype_id > > these are the subroutine calls just before and after > > CALL h5screate_simple_f(1, adims, aspace_id, hdferr) > CALL h5tcopy_f(H5T_NATIVE_CHARACTER, atype_id, hdferr) > CALL h5tset_size_f(atype_id, 18, hdferr) > CALL h5acreate_f(dset_id, 'FullName', atype_id, aspace_id, attr_id, hdferr) > CALL h5awrite_f(attr_id, atype_id, 'Precipitation Rate', adims, hdferr) > CALL h5aclose_f(attr_id, hdferr) > > I can't figure out where the problem is. > > Thanks > > > > _______________________________________________ > Hdf-forum is for HDF software users discussion. > [email protected] > http://lists.hdfgroup.org/mailman/listinfo/hdf-forum_lists.hdfgroup.org > Twitter: https://twitter.com/hdf5 _______________________________________________ Hdf-forum is for HDF software users discussion. [email protected] http://lists.hdfgroup.org/mailman/listinfo/hdf-forum_lists.hdfgroup.org Twitter: https://twitter.com/hdf5
