src/tool/Includes_Generaux/motcle.h

   1 c
   2 c  La liste qui suit decrit les mots-cles reconnus pour reperer
   3 c  les objets et les fichiers dans le fichier de configuration.
   4 c
   5 c 1. La base
   6 c===========
   7 c
   8 c 1.1. Les fichiers generaux
   9 c===========================
  10 c
  11 c mcdico : dictionnaire des objets structures
  12 c
  13       character*8 mcdico
  14       parameter ( mcdico = 'DicoOSGM' )
  15 c
  16 c mclist : liste de sortie standard
  17 c
  18       character*8 mclist
  19       parameter ( mclist = 'ListeStd' )
  20 c
  21 c mcrept : repertoire de travail pour les fichiers temporaires
  22 c
  23       character*8 mcrept
  24       parameter ( mcrept = 'RepeTrav' )
  25 c
  26 c 1.2. Les fichiers au format du code de calcul associe
  27 c======================================================
  28 c
  29 c mccman : maillage a l'iteration n
  30 c
  31       character*8 mccman
  32       parameter ( mccman = 'CCMaiN__' )
  33 c
  34 c mccmap : maillage a l'iteration n+1
  35 c
  36       character*8 mccmap
  37       parameter ( mccmap = 'CCMaiNP1' )
  38 c
  39 c mccmaa : maillage annexe
  40 c
  41       character*8 mccmaa
  42       parameter ( mccmaa = 'CCMaiAnn' )
  43 c
  44 c mccson : solution a l'iteration n
  45 c
  46       character*8 mccson
  47       parameter ( mccson = 'CCSolN__' )
  48 c
  49 c mccsop : solution a l'iteration n+1
  50 c
  51       character*8 mccsop
  52       parameter ( mccsop = 'CCSolNP1' )
  53 c
  54 c mccind : indicateur d'erreur
  55 c
  56       character*8 mccind
  57       parameter ( mccind = 'CCIndica' )
  58 c
  59 c mccdfr : description de la frontiere discrete
  60 c
  61       character*8 mccdfr
  62       parameter ( mccdfr = 'CCFronti' )
  63 c
  64 c 1.3. Les noms des maillages dans les fichiers du code de calcul
  65 c================================================================
  66 c
  67 c mccnmn : maillage a l'iteration n
  68 c
  69       character*8 mccnmn
  70       parameter ( mccnmn = 'CCNoMN__' )
  71 c
  72 c mccnmp : maillage a l'iteration n+1
  73 c
  74       character*8 mccnmp
  75       parameter ( mccnmp = 'CCNoMNP1' )
  76 c
  77 c mccnma : maillage annexe
  78 c
  79       character*8 mccnma
  80       parameter ( mccnma = 'CCNoMAnn' )
  81 c
  82 c mccnmf : maillage de la frontiere discrete
  83 c
  84       character*8 mccnmf
  85       parameter ( mccnmf = 'CCNoMFro' )
  86 c
  87 c 1.4. L'indicateur d'erreur
  88 c===========================
  89 c
  90 c mccnin : nom du champ de l'indicateur d'erreur
  91 c
  92       character*8 mccnin
  93       parameter ( mccnin = 'CCNoChaI' )
  94 c
  95 c mccnin : nom de la composante de l'indicateur d'erreur
  96 c
  97       character*8 mcccin
  98       parameter ( mcccin = 'CCCoChaI' )
  99 c
 100 c mcntin : numero du pas de temps de l'indicateur d'erreur
 101 c
 102       character*8 mcntin
 103       parameter ( mcntin = 'CCNumPTI' )
 104 c
 105 c mcnoin : numero d'ordre de l'indicateur d'erreur
 106 c
 107       character*8 mcnoin
 108       parameter ( mcnoin = 'CCNumOrI' )
 109 c
 110 c mcinin : instant de l'indicateur d'erreur
 111 c
 112       character*8 mcinin
 113       parameter ( mcinin = 'CCInstaI' )
 114 c
 115 c mcmfi1 : mode de fonctionnement de l'indicateur d'erreur - 1
 116 c
 117       character*8 mcmfi1
 118       parameter ( mcmfi1 = 'CCUsCmpI' )
 119 c
 120 c mcmfi2 : mode de fonctionnement de l'indicateur d'erreur - 2
 121 c
 122       character*8 mcmfi2
 123       parameter ( mcmfi2 = 'CCModeFI' )
 124 c
 125 c 1.5. Les champs a mettre a jour
 126 c================================
 127 c
 128 c mcchno : nom d'un champ de solution a mettre a jour
 129 c
 130       character*8 mcchno
 131       parameter ( mcchno = 'CCChaNom' )
 132 c
 133 c mcchti : type d'interpolation
 134 c
 135       character*8 mcchti
 136       parameter ( mcchti = 'CCChaTIn' )
 137 c
 138 c mcchpt : numero du pas de temps d'un champ de solution a mettre a jour
 139 c
 140       character*8 mcchpt
 141       parameter ( mcchpt = 'CCChaPdT' )
 142 c
 143 c mcchnu : numero d'ordre d'un champ de solution a mettre a jour
 144 c
 145       character*8 mcchnu
 146       parameter ( mcchnu = 'CCChaNuO' )
 147 c
 148 c mcchin : instant d'un champ de solution a mettre a jour
 149 c
 150       character*8 mcchin
 151       parameter ( mcchin = 'CCChaIns' )
 152 c
 153 c mcchcs : caracteristique du support d'un champ de solution a mettre
 154 c          a jour
 155 c
 156       character*8 mcchcs
 157       parameter ( mcchcs = 'CCChaCaS' )
 158 c
 159 c mcchnc : numero du champ aux noeuds par element associe
 160 c
 161       character*8 mcchnc
 162       parameter ( mcchnc = 'CCChaNCN' )
 163 c
 164 c mcchto : mise a jour de tous les champs de solution
 165 c
 166       character*8 mcchto
 167       parameter ( mcchto = 'CCChaTou' )
 168 c
 169 c 1.6. Les informations complementaires
 170 c======================================
 171 c
 172 c mcicni : nom du champ MED qui contiendra le niveau
 173 c
 174       character*8 mcicni
 175       parameter ( mcicni = 'NCNiveau' )
 176 c
 177 c mcicqu : nom du champ MED qui contiendra la qualite
 178 c
 179       character*8 mcicqu
 180       parameter ( mcicqu = 'NCQualit' )
 181 c
 182 c mcicdi : nom du champ MED qui contiendra le diametre
 183 c
 184       character*8 mcicdi
 185       parameter ( mcicdi = 'NCDiamet' )
 186 c
 187 c mcicpa : nom du champ MED qui contiendra la parente
 188 c
 189       character*8 mcicpa
 190       parameter ( mcicpa = 'NCParent' )
 191 c
 192 c mcicvr : nom du champ MED qui contiendra les voisins des recollements
 193 c
 194       character*8 mcicvr
 195       parameter ( mcicvr = 'NCVoisRc' )
 196 c
 197 c 2. Les objets HOMARD
 198 c=====================
 199 c
 200 c 2.1. Les maillages au format HOMARD
 201 c====================================
 202 c
 203 c mchman : maillage a l'iteration n
 204 c
 205       character*8 mchman
 206       parameter ( mchman = 'HOMaiN__' )
 207 c
 208 c mchmap : maillage a l'iteration n+1
 209 c
 210       character*8 mchmap
 211       parameter ( mchmap = 'HOMaiNP1' )
 212 c
 213 c 2.2. L'indicateur au format HOMARD
 214 c===================================
 215 c
 216 c mchind : indicateur a l'iteration n
 217 c
 218       character*8 mchind
 219       parameter ( mchind = 'HOIndica' )
 220 c
 221 c 2.3. Les utilitaires
 222 c=====================
 223 c
 224 c mcauxi : mot-cle auxiliaire
 225 c          il sert pour des operations de test
 226 c
 227       character*8 mcauxi
 228       parameter ( mcauxi = 'MCAuxili' )
 229 c
 230 c  La liste qui suit decrit les mots-cles reconnus pour reperer
 231 c  deux objets a comparer, par exemple
 232 c
 233 c mcobj1 : objet numero 1
 234 c
 235       character*8 mcobj1
 236       parameter ( mcobj1 = 'Objet__1' )
 237 c
 238 c mcobj2 : objet numero 2
 239 c
 240       character*8 mcobj2
 241       parameter ( mcobj2 = 'Objet__2' )
 242 c
 243 c 3. Les options de pilotage
 244 c===========================
 245 c
 246 c 3.1. les options generales
 247 c===========================
 248 c
 249 c mcmoho : mode de fonctionnement de HOMARD
 250 c
 251       character*8 mcmoho
 252       parameter ( mcmoho = 'ModeHOMA' )
 253 c
 254 c mcecfh : ecriture des fichiers au format HOMARD
 255 c
 256       character*8 mcecfh
 257       parameter ( mcecfh = 'EcriFiHO' )
 258 c
 259 c mctyel : type d'elements autorises
 260 c
 261       character*8 mctyel
 262       parameter ( mctyel = 'TypeElem' )
 263 c
 264 c 3.2. les options de l'adaptation
 265 c=================================
 266 c 3.2.1. l'iteration
 267 c-------------------
 268 c
 269 c mcnuit : numero d'iteration du maillage avant adaptation
 270 c
 271       character*8 mcnuit
 272       parameter ( mcnuit = 'NumeIter' )
 273 c
 274 c 3.2.2. le raffinement
 275 c----------------------
 276 c
 277 c mctyco : type de conformite
 278 c
 279       character*8 mctyco
 280       parameter ( mctyco = 'TypeConf' )
 281 c
 282 c mctyra : type de raffinement
 283 c
 284       character*8 mctyra
 285       parameter ( mctyra = 'TypeRaff' )
 286 c
 287 c mcnvma : niveau maximum pour le raffinement
 288 c
 289       character*8 mcnvma
 290       parameter ( mcnvma = 'NiveauMa' )
 291 c
 292 c mcnbme : nombre maximum d'elements apres raffinement
 293 c
 294       character*8 mcnbme
 295       parameter ( mcnbme = 'NbrMaxEl' )
 296 c
 297 c mccora : contraintes de raffinement
 298 c
 299       character*8 mccora
 300       parameter ( mccora = 'ContRaff' )
 301 c
 302 c mcseuh : seuil haut absolu pour le raffinement
 303 c
 304       character*8 mcseuh
 305       parameter ( mcseuh = 'SeuilHau' )
 306 c
 307 c mcserh : seuil haut relatif pour le raffinement
 308 c
 309       character*8 mcserh
 310       parameter ( mcserh = 'SeuilHRe' )
 311 c
 312 c mcseph : seuil haut en pourcentage pour le raffinement
 313 c
 314       character*8 mcseph
 315       parameter ( mcseph = 'SeuilHPE' )
 316 c
 317 c mcsesh : seuil haut en mu+n.sigma pour le raffinement
 318 c
 319       character*8 mcsesh
 320       parameter ( mcsesh = 'SeuilHMS' )
 321 c
 322 c mcdimi : diametre minimum pour le raffinement
 323 c
 324       character*8 mcdimi
 325       parameter ( mcdimi = 'DiametMi' )
 326 c
 327 c 3.2.3. le deraffinement
 328 c----------------------
 329 c
 330 c mctyde : type de deraffinement
 331 c
 332       character*8 mctyde
 333       parameter ( mctyde = 'TypeDera' )
 334 c
 335 c mcnvmi : niveau minimum pour le deraffinement
 336 c
 337       character*8 mcnvmi
 338       parameter ( mcnvmi = 'NiveauMi' )
 339 c
 340 c mcseub : seuil bas absolu pour le deraffinement
 341 c
 342       character*8 mcseub
 343       parameter ( mcseub = 'SeuilBas' )
 344 c
 345 c mcserb : seuil bas relatif pour le deraffinement
 346 c
 347       character*8 mcserb
 348       parameter ( mcserb = 'SeuilBRe' )
 349 c
 350 c mcsepb : seuil bas en pourcentage pour le deraffinement
 351 c
 352       character*8 mcsepb
 353       parameter ( mcsepb = 'SeuilBPE' )
 354 c
 355 c mcsesb : seuil bas en mu-n.sigma pour le deraffinement
 356 c
 357       character*8 mcsesb
 358       parameter ( mcsesb = 'SeuilBMS' )
 359 c
 360 c 3.2.4. les zones de raffinement
 361 c--------------------------------
 362 c
 363 c mczrty : type de la zone de raffinement
 364 c
 365       character*8 mczrty
 366       parameter ( mczrty = 'ZoRaType' )
 367 c
 368 c mcrxmi : zone a raffiner : x mini
 369 c
 370       character*8 mcrxmi
 371       parameter ( mcrxmi = 'ZoRaXmin' )
 372 c
 373 c mcrxma : zone a raffiner : x maxi
 374 c
 375       character*8 mcrxma
 376       parameter ( mcrxma = 'ZoRaXmax' )
 377 c
 378 c mcrymi : zone a raffiner : y mini
 379 c
 380       character*8 mcrymi
 381       parameter ( mcrymi = 'ZoRaYmin' )
 382 c
 383 c mcryma : zone a raffiner : y maxi
 384 c
 385       character*8 mcryma
 386       parameter ( mcryma = 'ZoRaYmax' )
 387 c
 388 c mcrzmi : zone a raffiner : z mini
 389 c
 390       character*8 mcrzmi
 391       parameter ( mcrzmi = 'ZoRaZmin' )
 392 c
 393 c mcrzma : zone a raffiner : y maxi
 394 c
 395       character*8 mcrzma
 396       parameter ( mcrzma = 'ZoRaZmax' )
 397 c
 398 c mcrxce : zone a raffiner : x du centre
 399 c
 400       character*8 mcrxce
 401       parameter ( mcrxce = 'ZoRaXCen' )
 402 c
 403 c mcryce : zone a raffiner : y du centre
 404 c
 405       character*8 mcryce
 406       parameter ( mcryce = 'ZoRaYCen' )
 407 c
 408 c mcrzce : zone a raffiner : z du centre
 409 c
 410       character*8 mcrzce
 411       parameter ( mcrzce = 'ZoRaZCen' )
 412 c
 413 c mcrxba : zone a raffiner : x de la base
 414 c
 415       character*8 mcrxba
 416       parameter ( mcrxba = 'ZoRaXBas' )
 417 c
 418 c mcryba : zone a raffiner : y de la base
 419 c
 420       character*8 mcryba
 421       parameter ( mcryba = 'ZoRaYBas' )
 422 c
 423 c mcrzba : zone a raffiner : z de la base
 424 c
 425       character*8 mcrzba
 426       parameter ( mcrzba = 'ZoRaZBas' )
 427 c
 428 c mcrhau : zone a raffiner : hauteur
 429 c
 430       character*8 mcrhau
 431       parameter ( mcrhau = 'ZoRaHaut' )
 432 c
 433 c mcrxax : zone a raffiner : x de l'axe
 434 c
 435       character*8 mcrxax
 436       parameter ( mcrxax = 'ZoRaXAxe' )
 437 c
 438 c mcryax : zone a raffiner : y de l'axe
 439 c
 440       character*8 mcryax
 441       parameter ( mcryax = 'ZoRaYAxe' )
 442 c
 443 c mcrzax : zone a raffiner : z de l'axe
 444 c
 445       character*8 mcrzax
 446       parameter ( mcrzax = 'ZoRaZAxe' )
 447 c
 448 c mcrray : zone a raffiner : rayon
 449 c
 450       character*8 mcrray
 451       parameter ( mcrray = 'ZoRaRayo' )
 452 c
 453 c mcrrai : zone a raffiner : rayon interieur
 454 c
 455       character*8 mcrrai
 456       parameter ( mcrrai = 'ZoRaRayI' )
 457 c
 458 c mcrrae : zone a raffiner : rayon exterieur
 459 c
 460       character*8 mcrrae
 461       parameter ( mcrrae = 'ZoRaRayE' )
 462 c
 463 c 3.2.5. les groupes pour l'adaptation
 464 c-------------------------------------
 465 c
 466 c mcgrad : groupes ou a lieu l'adaptation
 467 c
 468       character*8 mcgrad
 469       parameter ( mcgrad = 'CCGroAda' )
 470 c
 471 c 3.2.6. l'initialisation
 472 c-------------------------------------
 473 c
 474 c mcinad : initialisation de l'adaptation
 475 c
 476       character*8 mcinad
 477       parameter ( mcinad = 'AdapInit' )
 478 c
 479 c 3.2.7. la cible en nombre de sommets
 480 c------------------------------------
 481 c
 482 c mcpacm : nombre de passages maximum pour atteindre la cible
 483 c
 484       character*8 mcpacm
 485       parameter ( mcpacm = 'CiblePaM' )
 486 c
 487 c mcnbsc : nombre de sommets cible
 488 c
 489       character*8 mcnbsc
 490       parameter ( mcnbsc = 'CibleNbS' )
 491 c
 492 c 3.3. liens avec le code de calcul
 493 c==================================
 494 c
 495 c mcccas : code de calcul associe
 496 c
 497       character*8 mcccas
 498       parameter ( mcccas = 'CCAssoci' )
 499 c
 500 c mcvman : conversion de maillage a l'iteration n
 501 c
 502       character*8 mcvman
 503       parameter ( mcvman = 'CVMaiN__' )
 504 c
 505 c mcvmap : conversion de maillage a l'iteration n+1
 506 c
 507       character*8 mcvmap
 508       parameter ( mcvmap = 'CVMaiNP1' )
 509 c
 510 c mcvind : conversion de l'indicateur
 511 c
 512       character*8 mcvind
 513       parameter ( mcvind = 'CVIndN__' )
 514 c
 515 c mcvsol : conversion de la solution
 516 c
 517       character*8 mcvsol
 518       parameter ( mcvsol = 'CVSolNP1' )
 519 c
 520 c mcsufr : suivi de la frontiere
 521 c
 522       character*8 mcsufr
 523       parameter ( mcsufr = 'SuivFron' )
 524 c
 525 c mcgrfr : groupes de la frontiere CAO
 526 c
 527       character*8 mcgrfr
 528       parameter ( mcgrfr = 'GrFroCAO' )
 529 c
 530 c mcgrfd : groupes de la frontiere discrete
 531 c
 532       character*8 mcgrfd
 533       parameter ( mcgrfd = 'CCGroFro' )
 534 c
 535 c mcfanm : nom de la frontiere analytique
 536 c
 537       character*8 mcfanm
 538       parameter ( mcfanm = 'FANom  ' )
 539 c
 540 c mcfaty : type de la frontiere analytique
 541 c
 542       character*8 mcfaty
 543       parameter ( mcfaty = 'FAType ' )
 544 c
 545 c mcfaxc : frontiere analytique : x du centre
 546 c
 547       character*8 mcfaxc
 548       parameter ( mcfaxc = 'FAXCen  ' )
 549 c
 550 c mcfayc : frontiere analytique : y du centre
 551 c
 552       character*8 mcfayc
 553       parameter ( mcfayc = 'FAYCen  ' )
 554 c
 555 c mcfazc : frontiere analytique : z du centre
 556 c
 557       character*8 mcfazc
 558       parameter ( mcfazc = 'FAZCen  ' )
 559 c
 560 c mcfaxa : frontiere analytique : x de l'axe
 561 c
 562       character*8 mcfaxa
 563       parameter ( mcfaxa = 'FAXAxe  ' )
 564 c
 565 c mcfaya : frontiere analytique : y de l'axe
 566 c
 567       character*8 mcfaya
 568       parameter ( mcfaya = 'FAYAxe  ' )
 569 c
 570 c mcfaza : frontiere analytique : z de l'axe
 571 c
 572       character*8 mcfaza
 573       parameter ( mcfaza = 'FAZAxe  ' )
 574 c
 575 c mcfara : frontiere analytique : rayon
 576 c
 577       character*8 mcfara
 578       parameter ( mcfara = 'FARayon ' )
 579 c
 580 c mcfaxc : frontiere analytique : x du centre numero 2
 581 c
 582       character*8 mcfax2
 583       parameter ( mcfax2 = 'FAXCen2 ' )
 584 c
 585 c mcfayc : frontiere analytique : y du centre numero 2
 586 c
 587       character*8 mcfay2
 588       parameter ( mcfay2 = 'FAYCen2 ' )
 589 c
 590 c mcfazc : frontiere analytique : z du centre numero 2
 591 c
 592       character*8 mcfaz2
 593       parameter ( mcfaz2 = 'FAZCen2 ' )
 594 c
 595 c mcfara : frontiere analytique : rayon numero 2
 596 c
 597       character*8 mcfar2
 598       parameter ( mcfar2 = 'FARayon2' )
 599 c
 600 c mcfara : frontiere analytique : angle
 601 c
 602       character*8 mcfaan
 603       parameter ( mcfaan = 'FAAngle ' )
 604 c
 605 c mcfgfr : nom de la frontiere liee a un groupe
 606 c
 607       character*8 mcfgfr
 608       parameter ( mcfgfr = 'FGNomFro' )
 609 c
 610 c mcfggr : nom du groupe lie a une frontiere
 611 c
 612       character*8 mcfggr
 613       parameter ( mcfggr = 'FGNomGro' )
 614 c
 615 c mctybi : type de bilan sur le maillage
 616 c
 617       character*8 mctybi
 618       parameter ( mctybi = 'TypeBila' )
 619 c
 620 c mcmext : le maillage est un maillage extrude
 621 c
 622       character*8 mcmext
 623       parameter ( mcmext = 'M_Extrud' )
 624 c
 625 c mccex1 : choix de la gestion de la coordonnee constante pour
 626 c          les maillages extrudes
 627 c
 628       character*8 mccex1
 629       parameter ( mccex1 = 'Coo_Extr' )
 630 c
 631 c mccex2 : valeur du delta de coordonnee si impose
 632 c
 633       character*8 mccex2
 634       parameter ( mccex2 = 'DC_impos' )
 635 c
 636 c 3.4. les options de la modification de maillage
 637 c================================================
 638 c
 639 c mcmdeg : modification du degre du maillage (1<->2)
 640 c
 641       character*8 mcmdeg
 642       parameter ( mcmdeg = 'ModDegre' )
 643 c
 644 c mcjoin : creation de joint entre des groupes de volumes
 645 c
 646       character*8 mcjoin
 647       parameter ( mcjoin = 'CreJoint' )
 648 c
 649 c 4. la memoire
 650 c==============
 651 c
 652 c mcmogm : mode de gestion de la memoire
 653 c
 654       character*8 mcmogm
 655       parameter ( mcmogm = 'ModeGM  ' )
 656 c
 657 c mcgmen : nombre d'entiers en statique
 658 c
 659       character*8 mcgmen
 660       parameter ( mcgmen = 'ModeGMEN' )
 661 c
 662 c mcgmre : nombre de reels en statique
 663 c
 664       character*8 mcgmre
 665       parameter ( mcgmre = 'ModeGMRE' )
 666 c
 667 c mcgmc8 : nombre de caracteres8 en statique
 668 c
 669       character*8 mcgmc8
 670       parameter ( mcgmc8 = 'ModeGMC8' )
 671 c
 672 c mcgmco : nombre de complexes en statique
 673 c
 674       character*8 mcgmco
 675       parameter ( mcgmco = 'ModeGMCO' )
 676 c
 677 c mcgmsi : nombre de reels simple precision en statique
 678 c
 679       character*8 mcgmsi
 680       parameter ( mcgmsi = 'ModeGMSI' )
 681 c
 682 c mcgmta : type d'arret de la gestion de la memoire
 683 c
 684       character*8 mcgmta
 685       parameter ( mcgmta = 'ModeGMTA' )
 686 c
 687 c 5. Autres options de pilotage
 688 c==============================
 689 c
 690 c mcguta : type d'arret de la gestion des unites logiques
 691 c
 692       character*8 mcguta
 693       parameter ( mcguta = 'ModeGUTA' )
 694 c
 695 c mclang : la langue des messages
 696 c
 697       character*8 mclang
 698       parameter ( mclang = 'Langue  ' )
 699 c
 700 c mcppty : type de post-processeur
 701 c
 702       character*8 mcppty
 703       parameter ( mcppty = 'PPType  ' )
 704 c
 705 c mcrepi : repertoire de travail pour les fichiers d'information
 706 c
 707       character*8 mcrepi
 708       parameter ( mcrepi = 'RepeInfo' )
 709 c
 710 c mcacti : l'action en cours
 711 c
 712       character*8 mcacti
 713       parameter ( mcacti = 'Action  ' )
 714 c
 715 c mcinfo : les informations a ecrire
 716 c
 717       character*8 mcinfo
 718       parameter ( mcinfo = 'MessInfo' )