#include <med.h>
#define MESGERR 1
#include <med_utils.h>
#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;
}
int main(int argc, char **argv)
MEDC_EXPORT med_err MEDfileClose(med_idt fid)
Fermeture d'un fichier MED.
MEDC_EXPORT med_idt MEDfileOpen(const char *const filename, const med_access_mode accessmode)
Ouverture d'un fichier MED.
MEDC_EXPORT med_err MEDfileCommentRd(const med_idt fid, char *const comment)
Lecture d'un descripteur dans un fichier MED.
MEDC_EXPORT med_err MEDfileCompatibility(const char *const filename, med_bool *const hdfok, med_bool *const medok)
Vérification de la compatibilité d'un fichier avec HDF et MED.
MEDC_EXPORT med_err MEDfileExist(const char *const filename, const med_access_mode accessmode, med_bool *const fileexist, med_bool *const accessok)
Interroge l'existence d'un fichier de nom filename et la possibilité de l'ouvrir selon le mode d'accè...
MEDC_EXPORT med_err MEDmeshCr(const med_idt fid, const char *const meshname, const med_int spacedim, const med_int meshdim, const med_mesh_type meshtype, const char *const description, const char *const dtunit, const med_sorting_type sortingtype, const med_axis_type axistype, const char *const axisname, const char *const axisunit)
Cette routine permet de créer un maillage dans un fichier.
MEDC_EXPORT med_err MEDmeshUniversalNameWr(const med_idt fid, const char *const meshname)
Cette routine permet l'écriture du nom universel d'un maillage.
MEDC_EXPORT med_err MEDmeshComputationStepCr(const med_idt fid, const char *const meshname, const med_int numdt1, const med_int numit1, const med_int numdt2, const med_int numit2, const med_float dt2)
Cette routine permet de créer une nouvelle étape de calcul dans un maillage.