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 <string.h>
22 #include <stdlib.h>
23 #include <med_outils.h>
24 
25 /**\ingroup MEDfield
26   \brief \MEDfieldnValueWithProfileBrief
27   \param fid \fid
28   \param fieldname \fieldname
29   \param numdt \numdt
30   \param numit \numit
31   \param entitype \entitype
32   \param geotype \geotype
33   \param meshname \meshname
34   \param profileit \profileit
35   \param storagemode \storagemode
36   \param profilename \profilename
37   \param profilesize \profilesize
38   \param localizationname \localizationname
39   \param nintegrationpoint \nintegrationpoint
40   \retval med_int \nvalue
41   \details \MEDfieldnValueWithProfileDetails
42   \par Remarques
43  */
44 
45 med_int
MEDfield23nValueWithProfile(const med_idt fid,const char * const fieldname,const med_int numdt,const med_int numit,const med_entity_type entitype,const med_geometry_type geotype,const char * const meshname,const int profileit,const med_storage_mode storagemode,char * const profilename,med_int * const profilesize,char * const localizationname,med_int * const nintegrationpoint)46 MEDfield23nValueWithProfile(const med_idt fid,
47 			    const char * const fieldname,
48 			    const med_int numdt,
49 			    const med_int numit,
50 			    const med_entity_type entitype,
51 			    const med_geometry_type geotype,
52 			    const char * const meshname,
53 			    const int profileit,
54 			    const med_storage_mode storagemode,
55 			    char * const profilename,
56 			    med_int * const profilesize,
57 			    char * const localizationname,
58 			    med_int * const nintegrationpoint)
59 {
60  med_int  _ret=-1;
61  char     _profilename[MED_NAME_SIZE+1]="";
62 
63  if ( (_ret = _MEDfield23nValue(fid,  fieldname, numdt, numit,
64 				entitype,  geotype, meshname,
65 				_profilename,profileit,
66 				storagemode, profilesize,
67 				localizationname, nintegrationpoint)) < 0) {
68    MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,MED_ERR_FIELD_MSG);
69    SSCRUTE(fieldname);SSCRUTE("_MEDfieldnValue");
70    goto ERROR;
71  }
72 
73  strncpy(profilename,_profilename,MED_NAME_SIZE+1);
74  profilename[MED_NAME_SIZE]='\0';
75 
76  ERROR:
77 
78   return _ret;
79 
80 }
81 
82 
83 
84