#include <med.h>
#define MESGERR 1
#include <med_utils.h>
#include <string.h>
int main (
int argc,
char **argv) {
int ret = -1;
if (fid < 0) {
goto ERROR;
}
componentname, componentunit, dtunit, &nstep) < 0) {
MESSAGE(
"ERROR : Field info by name ...");
goto ERROR;
}
for (csit=0; csit<nstep; csit++) {
MESSAGE(
"ERROR : Computing step info ...");
goto ERROR;
}
geotype = geotypes[it];
profilename, localizationname)) < 0) {
MESSAGE(
"ERROR : read number of profile ");
goto ERROR;
}
for (pit=0; pit<np; pit++) {
localizationname, &nintegrationpoint)) < 0) {
MESSAGE(
"ERROR : read number of values with a profile ...");
goto ERROR;
}
if (nvalues) {
MESSAGE(
"ERROR : memory allocation ...");
goto ERROR;
}
(unsigned char*) values) < 0) {
MESSAGE(
"ERROR : read fields values for cells ...");
free(values);
goto ERROR;
}
free(values);
}
}
}
}
ret=0;
ERROR:
ret=-1;
}
return ret;
}