#define MESGERR 1
#include <string.h>
#ifdef DEF_LECT_ECR
#define MODE_ACCES MED_ACC_RDWR
#elif DEF_LECT_AJOUT
#define MODE_ACCES MED_ACC_RDEXT
#else
#define MODE_ACCES MED_ACC_CREAT
#endif
int main (
int argc,
char **argv)
{
int cstp = 0;
strcat(axisname,"x ");
strcat(axisname,"y ");
strcat(axisname,"z ");
strcat(axisunit,"cm ");
strcat(axisunit,"cm ");
strcat(axisunit,"cm ");
if (!fileexist) {
MESSAGE(
"Le fichier test1.med n'existe pas.");
}
if (!accessok) {
MESSAGE(
"Le fichier test1.med ne peut pas être ouvert selon le mode d'accès demandé .");
}
if (!hdfok) {
MESSAGE(
"Format HDF non conforme ou fichier inexistant");
return -1;
}
if (!medok) {
MESSAGE(
"Format MED non conforme ou fichier inexistant");
return -1;
}
if (fid < 0) {
MESSAGE(
"Erreur a l'ouverture du fichier test1.med en mode MED_LECTURE");
return -1;
}
if (ret == 0)
printf("En-tete du fichier test1.med : %s\n",des);
else {
MESSAGE(
"Erreur a la lecture de l'en-tete du fichier test1.med");
ret = -1;
}
if (ret < 0) {
MESSAGE(
"Erreur a la fermeture du fichier test1.med");
return -1;
}
if (!fileexist) {
MESSAGE(
"Le fichier test2.med n'existe pas.");
}
if (!accessok) {
MESSAGE(
"Le fichier test2.med ne peut pas être ouvert selon le mode d'accès demandé .");
}
if (fid < 0) {
MESSAGE(
"Erreur a la creation du fichier test2.med");
return -1;
}
MESSAGE(
"Erreur a la creation du maillage maa1");
ret = -1;
}
MESSAGE(
"Erreur a la creation du nom universel de maa1");
ret = -1;
}
MESSAGE(
"Erreur a la creation du maillage maa2");
ret = -1;
}
cstp = 1;
fprintf(stderr,"Erreur à la création de l'étape de calcul n°%d du maillage maa2\n",cstp);
}
cstp++;
1,3,1.1) < 0) {
fprintf(stderr,"Erreur à la création de l'étape de calcul n°%d du maillage maa2\n",cstp);
}
cstp++;
0,0,1.1) < 0) {
fprintf(stderr,"Erreur à la création de l'étape de calcul n°%d du maillage maa2\n",cstp);
}
cstp++;
0,-1,1.1) < 0) {
fprintf(stderr,"Erreur à la création de l'étape de calcul n°%d du maillage maa2\n",cstp);
}
cstp++;
-1,20,1.1) < 0) {
fprintf(stderr,"Erreur à la création de l'étape de calcul n°%d du maillage maa2\n",cstp);
}
cstp++;
fprintf(stderr,"Erreur attendue : \n");
20,-1,1.1) < 0) {
fprintf(stderr,"Erreur à la création de l'étape de calcul n°%d du maillage maa2\n",cstp);
}
cstp++;
fprintf(stderr,"Erreur attendue : \n");
20,-1,1.1) < 0) {
fprintf(stderr,"Erreur à la création de l'étape de calcul n°%d du maillage maa2\n",cstp);
}
cstp++;
20,-1,1.1) < 0) {
fprintf(stderr,"Erreur à la création de l'étape de calcul n°%d du maillage maa2\n",cstp);
}
cstp++;
fprintf(stderr,"Erreur attendue car l'étape a été crée précedement: \n");
20,-1,1.1) < 0) {
fprintf(stderr,"Erreur à la création de l'étape de calcul n°%d du maillage maa2\n",cstp);
}
cstp++;
20,10,1.1) < 0) {
fprintf(stderr,"Erreur à la création de l'étape de calcul n°%d du maillage maa2\n",cstp);
}
cstp++;
fprintf(stderr,"Erreur attendue car cette étape ne se place pas en dernière position : \n");
20,5,1.1) < 0) {
fprintf(stderr,"Erreur à la création de l'étape de calcul n°%d du maillage maa2\n",cstp);
}
cstp++;
fprintf(stderr,"Erreur attendue car la création de cette étape chevauche la (20,10) : \n");
20,20,1.1) < 0) {
fprintf(stderr,"Erreur à la création de l'étape de calcul n°%d du maillage maa2\n",cstp);
}
MESSAGE(
"Erreur a la creation du maillage maa3");
ret = -1;
}
MESSAGE(
"Erreur a la fermeture du fichier");
return -1;
}
return ret;
}