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 
23 #include <string.h>
24 #include <stdlib.h>
25 
26 /**\ingroup MEDfamily
27   \brief \MEDnFamilyBrief
28   \param fid \fid
29   \param meshname \meshname
30   \retval med_int  \nfamily
31   \details \MEDnFamilyDetails
32  */
33 
34 med_int
MEDnFamily(const med_idt fid,const char * const meshname)35 MEDnFamily(const med_idt      fid,
36 	   const char * const meshname)
37 {
38   char *  name = "_MEDnFamily";
39   int     dummy=0;
40   med_int fret=-1;
41   med_int majeur, mineur, release;
42   MedFuncType func;
43 
44   MEDfileNumVersionRd(fid, &majeur, &mineur, &release);
45   func = _MEDversionedApi3(name,majeur,mineur,release);
46   if ( func != (MedFuncType) NULL )
47     func (dummy, fid,  meshname , &fret);
48   return fret;
49 }
50