med_err
MEDsupportMeshInfoByName(const med_idt fid,
const char * const supportmeshname,
med_int * const spacedim,
med_int * const meshdim,
char * const description,
med_axis_type * const axistype,
char * const axisname,
char * const axisunit)
{
med_err _ret=-1;
char _dtunit[MED_SNAME_SIZE+1]="";
med_sorting_type _sortingtype=MED_SORT_UNDEF;
med_mesh_type _meshtype = MED_UNDEF_MESH_TYPE;
med_int _nstep=0;
/*
* On inhibe le gestionnaire d'erreur HDF 5
*/
_MEDmodeErreurVerrouiller();
if ( _MEDmeshInfoByName(fid, MED_MESH_SUPPORT_GRP, supportmeshname, spacedim, meshdim, &_meshtype,
description, _dtunit, &_sortingtype, &_nstep,
axistype, axisname, axisunit) < 0) {
MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,MED_ERR_MESH_MSG);
SSCRUTE(supportmeshname);SSCRUTE("MEDmeshInfoByName");
goto ERROR;
}
_ret = 0;
ERROR:
return _ret;
}
void _MEDmeshInfoByName30(int dummy, ...) {
/* med_idt fid; */
/* char * const meshname; */
/* med_int * const spacedim; */
/* med_int * const meshdim; */
/* med_mesh_type * const meshtype; */
/* char * const description; */
/* char * const dtunit; */
/* med_sorting_type * const sortingtype; */
/* med_int * const nstep; */
/* med_axis_type * const axistype; */
/* char * const axisname; */
/* char * const axisunit; */
med_err _ret=-1;
MED_VARGS_DECL(, med_idt ,, fid );
MED_VARGS_DECL(, char * , const , meshname );
MED_VARGS_DECL(, med_int * , const , spacedim );
MED_VARGS_DECL(, med_int * , const , meshdim );
MED_VARGS_DECL(, med_mesh_type * , const , meshtype );
MED_VARGS_DECL(, char * , const , description );
MED_VARGS_DECL(, char * , const , dtunit );
MED_VARGS_DECL(, med_sorting_type *, const , sortingtype );
MED_VARGS_DECL(, med_int * , const , nstep );
MED_VARGS_DECL(, med_axis_type * , const , axistype );
MED_VARGS_DECL(, char * , const , axisname );
MED_VARGS_DECL(, char * , const , axisunit );
MED_VARGS_DECL(, med_err * ,, fret );
va_list params;
va_start(params,dummy);
MED_VARGS_DEF(, med_idt ,, fid );
MED_VARGS_DEF(, char * , const , meshname );
MED_VARGS_DEF(, med_int * , const , spacedim );
MED_VARGS_DEF(, med_int * , const , meshdim );
MED_VARGS_DEF(, med_mesh_type * , const , meshtype );
MED_VARGS_DEF(, char * , const , description );
MED_VARGS_DEF(, char * , const , dtunit );
MED_VARGS_DEF(, med_sorting_type *, const , sortingtype );
MED_VARGS_DEF(, med_int * , const , nstep );
MED_VARGS_DEF(, med_axis_type * , const , axistype );
MED_VARGS_DEF(, char * , const , axisname );
MED_VARGS_DEF(, char * , const , axisunit );
MED_VARGS_DEF(, med_err * ,, fret );
/*
* On inhibe le gestionnaire d'erreur HDF 5
*/
_MEDmodeErreurVerrouiller();
if ( _MEDmeshInfoByName(fid, MED_MAA, meshname, spacedim, meshdim, meshtype,
description, dtunit, sortingtype, nstep,axistype,
axisname, axisunit) < 0) {
MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,MED_ERR_MESH_MSG);
SSCRUTE(meshname);SSCRUTE("MEDmeshInfoByName");
goto ERROR;
}
_ret = 0;
ERROR:
va_end(params);
*fret = _ret;
return;
}
