MEDmeshInfo.c
Aller à la documentation de ce fichier.00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019 #include "med_config.h"
00020 #include <med.h>
00021 #include "med_outils.h"
00022 #include <string.h>
00023
00043 med_err MEDmeshInfo(const med_idt fid,
00044 const int meshit,
00045 char * const meshname,
00046 med_int * const spacedim,
00047 med_int * const meshdim,
00048 med_mesh_type * const meshtype,
00049 char * const description,
00050 char * const dtunit,
00051 med_sorting_type * const sortingtype,
00052 med_int * const nstep,
00053 med_axis_type * const axistype,
00054 char * const axisname,
00055 char * const axisunit)
00056 {
00057 med_err _ret=-1;
00058 char _meshpath[MED_TAILLE_MAA+MED_NAME_SIZE+1]=MED_MAA;
00059 int _num = meshit -1;
00060
00061
00062
00063
00064 _MEDmodeErreurVerrouiller();
00065
00066
00067
00068
00069 if ( _MEDobjectGetName(fid, _meshpath ,_num, meshname) < 0 ) {
00070 MED_ERR_(_ret,MED_ERR_ACCESS,MED_ERR_DATAGROUP,_meshpath);ISCRUTE_int(meshit);
00071 goto ERROR;
00072 }
00073 strcat(_meshpath,meshname);
00074
00075
00076
00077
00078
00079
00080
00081 if ( MEDmeshInfoByName(fid, meshname, spacedim, meshdim, meshtype,
00082 description, dtunit, sortingtype, nstep,axistype, axisname, axisunit) < 0) {
00083 MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,MED_ERR_MESH_MSG);
00084 SSCRUTE(meshname);SSCRUTE(_meshpath);SSCRUTE("MEDmeshInfoByName");
00085 goto ERROR;
00086 }
00087
00088 _ret = 0;
00089
00090 ERROR:
00091
00092 return _ret;
00093 }