45 if ((attid = H5Aopen_name(pere,nom)) < 0)
51 type_hdf = H5T_NATIVE_DOUBLE;
55 #if defined(HAVE_F77INT64)
56 type_hdf = H5T_NATIVE_LONG;
58 type_hdf = H5T_NATIVE_INT;
66 if ((ret = H5Aread(attid,type_hdf, val)) < 0)
69 if ((ret = H5Aclose(attid)) < 0)
med_err _MEDattrNumLire(med_idt pere, med_field_type type, const char *const nom, unsigned char *val)