C***********************************************************************
C NOM         : CCMATOP.INC
C DESCRIPTION : Variables globales (COMMON) pour le mailleur topologique
C
C
C     Voir aussi l'include TMATOP1.INC pour l'include définissant les
C     segments et pour la bibliographie du mailleur topologique.
C
C     CPZ1 : paramètres du mailleur
C     XDENS  : taille de maille constante definie globalement
C     XVTOL  : tolerance en-dessous de laquelle on considere que des
C             volumes de maille sont egaux
C     QTOL   : tolerance en-dessous de laquelle on considere que des
C             mailles ont la meme qualite (0<qualite<1)
C     IMPR   : niveau d'impression (0..6)
C     IVERI  : niveau de verification (0..3)
C     ISGADJ : impression lors des ajustements de segments (0..1)
C     IALGO  : 0 (mailleur) 1 (remailleur, le maillage ne change pas de
C              volume)
C     IAJNO  : 0 (pas d'ajout de noeuds) 1 (ajout)
C     INCMA  : nombre de candidats max a examiner
C     ISTMA  : strategie a adopter lorsque le nombre de candidats
C              depasse INCMA (cf. topv3.eso)
C              0 : on n'en examine aucun
C              1 : on en examine un
C              2 : on en choisit INCMA parmi tous
C     IMET   : type de metrique
C              2 : scalaire (homogene uniforme) XDENS (taille de maille)
C              3 : tenseur isotrope (metrique inverse)
C              4 : tenseur anisotrope (metrique inverse)
C     IMOMET : façon de faire la moyenne de la métrique
C              0 = arithmétique ;
C              1 = géométrique (pour les tenseurs, on utilise le
C                  formalisme Log-Euclidien de Arsigny-Ayache
C     IMOBAR : façon d'ajouter un noeud supplémentaire
C              0 = isobarycentre
C              1 = quasi-barycentre en tenant compte de la métrique
C     ISEQM  : sort-on la séquence des maillages intermédaires ? (pour
C              film ou debug)
C              0 = non ; 1 = oui
C
C     CPZ2 : statistiques
C     JPARCO : nombre d'entités du maillage parcourues (noeuds, arêtes,
C              faces, éléments)
C     JEXPLO : nombre de topologies explorées
C     JCHANG : nombre de topologies changées
C     JNASCM : nombre de fois où les topologies candidates étaient trop
C              nombreuses
C
C LANGAGE     : ESOPE
C AUTEUR      : Stéphane GOUNAND (CEA/DEN/DM2S/SEMT/LTA)
C               mél : gounand@semt2.smts.cea.fr
C***********************************************************************
C VERSION    : v1, 04/10/2017, version initiale
C HISTORIQUE : v1, 04/10/2017, création
C HISTORIQUE :     08/04/2020, ajout de IMOMET, changement de l'include
C HISTORIQUE :     24/11/2025, ajout IMOBAR ISEQM
C
C***********************************************************************
C
C
      COMMON /CPZ1/ XDENS,XVTOL,QTOL,IMPR,IVERI,ISGADJ,IALGO,IAJNO,
     >      INCMA,ISTMA,IMET,IMOMET,IMOBAR,ISEQM
      COMMON /CPZ2/ JPARCO,JEXPLO,JCHANG,JNASCM
      save /cpz1/,/cpz2/
C
C End of include
C