_MEDequivalenceInfo236.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.h>
00020 #include <med_config.h>
00021 #include <med_outils.h>
00022
00023 #include <string.h>
00024 #include <stdlib.h>
00025
00026 #include <2.3.6/med23v30.h>
00027 #include <2.3.6/med23v30_proto.h>
00028 #include "2.3.6/med23v30_misc.h"
00029
00030 void
00031 _MEDequivalenceInfo236(int dummy, ...)
00032 {
00033
00034 va_list params;
00035 va_start(params,dummy);
00036
00037 const med_idt fid = va_arg(params,const med_idt );
00038 const char * const meshname = va_arg(params,const char * const );
00039 const int equivit = va_arg(params,const int );
00040 char * const equivname = va_arg(params,char * const );
00041 char * const equivdescription = va_arg(params,char * const );
00042 med_int * const nstep = va_arg(params,med_int * const );
00043 med_int * const nocstpncorrespondence = va_arg(params,med_int * const );
00044 med_err * fret = va_arg(params,med_err *);
00045 ;
00046 med_err _ret=-1,_err=-1;
00047 char _path[MED_TAILLE_MAA+MED_TAILLE_EQS+2*MED_TAILLE_NOM+1]=MED_MAA;
00048 med_int _ncor=0;
00049 med_size _nocstpncorrespondence=0;
00050
00051 if ( MEDequivInfo(fid, (char *) meshname, equivit, equivname, equivdescription) < 0 ) {
00052 MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,"MEDequivInfo");
00053 SSCRUTE(meshname); goto ERROR;
00054 }
00055
00056
00057
00058
00059 _MEDmodeErreurVerrouiller();
00060
00061 strcat(_path,meshname);
00062 strcat(_path,MED_EQS);
00063 strcat(_path,equivname);
00064
00065 if ((_err=_MEDnObjects(fid,_path,&_nocstpncorrespondence)) <0)
00066 if ( _err == (MED_ERR_COUNT + MED_ERR_DATAGROUP) ) {
00067 MED_ERR_(_ret,MED_ERR_COUNT,MED_ERR_CORRESPONDENCE,_path);
00068 goto ERROR;
00069 }
00070
00071 *nocstpncorrespondence = (med_int) _nocstpncorrespondence;
00072 if (_nocstpncorrespondence > 0 )
00073 *nstep = 1;
00074 else
00075 *nstep = 0;
00076
00077
00078 _ret = 0;
00079
00080 ERROR:
00081
00082 va_end(params);
00083 *fret = _ret;
00084
00085 return;
00086 }
00087
00088
00089