Salome HOME
Homard executable
[modules/homard.git] / src / tool / Includes_Generaux / nomber.h
1 c
2 c=======================================================================
3 c nombres propres a la renumerotation des entites en entree
4 c-----------------------------------------------------------------------
5 c renois : nombre de noeuds isoles
6 c renoei : nombre de noeuds elements ignores uniquement
7 c renomp : nombre de noeuds support de maille-point uniquement
8 c renop1 : nombre de noeuds sommets
9 c renop2 : nombre de noeuds milieux d'aretes
10 c renoim : nombre de noeuds internes aux mailles
11 c renoac : nombre de noeuds actifs dans le calcul
12 c renoto : nombre total de noeuds
13 c          = renois+renoei+renomp+renop1+renop2+renoim
14 c reno1i : nombre de noeuds p1 et isoles (renois+renoei+renomp+renop1)
15 c rempac : nombre d'el. utiles au calcul et contenant des mailles-points
16 c rempto : nombre total de mailles-points
17 c rearac : nombre d'elements utiles au calcul et contenant des aretes
18 c rearto : nombre total d'aretes
19 c retrac : nombre d'elements utiles au calcul et contenant des triangles
20 c retrto : nombre total de triangles
21 c requac : nombre d'elements utiles au calcul et contenant des quads
22 c requto : nombre total de quadrangles
23 c reteac : nombre d'elements utiles au calcul et contenant des tetras
24 c reteto : nombre total de tetraedres
25 c reheac : nombre d'elements utiles au calcul et contenant des hexaas
26 c reheto : nombre total d'hexaedres
27 c repyac : nombre d'elements utiles au calcul et contenant des pyras
28 c repyto : nombre total de pyramides
29 c repeac : nombre d'elements utiles au calcul et contenant des pentas
30 c repeto : nombre total de pentaedres
31 c-----------------------------------------------------------------------
32       integer         renois, renoei, renomp, renop1, renop2, renoim,
33      >                renoac, renoto, reno1i,
34      >                rempac, rempto,
35      >                rearac, rearto,
36      >                retrac, retrto,
37      >                requac, requto,
38      >                reteac, reteto,
39      >                reheac, reheto,
40      >                repyac, repyto,
41      >                repeac, repeto
42       common /nomber/ renois, renoei, renomp, renop1, renop2, renoim,
43      >                renoac, renoto, reno1i,
44      >                rempac, rempto,
45      >                rearac, rearto,
46      >                retrac, retrto,
47      >                requac, requto,
48      >                reteac, reteto,
49      >                reheac, reheto,
50      >                repyac, repyto,
51      >                repeac, repeto