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,
42 common /nomber/ renois, renoei, renomp, renop1, renop2, renoim,
43 > renoac, renoto, reno1i,