#define MESGERR 1
#ifdef DEF_LECT_ECR
#define MODE_ACCES MED_LECTURE_ECRITURE
#elif DEF_LECT_AJOUT
#define MODE_ACCES MED_LECTURE_AJOUT
#else
#define MODE_ACCES MED_CREATION
#endif
int main (
int argc,
char **argv)
{
char maa[MED_TAILLE_NOM+1] = "maa1";
med_float coo[8] = {0.0, 0.0, 1.0, 0.0, 0.0, 1.0, 1.0, 1.0};
char nomcoo[2*MED_TAILLE_PNOM+1] = "x y ";
char unicoo[2*MED_TAILLE_PNOM+1] = "cm cm ";
char nomnoe[4*MED_TAILLE_PNOM+1] = "nom1 nom2 nom3 nom4";
if ((fid = MEDouvrir(
"test14.med",
MODE_ACCES)) < 0) {
MESSAGE(
"Erreur a la creation du fichier test14.med");
return -1;
}
if (MEDmaaCr(fid,maa,mdim,MED_NON_STRUCTURE,"Un maillage pour test14") < 0) {
MESSAGE(
"Erreur a la creation du maillage");
return -1;
}
nomcoo,unicoo,nomnoe,MED_VRAI,numnoe,MED_VRAI,
nufano,nnoe) < 0) {
MESSAGE(
"Erreur a l'ecriture des noeuds du maillage");
return -1;
}
if (MEDfermer(fid) < 0) {
MESSAGE(
"Erreur a la fermeture du fichier");
return -1;
}
return 0;
}