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 <hdf5.h>
23 
24 /*
25  * - Nom de la fonction : _MEDdatasetOuvrir
26  * - Description : ouverture d'un objet HDF dataset
27  * - Parametres :
28  *     - pid  (IN)     : l'ID de l'objet HDF pere
29  *     - nom  (IN)     : le nom du dataset
30  * - Resultat : ID du dataset en cas de succes, -1 sinon
31  */
32 med_idt
_MEDdatasetOuvrir(med_idt pid,char * nom)33 _MEDdatasetOuvrir(med_idt pid,char *nom)
34 {
35   med_idt id=0;
36 
37   if ( (id = H5Dopen(pid,nom)) < 0)
38     return -1;
39 
40   return id;
41 }
42