MED fichier
Test_MEDnStructElement.c
Aller à la documentation de ce fichier.
1/* This file is part of MED.
2 *
3 * COPYRIGHT (C) 1999 - 2020 EDF R&D, CEA/DEN
4 * MED is free software: you can redistribute it and/or modify
5 * it under the terms of the GNU Lesser General Public License as published by
6 * the Free Software Foundation, either version 3 of the License, or
7 * (at your option) any later version.
8 *
9 * MED is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU Lesser General Public License for more details.
13 *
14 * You should have received a copy of the GNU Lesser General Public License
15 * along with MED. If not, see <http://www.gnu.org/licenses/>.
16 */
17
18
19#include <med.h>
20#define MESGERR 1
21#include <med_utils.h>
22#include <string.h>
23
24#ifdef DEF_LECT_ECR
25#define MODE_ACCES MED_ACC_RDWR
26#elif DEF_LECT_AJOUT
27#define MODE_ACCES MED_ACC_RDEXT
28#else
29#define MODE_ACCES MED_ACC_CREAT
30#endif
31
32int main (int argc, char **argv)
33
34{
35 med_err _ret=0;
36 med_idt _fid=0;
37 med_int _nstructelement=0;
38
39 /* Ouverture en mode creation du fichier med */
40 _fid = MEDfileOpen("current.med",MED_ACC_RDONLY);
41 if (_fid < 0) {
42 MESSAGE("Erreur a la creation du fichier current.med");
43 return -1;
44 }
45
46 if ( (_nstructelement = MEDnStructElement(_fid)) <0) _ret=_nstructelement;
47
48 ISCRUTE(_nstructelement);
49
50 return _ret;
51
52}
53
int main(int argc, char **argv)
#define MESSAGE(chaine)
#define ISCRUTE(entier)
MEDC_EXPORT med_idt MEDfileOpen(const char *const filename, const med_access_mode accessmode)
Ouverture d'un fichier MED.
Definition MEDfileOpen.c:42
MEDC_EXPORT med_int MEDnStructElement(const med_idt fid)
Cette routine renvoie le nombre de modèles d'éléments de structure.