1 /* This file is part of MED.
2 *
3 * COPYRIGHT (C) 1999 - 2019 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
25 /**\ingroup MEDmesh
26 \brief \MEDmeshEntityAttributeAdvancedBrief{d'écrire}
27 \param fid \fid
28 \param meshname \meshname
29 \param datatype \datatype
30 \param numdt \numdt
31 \param numit \numit
32 \param entitype \entitype
33 \param geotype \geotype
34 \param filter \filter
35 \param attval \attributevalue
36 \retval med_err \error
37 \details \MEDmeshEntityAttributeAdvancedDetails{d'écrire}
38 \remarks
39 \MEDmeshEntityAttributeAdvancedRem
40 */
41
MEDmeshEntityAttributeAdvancedWr(const med_idt fid,const char * const meshname,const med_data_type datatype,const med_int numdt,const med_int numit,const med_entity_type entitype,const med_geometry_type geotype,const med_filter * const filter,const void * const attval)42 med_err MEDmeshEntityAttributeAdvancedWr(const med_idt fid,
43 const char* const meshname,
44 const med_data_type datatype,
45 const med_int numdt,
46 const med_int numit,
47 const med_entity_type entitype,
48 const med_geometry_type geotype,
49 const med_filter * const filter,
50 const void * const attval)
51 {
52
53 med_err _ret=-1;
54
55 switch (datatype) {
56 case MED_NAME:
57 case MED_NUMBER:
58 case MED_FAMILY_NUMBER:
59 break;
60 default:
61 MED_ERR_(_ret,MED_ERR_RANGE,MED_ERR_PARAMETER,"");
62 ISCRUTE_int(datatype);
63 goto ERROR;
64 }
65
66 _ret= _MEDmeshAdvancedWr(fid,
67 meshname,
68 datatype,
69 MED_NO_NAME,
70 MED_INTERNAL_UNDEF,
71 numdt,
72 numit,
73 MED_UNDEF_DT, /*Si la séquence de calcul n'existe pas, ce champ sera initialisé correctement par d'autres appels.*/
74 entitype,
75 geotype,
76 MED_NODAL,
77 MED_UNDEF_STMODE,
78 MED_NO_PROFILE,
79 MED_UNDEF_INTERLACE,
80 MED_ALL_CONSTITUENT,
81 filter,
82 MED_UNDEF_SIZE,
83 attval);
84 ERROR:
85 return _ret;
86
87 }
88