src/MEDWrapper/V2_1/Core/MEDparametresGeometrie.cxx

   1 /*************************************************************************
   2 * COPYRIGHT (C) 1999 - 2002  EDF R&D
   3 * THIS LIBRARY IS FREE SOFTWARE; YOU CAN REDISTRIBUTE IT AND/OR MODIFY
   4 * IT UNDER THE TERMS OF THE GNU LESSER GENERAL PUBLIC LICENSE
   5 * AS PUBLISHED BY THE FREE SOFTWARE FOUNDATION;
   6 * EITHER VERSION 2.1 OF THE LICENSE, OR (AT YOUR OPTION) ANY LATER VERSION.
   7 *
   8 * THIS LIBRARY IS DISTRIBUTED IN THE HOPE THAT IT WILL BE USEFUL, BUT
   9 * WITHOUT ANY WARRANTY; WITHOUT EVEN THE IMPLIED WARRANTY OF
  10 * MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. SEE THE GNU
  11 * LESSER GENERAL PUBLIC LICENSE FOR MORE DETAILS.
  12 *
  13 * YOU SHOULD HAVE RECEIVED A COPY OF THE GNU LESSER GENERAL PUBLIC LICENSE
  14 * ALONG WITH THIS LIBRARY; IF NOT, WRITE TO THE FREE SOFTWARE FOUNDATION,
  15 * INC., 59 TEMPLE PLACE, SUITE 330, BOSTON, MA 02111-1307 USA
  16 *
  17 *************************************************************************/
  18
  19 #include "med.hxx"
  20 #include "med_outils.hxx"
  21
  22 /*
  23  * - Nom de la fonction : _MEDparametresGeometrie
  24  * - Description : fournit les parametres geometriques des differents
  25  *                 entites et elements MED
  26  * - Parametres :
  27  *     - typ_ent (IN)  : type d'entite de l'element
  28  *     - type_geo (IN) : le type geometrique de l'element
  29  *     - dim (OUT)     : dimension de l'element
  30  *     - nnoe (OUT)    : nombre de noeuds composant l'element (connectivite
  31  *                       nodale)
  32  *     - ndes (OUT)    : nombre de composants dans l'elements (connectivite
  33  *                       descendante)
  34  * - Resultat : 0 en cas de succes, -1 sinon
  35  */
  36
  37 namespace med_2_1{
  38
  39 med_err
  40 _MEDparametresGeometrie(med_entite_maillage type_ent,
  41                         med_geometrie_element type_geo, int *dim,
  42                         int *nnoe,int *ndes)
  43 {
  44   *nnoe = type_geo % 100;
  45   *dim = type_geo / 100;
  46
  47   switch(type_ent)
  48     {
  49     case MED_MAILLE :
  50       switch (type_geo)
  51         {
  52         case MED_POINT1 :
  53           *ndes = 0;
  54           break;
  55
  56         case MED_SEG2 :
  57           *ndes = 2;
  58           break;
  59
  60         case MED_SEG3 :
  61           *ndes = 3;
  62           break;
  63
  64         case MED_TRIA3 :
  65           *ndes = 3;
  66           break;
  67
  68         case MED_TRIA6 :
  69           *ndes = 3;
  70           break;
  71
  72         case MED_QUAD4 :
  73           *ndes = 4;
  74           break;
  75
  76         case MED_QUAD8 :
  77           *ndes = 4;
  78           break;
  79
  80         case MED_TETRA4 :
  81           *ndes = 4;
  82           break;
  83
  84         case MED_TETRA10 :
  85           *ndes = 4;
  86           break;
  87
  88         case MED_HEXA8 :
  89           *ndes = 6;
  90           break;
  91
  92         case MED_HEXA20 :
  93           *ndes = 6;
  94           break;
  95
  96         case MED_PENTA6 :
  97           *ndes = 5;
  98           break;
  99
 100         case MED_PENTA15 :
 101           *ndes = 5;
 102           break;
 103
 104         case MED_PYRA5 :
 105           *ndes = 5;
 106           break;
 107
 108         case MED_PYRA13 :
 109           *ndes = 5;
 110           break;
 111
 112         default :
 113           return -1;
 114         }
 115       break;
 116
 117     case MED_FACE :
 118       switch(type_geo)
 119         {
 120         case MED_TRIA3 :
 121           *ndes = 3;
 122           break;
 123
 124         case MED_TRIA6 :
 125           *ndes = 3;
 126           break;
 127
 128         case MED_QUAD4 :
 129           *ndes = 4;
 130           break;
 131
 132         case MED_QUAD8 :
 133           *ndes = 4;
 134           break;
 135
 136         default :
 137           return -1;
 138         }
 139       break;
 140
 141     case MED_ARETE :
 142       switch(type_geo)
 143         {
 144         case MED_SEG2 :
 145           *ndes = 2;
 146           break;
 147
 148         case MED_SEG3 :
 149           *ndes = 3;
 150           break;
 151
 152         default :
 153           return -1;
 154         }
 155       break;
 156
 157     default :
 158       return -1;
 159     }
 160
 161   return 0;
 162 }
 163
 164 }