2 c=======================================================================
3 c nombres d'entites du maillage initial avec la conformite
4 c-----------------------------------------------------------------------
5 c nancno : nombre de noeuds du maillage adapte
6 c nancar : nombre d'aretes du maillage adapte
7 c nanctr : nombre de triangles du maillage adapte
8 c nancqu : nombre de quadrangles du maillage adapte
9 c nancte : nombre de tetraedres du maillage adapte
10 c nanctf : nombre de tetraedres du maillage adapte decrits par faces
11 c nancta : nombre de tetraedres du maillage adapte decrits par aretes
12 c nancpy : nombre de pyramides du maillage adapte
13 c nancyf : nombre de pyramides du maillage adapte decrites par faces
14 c nancya : nombre de pyramides du maillage adapte decrites par aretes
15 c nanche : nombre d'hexaedres du maillage adapte
16 c nanchf : nombre d'hexaedres du maillage adapte decrits par faces
17 c nancha : nombre d'hexaedres du maillage adapte decrits par aretes
18 c nancpe : nombre de pentaedres du maillage adapte
19 c nancpf : nombre de pentaedres du maillage adapte decrits par faces
20 c nancpa : nombre de pentaedres du maillage adapte decrits par aretes
21 c-----------------------------------------------------------------------
22 integer nancno, nancar, nanctr, nancqu,
23 > nancte, nanctf, nancta, nancpy, nancyf, nancya,
24 > nanche, nanchf, nancha, nancpe, nancpf, nancpa
25 common /nancnb/ nancno, nancar, nanctr, nancqu,
26 > nancte, nanctf, nancta, nancpy, nancyf, nancya,
27 > nanche, nanchf, nancha, nancpe, nancpf, nancpa