MED fichier
MEDmeshElementRd.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#include <med_config.h>
21#include <med_outils.h>
22#include <string.h>
23#include <stdlib.h>
24
48 const char * const meshname,
49 const med_int numdt,
50 const med_int numit,
51 const med_entity_type entitype,
52 const med_geometry_type geotype,
53 const med_connectivity_mode cmode,
54 const med_switch_mode switchmode,
55 med_int * const connectivity,
56 med_bool * const withelementname,
57 char * const elementname,
58 med_bool * const withelementnumber,
59 med_int * const elementnumber,
60 med_bool * const withfamnumber,
61 med_int * const famnumber) {
62
63 med_err _ret = -1;
64 med_bool _chgt=MED_FALSE, _trsf=MED_FALSE;
65
66 *withelementname =MED_FALSE;
67 *withelementnumber =MED_FALSE;
68 *withfamnumber =MED_FALSE;
69
70 if ( (_ret = MEDmeshElementConnectivityRd(fid,
71 meshname,
72 numdt,
73 numit,
74 entitype,
75 geotype,
76 cmode,
77 switchmode,
78 connectivity) ) < 0 ) {
79 MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,"MEDmeshElementConnectivityRd");
80 goto ERROR;
81 }
82
83
84 if ( MEDmeshnEntity(fid, meshname, numdt, numit,
85 entitype,geotype,MED_NAME, cmode,
86 &_chgt, &_trsf) > 0) {
87 *withelementname=MED_TRUE;
88 }
89
90 if ( *withelementname )
91 if ( (_ret = MEDmeshEntityNameRd(fid,
92 meshname,
93 numdt,
94 numit,
95 entitype,
96 geotype,
97 elementname) ) < 0 ) {
98 MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,"MEDmeshEntityNameRd");
99 goto ERROR;
100 }
101
102 if ( MEDmeshnEntity(fid, meshname, numdt, numit,
103 entitype,geotype,MED_NUMBER, cmode,
104 &_chgt, &_trsf) > 0) {
105 *withelementnumber=MED_TRUE;
106 }
107
108
109 if ( *withelementnumber )
110 if ( (_ret = MEDmeshEntityNumberRd(fid,
111 meshname,
112 numdt,
113 numit,
114 entitype,
115 geotype,
116 elementnumber) ) < 0 ) {
117 MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,"MEDmeshEntityNumberRd");
118 goto ERROR;
119 }
120
121 if ( MEDmeshnEntity(fid, meshname, numdt, numit,
122 entitype,geotype,MED_FAMILY_NUMBER, cmode,
123 &_chgt, &_trsf) > 0) {
124 *withfamnumber=MED_TRUE;
125 }
126
127 if (*withfamnumber)
128 if ( (_ret = MEDmeshEntityFamilyNumberRd(fid,
129 meshname,
130 numdt,
131 numit,
132 entitype,
133 geotype,
134 famnumber) ) < 0 ) {
135 MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,"MEDmeshEntityFamilyNumberRd");
136 goto ERROR;
137 }
138
139 _ret = 0;
140 ERROR:
141 return _ret;
142}
#define MED_ERR_(rt, r1, r2, r3)
MEDC_EXPORT med_err MEDmeshElementConnectivityRd(const med_idt fid, const char *const meshname, const med_int numdt, const med_int numit, const med_entity_type entitype, const med_geometry_type geotype, const med_connectivity_mode cmode, const med_switch_mode switchmode, med_int *const connectivity)
Cette routine permet de lire dans un maillage le tableau des connectivités pour un type géométrique d...
MEDC_EXPORT med_int MEDmeshnEntity(const med_idt fid, const char *const meshname, const med_int numdt, const med_int numit, const med_entity_type entitype, const med_geometry_type geotype, const med_data_type datatype, const med_connectivity_mode cmode, med_bool *const changement, med_bool *const transformation)
Cette routine permet de lire le nombre d'entités dans un maillage pour une étape de calcul donnée.
MEDC_EXPORT med_err MEDmeshEntityNameRd(const med_idt fid, const char *const meshname, const med_int numdt, const med_int numit, const med_entity_type entitype, const med_geometry_type geotype, char *const name)
Cette routine permet de lire les noms d'un type d'entité d'un maillage.
MEDC_EXPORT med_err MEDmeshEntityFamilyNumberRd(const med_idt fid, const char *const meshname, const med_int numdt, const med_int numit, const med_entity_type entitype, const med_geometry_type geotype, med_int *const number)
Cette routine permet la lecture des numéros de famille d'un type d'entité d'un maillage.
med_err MEDmeshElementRd(const med_idt fid, const char *const meshname, const med_int numdt, const med_int numit, const med_entity_type entitype, const med_geometry_type geotype, const med_connectivity_mode cmode, const med_switch_mode switchmode, med_int *const connectivity, med_bool *const withelementname, char *const elementname, med_bool *const withelementnumber, med_int *const elementnumber, med_bool *const withfamnumber, med_int *const famnumber)
Cette routine permet la lecture d'un type d'élément d'un maillage non structuré pour une étape de cal...
MEDC_EXPORT med_err MEDmeshEntityNumberRd(const med_idt fid, const char *const meshname, const med_int numdt, const med_int numit, const med_entity_type entitype, const med_geometry_type geotype, med_int *const number)
Cette routine permet de lire les numéros d'un type d'entité d'un maillage.
#define MED_ERR_CALL
Definition med_err.h:48
#define MED_ERR_API
Definition med_err.h:111