2 c=======================================================================
3 c environnement de calcul (premiere partie)
4 c cela correspond aux attributs de l'objet maillage HOMARD
5 c-----------------------------------------------------------------------
6 c sdim : dimension de l'espace (2 ou 3)
7 c mdim : dimension du maillage (1, 2 ou 3)
8 c degre : degre maximum d'interpolation des variables.
9 c maconf : conformite du maillage
11 c 1 : non-conforme avec 1 seule arete decoupee (en 2)
12 c 2 : non-conforme avec 1 seul noeud pendant par arete
13 c 3 : non-conforme sans contrainte
14 c 10 : non-conforme sans autre connaissance
15 c homolo : type de relations par homologues
16 c 0 : pas d'homologues
17 c 1 : relations sur les noeuds
18 c 2 : relations sur les noeuds et les aretes
19 c 3 : relations sur les noeuds, les aretes et les faces
20 c hierar : maillage hierarchique
23 c rafdef : mode de raffinement/deraffinement avant le maillage
25 c 1 : le maillage est inchange
26 c 2 : le maillage est issu du raffinement pur
28 c 3 : le maillage est issu du deraffinement
29 c pur d'un autre maillage
30 c 4 : le maillage est issu de raffinement et
31 c de deraffinement d'un autre maillage
32 c 12 : le maillage est un maillage passe de degre 1 a 2
33 c 21 : le maillage est un maillage passe de degre 2 a 1
34 c nbmane : nombre maximum de noeuds par element
35 c typcca : type du code de calcul associe
37 c 16 : ATHENA (format MED)
38 c 26 : SATURNE_2D (format MED)
39 c 36 : SATURNE (format MED)
40 c 46 : NEPTUNE_2D (format MED)
41 c 56 : NEPTUNE (format MED)
42 c 66 : CARMEL_2D (format MED)
43 c 76 : CARMEL (format MED)
44 c 106 : NON-CONFORME (format MED)
45 c typsfr : type du suivi de frontiere
47 c 1 : maillage de degre 1, avec projection des nouveaux sommets
48 c 2 : maillage de degre 2, seuls les noeuds P1 sont sur la
49 c frontiere ; les noeuds P2 restent au milieu des P1
50 c 3 : maillage de degre 2, les noeuds P2 sont sur la frontiere
51 c maextr : maillage extrude
56 c mailet : presence de mailles etendues :
61 c-----------------------------------------------------------------------
62 integer sdim, mdim, degre, maconf, homolo, hierar,
63 > rafdef, nbmane, typcca, typsfr, maextr,
65 common /envca1/ sdim, mdim, degre, maconf, homolo, hierar,
66 > rafdef, nbmane, typcca, typsfr, maextr,