#define MESGERR 1
#include <string.h>
#define MESGERR 1
#include <string.h>
int main (
int argc,
char **argv) {
char *componentname = NULL;
char *componentunit = NULL;
med_int nprofile, pit, profilesize;
int ret=-1;
if (fid < 0) {
return -1;
}
MESSAGE(
"ERROR : How many fields in the file ...");
return -1;
}
for (i=0; i<nfield; i++) {
MESSAGE(
"ERROR : number of field component ...");
return -1;
}
if ((componentname = (
char *) malloc(ncomponent*
MED_SNAME_SIZE+1)) == NULL) {
MESSAGE(
"ERROR : memory allocation ...");
return -1;
}
if ((componentunit = (
char *) malloc(ncomponent*
MED_SNAME_SIZE+1)) == NULL) {
MESSAGE(
"ERROR : memory allocation ...");
return -1;
}
if (
MEDfieldInfo(fid, i+1, fieldname, meshname, &localmesh, &fieldtype,
componentname, componentunit, dtunit, &nstep) < 0) {
free(componentname);
free(componentunit);
return -1;
}
free(componentname);
free(componentunit);
for (csit=0; csit<nstep; csit++) {
MESSAGE(
"ERROR : Computing step info ...");
return -1;
}
geotype = geotypes[it];
profilename, localizationname)) < 0) {
MESSAGE(
"ERROR : read number of profile ");
return -1;
}
for (pit=0; pit<nprofile; pit++) {
localizationname, &nintegrationpoint)) < 0) {
MESSAGE(
"ERROR : read number of values with a profile ...");
return -1;
}
if (nvalues) {
MESSAGE(
"ERROR : memory allocation ...");
return -1;
}
MESSAGE(
"ERROR : read fields values for cells ...");
free(values);
return -1;
}
free(values);
}
}
}
}
}
ret=0;
ERROR:
ret=-1;
}
return ret;
}