src/tool/Includes_Generaux/nombte.h

   1 c
   2 c=======================================================================
   3 c nombres propres aux tetraedres
   4 c-----------------------------------------------------------------------
   5 c nbteac : actifs
   6 c nbtea2 : issus d'un decoupage en 2 d'un tetraedre
   7 c nbtea4 : issus d'un decoupage en 4 (par 2 aretes) d'un tetraedre
   8 c nbtede : issus du decoupage standard du maillage
   9 c nbtef4 : issus d'un decoupage en 4 (par 1 face) d'un tetraedre
  10 c Pour un raffinement selon des boites :
  11 c  nbteh1 : issus d'un decoupage d'un hexaedre a partir d'une face
  12 c  nbteh2 : issus d'un decoupage d'un hexaedre a partir de 3 aretes
  13 c  nbteh3 : issus d'un decoupage d'un hexaedre a partir de 2 aretes
  14 c  nbteh4 : issus d'un decoupage d'un hexaedre a partir d'1 arete
  15 c  nbtep0 : issus d'un decoupage d'un pentaedre a partir d'1 ar tr
  16 c  nbtep1 : issus d'un decoupage d'un pentaedre a partir d'1 ar qu
  17 c  nbtep2 : issus d'un decoupage d'un pentaedre a partir de 2 ar tr/qu
  18 c  nbtep3 : issus d'un decoupage d'un pentaedre a partir de 2 ar qu/qu
  19 c  nbtep4 : issus d'un decoupage d'un pentaedre a partir d'1 face qu
  20 c  nbtep5 : issus d'un decoupage d'un pentaedre a partir d'1 face tr
  21 c Sinon :
  22 c  nbtedh : issus d'un decoupage d'un hexaedre
  23 c  nbtedp : issus d'un decoupage d'un pentaedre
  24 c nbtema : du macro-maillage
  25 c nbtepe : permanents du maillage (nbtema+nbtede)
  26 c nbteto : nombre total de tetraedres (nbtecf+nbteca)
  27 c nbtecf : nombre de tetraedres en connectivite par faces
  28 c nbteca : nombre de tetras en connectivite par aretes (nbtedh+nbtedp)
  29 c-----------------------------------------------------------------------
  30       integer         nbteac, nbtea2, nbtea4, nbtede, nbtef4,
  31      >                nbteh1, nbteh2, nbteh3, nbteh4,
  32      >                nbtep0, nbtep1, nbtep2, nbtep3, nbtep4, nbtep5,
  33      >                nbtedh, nbtedp,
  34      >                nbtema, nbtepe, nbteto, nbtecf, nbteca
  35       common /nombte/ nbteac, nbtea2, nbtea4, nbtede, nbtef4,
  36      >                nbteh1, nbteh2, nbteh3, nbteh4,
  37      >                nbtep0, nbtep1, nbtep2, nbtep3, nbtep4, nbtep5,
  38      >                nbtedh, nbtedp,
  39      >                nbtema, nbtepe, nbteto, nbtecf, nbteca