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 MEDsubdomainJoint
27    \brief \MEDsubdomainCorrespondenceRdBrief
28    \param fid \fid
29    \param localmeshname \localmeshname
30    \param jointname \jointname
31    \param numdt \numdt
32    \param numit \numit
33    \param localentitype \localentitype
34    \param localgeotype \localgeotype
35    \param remoteentitype \remoteentitype
36    \param remotegeotype \remotegeotype
37    \param correspondence \correspondence
38    \return \error
39    \details
40    \MEDsubdomainCorrespondenceRdDetails
41    \par Remarques
42    \MEDjointDef
43 */
44 
45 med_err
MEDsubdomainCorrespondenceRd(const med_idt fid,const char * const localmeshname,const char * const jointname,const med_int numdt,const med_int numit,const med_entity_type localentitype,const med_geometry_type localgeotype,const med_entity_type remoteentitype,const med_geometry_type remotegeotype,med_int * const correspondence)46 MEDsubdomainCorrespondenceRd(const med_idt            fid,
47 			     const char * const       localmeshname,
48 			     const char * const       jointname,
49 			     const med_int            numdt,
50 			     const med_int            numit,
51 			     const med_entity_type    localentitype,
52 			     const med_geometry_type  localgeotype,
53 			     const med_entity_type    remoteentitype,
54 			     const med_geometry_type  remotegeotype,
55 			     med_int * const          correspondence )
56 {
57   char *  name = "_MEDsubdomainCorrespondenceRd";
58   int     dummy=0;
59   med_err fret=-1;
60   med_int majeur, mineur, release;
61   MedFuncType func;
62 
63   MEDfileNumVersionRd(fid, &majeur, &mineur, &release);
64   func = _MEDversionedApi3(name,majeur,mineur,release);
65   if ( func != (MedFuncType) NULL )
66     func (dummy,
67 	  fid,
68 	  localmeshname,
69 	  jointname,
70 	  numdt,
71 	  numit,
72 	  localentitype,
73 	  localgeotype,
74 	  remoteentitype,
75 	  remotegeotype,
76 	  correspondence,
77 	  &fret);
78   return fret;
79 }
80