2 c=======================================================================
3 c nombres propres a la renumerotation des entites en sortie
4 c-----------------------------------------------------------------------
5 c rsnois : nombre de noeuds isoles
6 c rsnoei : nombre de noeuds elements ignores uniquement
7 c rsnomp : nombre de noeuds support de maille-point uniquement
8 c rsnop1 : nombre de noeuds sommets
9 c rsnop2 : nombre de noeuds milieux d'aretes
10 c rsnoim : nombre de noeuds internes aux mailles
11 c rsnoac : nombre de noeuds actifs dans le calcul
12 c rsnoto : nombre total de noeuds
13 c = rsnois+rsnoei+rsnomp+rsnop1+rsnop2+rsnoim
14 c rsmpac : nombre d'el. utiles au calcul et contenant des mailles-points
15 c rsmpto : nombre total de mailles-points
16 c rsarac : nombre d'elements utiles au calcul et contenant des aretes
17 c rsarto : nombre total d'aretes
18 c rstrac : nombre d'elements utiles au calcul et contenant des triangles
19 c rstrto : nombre total de triangles
20 c rsquac : nombre d'elements utiles au calcul et contenant des quads
21 c rsquto : nombre total de quadrangles
22 c rsteac : nombre d'elements utiles au calcul et contenant des tetras
23 c rsteto : nombre total de tetraedres
24 c rsheac : nombre d'elements utiles au calcul et contenant des hexas
25 c rsheto : nombre total d'hexaedres
26 c rspyac : nombre d'elements utiles au calcul et contenant des pyras
27 c rspyto : nombre total de pyramides
28 c rspeac : nombre d'elements utiles au calcul et contenant des pentas
29 c rspeto : nombre total de pentaedres
30 c rseutc : nombre total d'elements utiles au calcul
31 c rsevca : nombre d'elements volumiques dans le maillage de calcul
32 c rsevto : nombre total d'elements utiles au calcul
33 c-----------------------------------------------------------------------
34 integer rsnois, rsnoei, rsnomp, rsnop1, rsnop2, rsnoim,
44 > rseutc, rsevca, rsevto
45 common /nombsr/ rsnois, rsnoei, rsnomp, rsnop1, rsnop2, rsnoim,
55 > rseutc, rsevca, rsevto