Traducteur/traduitV7V8.py

   1 #!/usr/bin/env python
   2 # -*- coding: utf-8 -*-
   3 # Copyright (C) 2007-2017   EDF R&D
   4 #
   5 # This library is free software; you can redistribute it and/or
   6 # modify it under the terms of the GNU Lesser General Public
   7 # License as published by the Free Software Foundation; either
   8 # version 2.1 of the License.
   9 #
  10 # This library is distributed in the hope that it will be useful,
  11 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13 # Lesser General Public License for more details.
  14 #
  15 # You should have received a copy of the GNU Lesser General Public
  16 # License along with this library; if not, write to the Free Software
  17 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  18 #
  19 # See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
  20 #
  21 """
  22 """
  23 usage="""usage: %prog [options]
  24 Typical use is:
  25   python traduitV7V8.py --infile=xxxx --outfile=yyyy
  26 """
  27
  28 import sys
  29 import log
  30 import optparse
  31
  32 from load   import getJDC
  33 from mocles import parseKeywords
  34 from removemocle  import *
  35 from renamemocle  import *
  36 from renamemocle  import *
  37 from inseremocle  import *
  38 from changeValeur import *
  39 from movemocle    import *
  40 from dictErreurs  import genereErreurPourCommande,genereErreurMotCleInFact
  41
  42 import calcG
  43
  44 atraiter=( "IMPR_GENE","CALC_FONCTION", "DEFI_MATERIAU","STAT_NON_LINE",
  45           "CALC_G_LOCAL_T","CALC_G_THETA_T","CALC_G","AFFE_CHAR_MECA",
  46           "AFFE_CHAR_THER_F","IMPR_CO","DEFI_SQUELETTE","DEFI_FONCTION",
  47           "CALC_THETA","AFFE_MODELE","DYNA_NON_LINE","CALC_ELEM",
  48           "CALC_NO","EXTR_MODE","CALC_META","IMPR_RESU","TEST_RESU",
  49           "DEFI_THER_JOULE","DYNA_TRAN_EXPLI","DEBUT","CALC_CHAM_ELEM",
  50           "AFFE_CHAR_THER", "MACR_LIGN_COUPE","POST_RCCM","PROJ_MESU_MODAL",
  51           "CREA_RESU","CREA_CHAMP","DIST_LIGN_3D","MODI_MAILLAGE","LIRE_TABLE",
  52           "POST_SIMPLIFIE","AFFE_MATERIAU","DEFI_MAILLAGE","DEPL_INTERNE",
  53           "POST_DYNA_ALEA","RECU_FONCTION","DYNA_TRAN_MODAL","DEFI_INTERF_DYNA",
  54           "CALC_PRECONT","DEFI_TEXTURE","TEST_RESU","COMB_CHAM_NO","COMB_CHAM_ELEM",
  55           "CALC_FATIGUE","IMPR_OAR", "AFFE_CHAR_MECA_F",
  56            "MACR_ASCOUF_CALC","MACR_ASPIC_CALC","MACR_CABRI_CALC",
  57            "MACR_ADAP_MAIL","IMPR_FICO_HOMARD","DEFI_PART_FETI"
  58         )
  59
  60 dict_erreurs={
  61 #STA8
  62               "DIST_LIGN_3D": "la commande DIST_LIGN_3D a ete supprimee",
  63               "DEFI_THER_JOULE": "la commande DIST_LIGN_3D a ete supprimee",
  64               "DIST_LIGN_3D": "la commande DIST_LIGN_3D a ete supprimee",
  65               "AFFE_MODELE_AFFE": "Les modelisations APPUI_REP, ASSE_GRIL et 3D_JOINT_CT ont ete supprimees",
  66               "AFFE_CHAR_MECA_CONTACT_FROTTEMENT": "Suppression d un mot clef FROTTEMENT",
  67               "AFFE_CHAR_MECA_SECH_CALCULEE": "le sechage est maintenant une variable de commande",
  68               "AFFE_CHAR_MECA_HYDR_CALCULEE": "l'hydratation est maintenant une variable de commande",
  69               "AFFE_CHAR_MECA_EPSA_CALCULEE":"EPSA est maintenant une variable de commande",
  70               "AFFE_CHAR_MECA_PRESSION_CALCULEE":"PRESSION_CALCULEE est remplace par EVOL_CHAR",
  71               "MACR_LIGN_COUPE" : "MACR_LIGN_COUPE demande un traitement manuel",
  72               "POST_RCCM" : "POST_RCCM demande un traitement manuel",
  73               "DEFI_MATERIAU_CHABOCHE" : "remplacer la valeur CINx_CHAB",
  74               "DEFI_MATERIAU_POLY_CFC" : "le materiau POLY_CFC est remplace par le comportement POLYCRISTAL",
  75               "DEFI_MATERIAU_ECOU_PLAS1" : "le materiau ECOU_PLAS1 est supprime",
  76               "DEFI_MATERIAU_COMP_THM_ELAS_THM" : "le materiau ELAS_THM a ete supprime",
  77               "DEFI_MATERIAU_COMP_THM_SURF_ETAT_SATU" : "le materiau SURF_ETAT_SATU a ete supprime",
  78               "DEFI_MATERIAU_COMP_THM_SURF_ETAT_NSAT" : "le materiau SURF_ETAT_NSAT a ete supprime",
  79               "DEFI_MATERIAU_COMP_THM_CAM_CLAY_THM" : "le materiau CAM_CLAY_THM a ete supprime",
  80               "DEFI_MATERIAU_COMP_THM_LIQU_SATU_GAT" : "le materiau LIQU_SATU_GAT a ete supprime",
  81               "DEFI_MATERIAU_COMP_THM_LIQU_NSAT_GAT" : "le materiau LIQU_NSAT_GAT a ete supprime",
  82               "DEFI_MATERIAU_GLRC" : "le materiau GLRC a ete remplace par GLRC_DAMAGE",
  83               "DEFI_MATERIAU_GLRC_FO" : "le materiau GLRC_FO a ete remplace par GLRC_DAMAGE",
  84               "DEFI_MATERIAU_OHNO" : "le materiau OHNO a ete remplace par TAHERI",
  85               "DEFI_MATERIAU_OHNO_FO" : "le materiau OHNO a ete remplace par TAHERI",
  86               "CALC_CHAM_ELEM":"reecrire la partie SOUR_ELGA_ELEC",
  87               "CALC_G_THETA_T_OPTION_VALEUR":"verifier la valeur d OPTION",
  88               "CALC_G_THETA_T_OPTION_DEFAUT":"verifier la valeur d OPTION donnee a la place du defaut",
  89               "CALC_G_MODELE":"Mot Clef MODELE supprimé sous CALC_G",
  90               "CALC_G_DEPL":"Mot Clef DEPL supprimé sous CALC_G",
  91               "CALC_G_CHAM_MATER":"Mot Clef CHAM_MATER supprimé sous CALC_G",
  92               "CALC_G_CARA_ELEM":"Mot Clef CARA_ELEM supprimé sous CALC_G",
  93               "CALC_G_RESULTAT=XXX,":"Mot Clef RESULTAT à completer sous CALC_G",
  94               "AFFE_MODELE_AFFE_MODELISATION_VALEUR":"verifier la valeur de MODELISATION",
  95               "STAT_NON_LINE_COMP_INCR_RELATION_VALEUR":"verifier la valeur de RELATION",
  96               "STAT_NON_LINE_COMP_INCR_RELATION_KIT_VALEUR":"verifier la valeur de RELATION_KIT",
  97               "STAT_NON_LINE_VARI_COMM":"suppression des variables de commande",
  98               "STAT_NON_LINE_INCREMENT_SUBD_PAS":"Si SUBD_PAS=1 il n'y a pas subdivision : le mot est clef est ote du STAT_NON_LINE",
  99               "DYNA_NON_LINE_COMP_INCR_RELATION_VALEUR":"verifier la valeur de RELATION",
 100               "DYNA_NON_LINE_COMP_INCR_RELATION_KIT_VALEUR":"verifier la valeur de RELATION_KIT",
 101               "DYNA_NON_LINE_VARI_COMM":"suppression des variables de commande",
 102               "DYNA_NON_LINE_INCREMENT_SUBD_PAS":"Si SUBD_PAS=1 il n'y a pas subdivision : le mot est clef est ote du DYNA_NON_LINE",
 103               "CALC_PRECONT_SUBD_PAS":"Si SUBD_PAS=1 il n'y a pas subdivision : le mot est clef est ote du CALC_PRECONT",
 104               "TEST_RESU_UNITE":"suppression du mot clef UNITE dans TEST_RESU",
 105               "POST_SIMPLIFIE":"commande POST_SIMPLIFIE supprimee",
 106               "POST_DYNA_ALEA_GAUSS":"la methode GAUSS a ete supprimee de POST_DYNA_ALEA",
 107               "POST_DYNA_ALEA_VANMARCKE":"la methode VANMARCKE a ete supprimee de POST_DYNA_ALEA",
 108               "POST_DYNA_ALEA_DEPASSEMENT":"la methode DEPASSEMENT a ete supprimee de POST_DYNA_ALEA",
 109               "POST_DYNA_ALEA_RAYLEIGH":"la methode RAYLEIGH a ete supprimee de POST_DYNA_ALEA",
 110               "DYNA_TRAN_MODAL_EXCIT_NUME_MODE":"le numero du mode utilise pour EXCIT DYNA_TRAN_MODAL est le numero d'ORDRE",
 111               "DEFI_INTERF_DYNA_INTERFACE_DDL_ACTIF":"DDL_ACTIF supprime de DEFI_INTERF_DYNA; utiliser MASQUE",
 112               "DEFI_TEXTURE":"le materiau POLY_CFC est remplace par le comportement POLYCRISTAL",
 113               "CREA_RESU_NOM_CHAM_VALEUR":"HYDR_ELGA est remplace par HYDR_ELNO_ELGA et HYDR_NOEU_ELGA",
 114               "COMB_CHAM_NO":"COMB_CHAM_NO est remplace par CREA_CHAMP",
 115               "COMB_CHAM_ELEM":"COMB_CHAM_ELEM est remplace par CREA_CHAMP",
 116               "IMPR_OAR":"IMPR_OAR demande un traitement manuel",
 117               "IMPR_FICO_HOMARD":"IMPR_FICO_HOMARD a ete integre dans MACR_ADPA_MAIL",
 118              }
 119
 120 sys.dict_erreurs=dict_erreurs
 121
 122 #atraiter=( "MACR_ADAP_MAIL",)
 123
 124 def traduc(infile,outfile,flog=None):
 125
 126     hdlr=log.initialise(flog)
 127     jdc=getJDC(infile,atraiter)
 128     root=jdc.root
 129
 130     #Parse les mocles des commandes
 131     parseKeywords(root)
 132
 133     ####################### traitement erreurs ########################
 134     genereErreurPourCommande(jdc,("DEBUT","POST_RCCM","DIST_LIGN_3D","IMPR_OAR","COMB_CHAM_NO","COMB_CHAM_ELEM"))
 135
 136     ####################### traitement CALC_META     #######################
 137     renameMotCleInFact(jdc,"CALC_META","ETAT_INIT","META_INIT","META_INIT_ELNO")
 138
 139     ####################### traitement CALC_FONCTION #######################
 140     removeMotCleSiRegle(jdc,"CALC_FONCTION","NOM_PARA",((("MAX"),"existeMCFParmi"),))
 141     renameCommandeSiRegle(jdc,"CALC_FONCTION","INFO_FONCTION", ((("RMS","MAX","NOCI_SEISME","NORME","ECART-TYPE"),"existeMCFParmi"),))
 142     renameMotCleInFact(jdc,"CALC_FONCTION","LISS_ENVELOP","FONCTION","NAPPE")
 143
 144     ####################### traitement IMPR_GENE     #######################
 145     moveMotCleFromFactToFather(jdc,"IMPR_GENE","GENE","UNITE")
 146     moveMotCleFromFactToFather(jdc,"IMPR_GENE","GENE","FORMAT")
 147
 148     ####################### traitement STAT/DYNA_NON_LINE #######################
 149     moveMotCleFromFactToFactMulti(jdc,"STAT_NON_LINE","CONVERGENCE","RESI_INTE_RELA",("COMP_INCR","COMP_ELAS"))
 150     moveMotCleFromFactToFactMulti(jdc,"STAT_NON_LINE","CONVERGENCE","ITER_INTE_MAXI",("COMP_INCR","COMP_ELAS"))
 151     moveMotCleFromFactToFactMulti(jdc,"STAT_NON_LINE","CONVERGENCE","ITER_INTE_PAS",("COMP_INCR","COMP_ELAS"))
 152     moveMotCleFromFactToFactMulti(jdc,"STAT_NON_LINE","CONVERGENCE","RESO_INTE",("COMP_INCR","COMP_ELAS"))
 153     removeMotCleAvecErreur(jdc,"STAT_NON_LINE","VARI_COMM")
 154     moveMotCleFromFactToFactMulti(jdc,"DYNA_NON_LINE","CONVERGENCE","RESI_INTE_RELA",("COMP_INCR","COMP_ELAS"))
 155     moveMotCleFromFactToFactMulti(jdc,"DYNA_NON_LINE","CONVERGENCE","ITER_INTE_MAXI",("COMP_INCR","COMP_ELAS"))
 156     moveMotCleFromFactToFactMulti(jdc,"DYNA_NON_LINE","CONVERGENCE","ITER_INTE_PAS",("COMP_INCR","COMP_ELAS"))
 157     moveMotCleFromFactToFactMulti(jdc,"DYNA_NON_LINE","CONVERGENCE","RESO_INTE",("COMP_INCR","COMP_ELAS"))
 158     removeMotCleAvecErreur(jdc,"DYNA_NON_LINE","VARI_COMM")
 159
 160     dStatNonLine={"ELAS":"ELAS_THER"}
 161     lavertit=("ELAS")
 162     changementValeurDsMCFAvecAvertissement(jdc,"STAT_NON_LINE","COMP_INCR","RELATION_KIT",dStatNonLine,lavertit)
 163
 164     lavertit=("CHABOCHE","ASSE_COMBU","OHNO","GLRC")
 165     dchaboche={"CHABOCHE":"VMIS_CIN1_CHAB","ASSE_COMBU":"XXX_IRA","OHNO":"VISC_TAHERI","GLRC":"GLRC_DAMAGE"}
 166     changementValeurDsMCFAvecAvertissement(jdc,"STAT_NON_LINE","COMP_INCR","RELATION",dchaboche,lavertit)
 167     changementValeurDsMCFAvecAvertissement(jdc,"DYNA_NON_LINE","COMP_INCR","RELATION",dchaboche,lavertit)
 168
 169     removeMotCleInFactSiRegle(jdc,"STAT_NON_LINE","INCREMENT","SUBD_PAS_MINI",((("INCREMENT","SUBD_PAS","1",jdc),"MCsousMCFaPourValeur"),))
 170     removeMotCleInFactSiRegle(jdc,"STAT_NON_LINE","INCREMENT","COEF_SUBD_PAS_1",((("INCREMENT","SUBD_PAS","1",jdc),"MCsousMCFaPourValeur"),))
 171     removeMotCleInFactSiRegleAvecErreur(jdc,"STAT_NON_LINE","INCREMENT","SUBD_PAS",((("INCREMENT","SUBD_PAS","1",jdc),"MCsousMCFaPourValeur"),))
 172     ajouteMotClefDansFacteurSiRegle(jdc,"STAT_NON_LINE","INCREMENT","SUBD_METHODE='UNIFORME',",((("INCREMENT","SUBD_PAS"),"existeMCsousMCF"),))
 173     renameMotCleInFact(jdc,"STAT_NON_LINE","INCREMENT","COEF_SUBD_PAS_1","SUBD_COEF_PAS_1")
 174     removeMotCleInFactSiRegle(jdc,"DYNA_NON_LINE","INCREMENT","SUBD_PAS_MINI",((("INCREMENT","SUBD_PAS","1",jdc),"MCsousMCFaPourValeur"),))
 175     removeMotCleInFactSiRegle(jdc,"DYNA_NON_LINE","INCREMENT","COEF_SUBD_PAS_1",((("INCREMENT","SUBD_PAS","1",jdc),"MCsousMCFaPourValeur"),))
 176     removeMotCleInFactSiRegleAvecErreur(jdc,"DYNA_NON_LINE","INCREMENT","SUBD_PAS",((("INCREMENT","SUBD_PAS","1",jdc),"MCsousMCFaPourValeur"),))
 177     ajouteMotClefDansFacteurSiRegle(jdc,"DYNA_NON_LINE","INCREMENT","SUBD_METHODE='UNIFORME',",((("INCREMENT","SUBD_PAS"),"existeMCsousMCF"),))
 178     renameMotCleInFact(jdc,"DYNA_NON_LINE","INCREMENT","COEF_SUBD_PAS_1","SUBD_COEF_PAS_1")
 179
 180     moveMotClefInOperToFact(jdc,"STAT_NON_LINE","PARM_THETA","COMP_INCR")
 181     moveMotClefInOperToFact(jdc,"DYNA_NON_LINE","PARM_THETA","COMP_INCR")
 182     moveMotClefInOperToFact(jdc,"DYNA_TRAN_EXPLI","PARM_THETA","COMP_INCR")
 183
 184     ####################### traitement DEFI_MATERIAU #######################
 185     renameMotCle(jdc,"DEFI_MATERIAU","LEMAITRE","LEMAITRE_IRRA")
 186     moveMotCleFromFactToFactMulti(jdc,"DEFI_MATERIAU","FLU_IRRA","QSR_K",("LEMAITRE_IRRA",))
 187     moveMotCleFromFactToFactMulti(jdc,"DEFI_MATERIAU","FLU_IRRA","BETA",("LEMAITRE_IRRA",))
 188     moveMotCleFromFactToFactMulti(jdc,"DEFI_MATERIAU","FLU_IRRA","PHI_ZERO",("LEMAITRE_IRRA",))
 189     moveMotCleFromFactToFactMulti(jdc,"DEFI_MATERIAU","FLU_IRRA","L",("LEMAITRE_IRRA",))
 190     removeMotCle(jdc,"DEFI_MATERIAU","FLU_IRRA")
 191     renameMotCleAvecErreur(jdc,"DEFI_MATERIAU","CHABOCHE","CINx_CHAB")
 192     renameMotCleAvecErreur(jdc,"DEFI_MATERIAU","OHNO","TAHERI")
 193     renameMotCleAvecErreur(jdc,"DEFI_MATERIAU","OHNO_FO","TAHERI_FO")
 194     renameMotCleAvecErreur(jdc,"DEFI_MATERIAU","GLRC","GLRC_DAMAGE")
 195     renameMotCleAvecErreur(jdc,"DEFI_MATERIAU","GLRC_FO","GLRC_DAMAGE")
 196
 197     renameMotCleInFact(jdc,"DEFI_MATERIAU","GRAN_IRRA","A","GRAN_A")
 198     renameMotCleInFact(jdc,"DEFI_MATERIAU","GRAN_IRRA","B","GRAN_B")
 199     renameMotCleInFact(jdc,"DEFI_MATERIAU","GRAN_IRRA","S","GRAN_S")
 200     moveMotCleFromFactToFactMulti(jdc,"DEFI_MATERIAU","GRAN_IRRA","GRAN_A",("LEMAITRE_IRRA",))
 201     moveMotCleFromFactToFactMulti(jdc,"DEFI_MATERIAU","GRAN_IRRA","GRAN_B",("LEMAITRE_IRRA",))
 202     moveMotCleFromFactToFactMulti(jdc,"DEFI_MATERIAU","GRAN_IRRA","GRAN_S",("LEMAITRE_IRRA",))
 203     removeMotCle(jdc,"DEFI_MATERIAU","GRAN_IRRA")
 204
 205     chercheOperInsereFacteurSiRegle(jdc,"DEFI_MATERIAU","ELAS",((("CABLE",),"existe"),))
 206     moveMotCleFromFactToFactMulti(jdc,"DEFI_MATERIAU","CABLE","E",  ("ELAS",))
 207     moveMotCleFromFactToFactMulti(jdc,"DEFI_MATERIAU","CABLE","NU", ("ELAS",))
 208     moveMotCleFromFactToFactMulti(jdc,"DEFI_MATERIAU","CABLE","RHO",("ELAS",))
 209     moveMotCleFromFactToFactMulti(jdc,"DEFI_MATERIAU","CABLE","ALPHA",("ELAS",))
 210     ajouteMotClefDansFacteurSiRegle(jdc,"DEFI_MATERIAU","ELAS","NU=0.,",((("ELAS","NU"),"nexistepasMCsousMCF"),))
 211
 212     removeMotCleAvecErreur(jdc,"DEFI_MATERIAU","POLY_CFC")
 213     removeMotCleAvecErreur(jdc,"DEFI_MATERIAU","ECOU_PLAS1")
 214
 215     lavertit=("ELAS_THM","SURF_ETAT_SATU","SURF_ETAT_NSAT","CAM_CLAY_THM","LIQU_SATU_GAT","LIQU_NSAT_GAT")
 216     dTHM={"ELAS_THM":"xxx", "SURF_ETAT_SATU":"xxx", "SURF_ETAT_NSAT":"xxx","CAM_CLAY_THM":"xxx","LIQU_SATU_GAT":"xxx","LIQU_NSAT_GAT":"xxx"}
 217     changementValeurAvecAvertissement(jdc,"DEFI_MATERIAU","COMP_THM",dTHM,lavertit)
 218
 219     dfatigue={"MATAKE":"MATAKE_MODI_AC", "DOMM_MAXI":"MATAKE_MODI_AV", "FATEMI_SOCIE":"FATESOCI_MODI_AV"}
 220     changementValeurDsMCF(jdc,"DEFI_MATERIAU","CISA_PLAN_CRIT","CRITERE",dfatigue)
 221
 222     ####################### traitement IMPR_CO       #######################
 223     chercheOperInsereFacteurSiRegle(jdc,"IMPR_CO","CONCEPT",((("CO",),"existe"),))
 224     moveMotClefInOperToFact(jdc,"IMPR_CO","CO","CONCEPT")
 225     renameMotCleInFact(jdc,"IMPR_CO","CONCEPT","CO","NOM")
 226
 227     ####################### traitement DEFI_SQUELETTE #######################
 228     chercheOperInsereFacteurSiRegle(jdc,"DEFI_SQUELETTE","CYCLIQUE",((("MODE_CYCL",),"existe"),))
 229     moveMotClefInOperToFact(jdc,"DEFI_SQUELETTE","MODE_CYCL","CYCLIQUE")
 230
 231     ####################### traitement AFFE_CHAR_*   #######################
 232     removeMotCle(jdc,"AFFE_CHAR_MECA","VERI_DDL")
 233     removeMotCle(jdc,"AFFE_CHAR_MECA","SECH_CALCULEE")
 234     removeMotCle(jdc,"AFFE_CHAR_MECA","HYDR_CALCULEE")
 235     removeMotCle(jdc,"AFFE_CHAR_MECA","PRESSION_CALCULEE")
 236     removeMotCleAvecErreur(jdc,"AFFE_CHAR_MECA","EPSA_CALCULEE")
 237     removeMotCle(jdc,"AFFE_CHAR_THER_F","VERI_DDL")
 238     removeMotCle(jdc,"AFFE_CHAR_THER","VERI_DDL")
 239
 240     ####################### traitement AFFE_CHAR_MECA (CONTACT)   #######################
 241     renameMotCleInFact(jdc,"AFFE_CHAR_MECA","CONTACT","COEF_MULT_ESCL","COEF_MULT")
 242     renameMotCleInFact(jdc,"AFFE_CHAR_MECA","CONTACT","NOM_CHAM","NOM_CMP")
 243     renameMotCleInFactSiRegle(jdc,"AFFE_CHAR_MECA","CONTACT","GROUP_MA_ESCL","GROUP_MA",((("CONTACT","NOM_CMP"),"existeMCsousMCF"),))
 244     renameMotCleSiRegle(jdc,"AFFE_CHAR_MECA","CONTACT","LIAISON_UNILATER",((("CONTACT","NOM_CMP"),"existeMCsousMCF"),))
 245     removeMotCleInFact(jdc,"AFFE_CHAR_MECA","LIAISON_UNILATER","APPARIEMENT")
 246
 247     ####################### traitement AFFE_CHAR_MECA_F (CONTACT)   #######################
 248     renameMotCleInFact(jdc,"AFFE_CHAR_MECA_F","CONTACT","COEF_MULT_ESCL","COEF_MULT")
 249     renameMotCleInFact(jdc,"AFFE_CHAR_MECA_F","CONTACT","NOM_CHAM","NOM_CMP")
 250     renameMotCleInFactSiRegle(jdc,"AFFE_CHAR_MECA_F","CONTACT","GROUP_MA_ESCL","GROUP_MA",((("CONTACT","NOM_CMP"),"existeMCsousMCF"),))
 251     renameMotCleSiRegle(jdc,"AFFE_CHAR_MECA_F","CONTACT","LIAISON_UNILATER",((("CONTACT","NOM_CMP"),"existeMCsousMCF"),))
 252     removeMotCleInFact(jdc,"AFFE_CHAR_MECA_F","LIAISON_UNILATER","APPARIEMENT")
 253
 254     ####################### traitement CALC_G   #######################
 255     chercheOperInsereFacteurSiRegle(jdc,"CALC_G_LOCAL_T","LISSAGE",((("LISSAGE_G","LISSAGE_THETA","DEGRE"),"existeMCFParmi"),))
 256     moveMotClefInOperToFact(jdc,"CALC_G_LOCAL_T","LISSAGE_THETA","LISSAGE")
 257     moveMotClefInOperToFact(jdc,"CALC_G_LOCAL_T","LISSAGE_G","LISSAGE")
 258     moveMotClefInOperToFact(jdc,"CALC_G_LOCAL_T","DEGRE","LISSAGE")
 259
 260     dlocal={"CALC_G_LGLO":"G_LAGR", "G_BILINEAIRE":"G_BILI", "CALC_G_MAX":"G_MAX"}
 261     changementValeur(jdc,"CALC_G_LOCAL_T","OPTION",dlocal)
 262     #
 263     dtheta={"CALC_G_LAGR":"G_LAGR_GLOB", "G_BILINEAIRE":"G_BILI_GLOB", "CALC_G_MAX":"G_MAX_GLOB","CALC_G":"CALC_G_GLOB"}
 264     # Attention si le defaut doit generer un avertissement Il faut le mettre comme dernier mot de la liste
 265     lavertit=("CALC_G_LAGR","CALC_G","defaut")
 266     changementValeurAvecAvertissement(jdc,"CALC_G_THETA_T","OPTION",dtheta,lavertit)
 267     renameOper(jdc,"CALC_G_LOCAL_T","CALC_G")
 268     renameOper(jdc,"CALC_G_THETA_T","CALC_G")
 269
 270     # Attention cela necessite un traitement particulier et ne peut pas etre generalise tel quel
 271     # Attention egalement doit etre fait avant le regroupement dans THETA
 272     calcG.traitementRayon(jdc)
 273     renameMotCle(jdc,"CALC_G","THETA","THETA_OLD")
 274     chercheOperInsereFacteur(jdc,"CALC_G","THETA")
 275     moveMotClefInOperToFact(jdc,"CALC_G","THETA_OLD","THETA")
 276     renameMotCleInFact(jdc,"CALC_G","THETA","THETA_OLD","THETA")
 277
 278     moveMotClefInOperToFact(jdc,"CALC_G","FOND_FISS","THETA")
 279     moveMotClefInOperToFact(jdc,"CALC_G","R_INF_FO","THETA")
 280     moveMotClefInOperToFact(jdc,"CALC_G","R_SUP_FO","THETA")
 281     moveMotClefInOperToFact(jdc,"CALC_G","R_INF","THETA")
 282     moveMotClefInOperToFact(jdc,"CALC_G","R_SUP","THETA")
 283     moveMotClefInOperToFact(jdc,"CALC_G","FISSURE","THETA")
 284     renameMotCleInFactSiRegle(jdc,"CALC_G","THETA","THETA","THETA_LAGR",((("THETA","R_INF"),"existeMCsousMCF"),))
 285     renameMotCleInFactSiRegle(jdc,"CALC_G","THETA","THETA","THETA_LAGR",((("THETA","R_SUP"),"existeMCsousMCF"),))
 286     moveMotCleFromFactToFather(jdc,"CALC_G","THETA","THETA_LAGR")
 287     removeMotCleAvecErreur(jdc,"CALC_G","MODELE")
 288     removeMotCleAvecErreur(jdc,"CALC_G","DEPL")
 289     removeMotCleAvecErreur(jdc,"CALC_G","CHAM_MATER")
 290     removeMotCleAvecErreur(jdc,"CALC_G","CARA_ELEM")
 291     chercheOperInsereFacteurSiRegleAvecAvertissement(jdc,"CALC_G","RESULTAT=XXX,",((("THETA_LAGR",),"existeMCFParmi"),),0)
 292
 293     ####################### traitement AFFE_MODELE   #######################
 294     daffeModele={"PLAN_FISSURE":"PLAN_JOINT", "AXIS_FISSURE":"AXIS_JOINT"}
 295     changementValeurDsMCF(jdc,"AFFE_MODELE","AFFE","MODELISATION",daffeModele)
 296     removeMotCleSiRegleAvecErreur(jdc,"AFFE_MODELE","AFFE",((("AFFE","MODELISATION","APPUI_REP",jdc),"MCsousMCFaPourValeur"),))
 297     removeMotCleSiRegleAvecErreur(jdc,"AFFE_MODELE","AFFE",((("AFFE","MODELISATION","ASSE_GRIL",jdc),"MCsousMCFaPourValeur"),))
 298     removeMotCleSiRegleAvecErreur(jdc,"AFFE_MODELE","AFFE",((("AFFE","MODELISATION","3D_JOINT_CT",jdc),"MCsousMCFaPourValeur"),))
 299     renameMotCleInFact(jdc,"AFFE_MODELE","AFFE_SOUS_STRUC","MAILLE","SUPER_MAILLE")
 300
 301     ####################### traitement PROJ_MESU_MODAL #######################
 302     removeMotCleInFact(jdc,"PROJ_MESU_MODAL","MODELE_MESURE","NOM_PARA")
 303     removeMotCleInFactSiRegleAvecErreur(jdc,"AFFE_CHAR_MECA","CONTACT","FROTTEMENT",((("CONTACT","METHODE","CONTRAINTE",jdc),"MCsousMCFaPourValeur"),))
 304
 305     ####################### traitement CALC_ELEM / CALC_NO #######################
 306     dcalcelemno={"ERRE_ELGA_NORE":"ERRE_ELEM_SIGM","ERRE_ELEM_NOZ1":"ERZ1_ELEM_SIGM","ERRE_ELEM_NOZ2":"ERZ2_ELEM_SIGM","ERRE_ELNO_ELGA":"ERRE_ELNO_ELEM","ERRE_NOEU_ELGA":"ERRE_NOEU_ELEM","ERTH_ELEM_TEMP":"ERRE_ELEM_TEMP","ERTH_ELNO_ELEM":"ERRE_ELNO_ELEM","EPGR_ELNO":"EPFP_ELNO","EPGR_ELGA":"EPFP_ELGA","DURT_ELGA_TEMP":"DURT_ELNO_TEMP"}
 307     changementValeur(jdc,"CALC_ELEM","OPTION",dcalcelemno)
 308     changementValeur(jdc,"CALC_NO","OPTION",dcalcelemno)
 309     changementValeurDsMCF(jdc,"IMPR_RESU","RESU","NOM_CHAM",dcalcelemno)
 310     changementValeur(jdc,"TEST_RESU","RESU",dcalcelemno)
 311     removeMotCleAvecErreur(jdc,"TEST_RESU","UNITE")
 312
 313     chercheOperInsereFacteurSiRegle(jdc,"CALC_ELEM","REPE_COQUE",((("NUME_COUCHE","NIVE_COUCHE","ANGLE","PLAN"),"existeMCFParmi"),))
 314     moveMotClefInOperToFact(jdc,"CALC_ELEM","NIVE_COUCHE","REPE_COQUE")
 315     moveMotClefInOperToFact(jdc,"CALC_ELEM","NUME_COUCHE","REPE_COQUE")
 316     moveMotClefInOperToFact(jdc,"CALC_ELEM","ANGLE","REPE_COQUE")
 317     moveMotClefInOperToFact(jdc,"CALC_ELEM","PLAN","REPE_COQUE")
 318
 319
 320     ####################### traitement EXTR_MODE #######################
 321     ajouteMotClefDansFacteurSiRegle(jdc,"EXTR_MODE","FILTRE_MODE","SEUIL=1.E-3", ((("FILTRE_MODE","CRIT_EXTR",),"existeMCsousMCF"),(("FILTRE_MODE","SEUIL",),"nexistepasMCsousMCF")))
 322
 323     ####################### traitement DYNA_TRAN_EXPLI #######################
 324     removeMotCle(jdc,"DYNA_TRAN_EXPLI","NEWMARK")
 325     removeMotCle(jdc,"DYNA_TRAN_EXPLI","HHT")
 326     chercheOperInsereFacteur(jdc,"DYNA_TRAN_EXPLI","DIFF_CENT")
 327
 328     ####################### traitement CREA_RESU #######################
 329     dcrearesu={"HYDR_ELGA":"HYDR_NOEU_ELGA"}
 330     lavertit=("HYDR_ELGA",)
 331     changementValeur(jdc,"CREA_RESU","NOM_CHAM",dcrearesu,lavertit)
 332
 333     ####################### traitement CREA_CHAMP #######################
 334     dcrearesu={"HYDR_ELGA":"HYDR_ELNO_ELGA"}
 335     lavertit=("HYDR_ELGA",)
 336     changementValeur(jdc,"CREA_CHAMP","NOM_CHAM",dcrearesu,lavertit)
 337     changementValeur(jdc,"CREA_CHAMP","TYPE_CHAM",dcrearesu,lavertit)
 338
 339     ####################### traitement TEST_RESU #######################
 340     dcrearesu={"HYDR_ELGA":"HYDR_NOEU_ELGA"}
 341     lavertit=("HYDR_ELGA",)
 342     changementValeurDsMCFAvecAvertissement(jdc,"TEST_RESU","RESU","NOM_CHAM",dcrearesu,lavertit)
 343
 344     ####################### traitement DEBUT #######################
 345     removeMotCleSiRegle(jdc,"DEBUT","BASE",((("BASE","FICHIER","LOCALE",jdc),"MCsousMCFaPourValeur"),))
 346
 347     ####################### traitement DEFI_THER_JOULE #######################
 348     removeCommande(jdc,"DEFI_THER_JOULE")
 349
 350     ####################### traitement CALC_CHAM_ELEM #######################
 351     removeCommandeSiRegleAvecErreur(jdc,"CALC_CHAM_ELEM",((("OPTION","SOUR_ELGA_ELEC",jdc),"MCaPourValeur"),))
 352
 353     ####################### traitement MACR_LIGNE_COUPE #######################
 354     appelleMacroSelonValeurConcept(jdc,"MACR_LIGN_COUPE",("LIGN_COUPE","TABLE"))
 355     removeMotCleInFact(jdc,"MACR_LIGN_COUPE","LIGN_COUPE","TABLE")
 356
 357     ####################### traitement MODI_MAILLAGE #######################
 358     removeMotCle(jdc,"MODI_MAILLAGE","MODELE")
 359
 360     ####################### traitement LIRE_TABLE #######################
 361     removeMotCle(jdc,"LIRE_TABLE","TYPE_TABLE")
 362
 363     ####################### traitement POST_SIMPLIFIE #######################
 364     removeCommande(jdc,"POST_SIMPLIFIE")
 365
 366     ####################### traitement AFFE_MATERIAU #######################
 367     removeMotCleInFact(jdc,"AFFE_MATERIAU","AFFE","SECH_REF")
 368
 369     ####################### traitement DEFI_MAILLAGE #######################
 370     renameMotCleInFact(jdc,"DEFI_MAILLAGE","DEFI_MAILLE","MAILLE","SUPER_MAILLE")
 371     renameMotCle(jdc,"DEFI_MAILLAGE","DEFI_MAILLE","DEFI_SUPER_MAILLE")
 372     renameMotCleInFact(jdc,"DEFI_MAILLAGE","RECO_GLOBAL","MAILLE","SUPER_MAILLE")
 373     renameMotCleInFact(jdc,"DEFI_MAILLAGE","RECO_MAILLE","MAILLE","SUPER_MAILLE")
 374     renameMotCle(jdc,"DEFI_MAILLAGE","RECO_MAILLE","RECO_SUPER_MAILLE")
 375     renameMotCleInFact(jdc,"DEFI_MAILLAGE","DEFI_NOEUD","MAILLE","SUPER_MAILLE")
 376     renameMotCleInFact(jdc,"DEFI_MAILLAGE","DEFI_GROUP_NO","MAILLE","SUPER_MAILLE")
 377
 378     ####################### traitement DEPL_INTERNE #######################
 379     renameMotCle(jdc,"DEPL_INTERNE","MAILLE","SUPER_MAILLE")
 380
 381
 382     ####################### traitement POST_DYNA_ALEA #######################
 383     removeMotCleAvecErreur(jdc,"POST_DYNA_ALEA","GAUSS")
 384     removeMotCleAvecErreur(jdc,"POST_DYNA_ALEA","RAYLEIGH")
 385     removeMotCleAvecErreur(jdc,"POST_DYNA_ALEA","DEPASSEMENT")
 386     removeMotCleAvecErreur(jdc,"POST_DYNA_ALEA","VANMARCKE")
 387
 388     ####################### traitement RECU_FONCTION #######################
 389 # il faut aussi ajouter la regle suivante :
 390 # s'il existe TYPE_RESU='FONCTION_C', renommer NOM_PARA_TABL='FONCTION_C'
 391     removeMotCleSiRegle(jdc,"RECU_FONCTION","NOM_PARA_TABL",((("TYPE_RESU","FONCTION_C",jdc),"MCaPourValeur"),))
 392     chercheOperInsereFacteurSiRegle(jdc,"RECU_FONCTION","NOM_PARA_TABL='FONCTION_C',",((("TYPE_RESU","FONCTION_C",jdc),"MCaPourValeur"),),estunFacteur=0)
 393     removeMotCle(jdc,"RECU_FONCTION","TYPE_RESU")
 394     chercheOperInsereFacteurSiRegle(jdc,"RECU_FONCTION","NOM_PARA_TABL='FONCTION',",((("OBSTACLE",),"existe"),),estunFacteur=0)
 395     chercheOperInsereFacteurSiRegle(jdc,"RECU_FONCTION","FILTRE",((("OBSTACLE",),"existe"),))
 396     ajouteMotClefDansFacteurSiRegle(jdc,"RECU_FONCTION","FILTRE","NOM_PARA='LIEU',",((("OBSTACLE",),"existe"),))
 397     ajouteMotClefDansFacteurSiRegle(jdc,"RECU_FONCTION","FILTRE","VALE_K='DEFIOBST',",((("OBSTACLE",),"existe"),))
 398     renameMotCle(jdc,"RECU_FONCTION","OBSTACLE","TABLE")
 399
 400     ####################### traitement DYNA_TRAN_MODAL #######################
 401     renameMotCleInFact(jdc,"DYNA_TRAN_MODAL","EXCIT","NUME_MODE","NUME_ORDRE",erreur=1)
 402
 403     ####################### traitement DEFI_INTERF_DYNA #######################
 404     removeMotCleInFact(jdc,"DEFI_INTERF_DYNA","INTERFACE","DDL_ACTIF",erreur=1)
 405
 406
 407     ####################### traitement CALC_PRECONT #######################
 408     removeMotCleInFactSiRegle(jdc,"CALC_PRECONT","INCREMENT","SUBD_PAS_MINI",((("INCREMENT","SUBD_PAS","1",jdc),"MCsousMCFaPourValeur"),))
 409     removeMotCleInFactSiRegle(jdc,"CALC_PRECONT","INCREMENT","COEF_SUBD_PAS_1",((("INCREMENT","SUBD_PAS","1",jdc),"MCsousMCFaPourValeur"),))
 410     removeMotCleInFactSiRegleAvecErreur(jdc,"CALC_PRECONT","INCREMENT","SUBD_PAS",((("INCREMENT","SUBD_PAS","1",jdc),"MCsousMCFaPourValeur"),))
 411     ajouteMotClefDansFacteurSiRegle(jdc,"CALC_PRECONT","INCREMENT","SUBD_METHODE='UNIFORME',",((("INCREMENT","SUBD_PAS"),"existeMCsousMCF"),))
 412     moveMotCleFromFactToFactMulti(jdc,"CALC_PRECONT","CONVERGENCE","RESI_INTE_RELA",("COMP_INCR","COMP_ELAS"))
 413     moveMotCleFromFactToFactMulti(jdc,"CALC_PRECONT","CONVERGENCE","ITER_INTE_MAXI",("COMP_INCR","COMP_ELAS"))
 414     moveMotCleFromFactToFactMulti(jdc,"CALC_PRECONT","CONVERGENCE","ITER_INTE_PAS",("COMP_INCR","COMP_ELAS"))
 415     moveMotCleFromFactToFactMulti(jdc,"CALC_PRECONT","CONVERGENCE","RESO_INTE",("COMP_INCR","COMP_ELAS"))
 416     renameMotCleInFact(jdc,"CALC_PRECONT","INCREMENT","COEF_SUBD_PAS_1","SUBD_COEF_PAS_1")
 417
 418
 419     ####################### traitement DEFI_TEXTURE #######################
 420     removeCommande(jdc,"DEFI_TEXTURE")
 421
 422
 423     ####################### traitement COMB_CHAM_NO #######################
 424     renameMotCleInFact(jdc,"COMB_CHAM_NO","COMB_C","CHAM_NO","CHAM_GD")
 425     chercheOperInsereFacteur(jdc,"COMB_CHAM_NO","TYPE_CHAM='xxx',",estunFacteur=0,erreur=1)
 426     chercheOperInsereFacteur(jdc,"COMB_CHAM_NO","MODELE=xxx,",estunFacteur=0,erreur=1)
 427     chercheOperInsereFacteur(jdc,"COMB_CHAM_NO","OPERATION='ASSE',",estunFacteur=0,erreur=1)
 428     renameMotCle(jdc,"COMB_CHAM_NO","COMB_C","ASSE")
 429     ajouteMotClefDansFacteur(jdc,"COMB_CHAM_NO","ASSE","CUMUL='NON',")
 430     ajouteMotClefDansFacteur(jdc,"COMB_CHAM_NO","ASSE","TOUT='OUI',")
 431     renameOper(jdc,"COMB_CHAM_NO","CREA_CHAMP")
 432
 433
 434     ####################### traitement MACR_ASCOUF_CALC #######################
 435     ajouteMotClefDansFacteurSiRegle(jdc,"MACR_ASCOUF_CALC","INCREMENT","SUBD_METHODE='UNIFORME',",((("INCREMENT","SUBD_PAS"),"existeMCsousMCF"),))
 436     renameMotCleInFact(jdc,"MACR_ASCOUF_CALC","INCREMENT","COEF_SUBD_PAS_1","SUBD_COEF_PAS_1")
 437     moveMotCleFromFactToFactMulti(jdc,"MACR_ASCOUF_CALC","CONVERGENCE","RESI_INTE_RELA",("COMP_INCR","COMP_ELAS"))
 438     moveMotCleFromFactToFactMulti(jdc,"MACR_ASCOUF_CALC","CONVERGENCE","ITER_INTE_MAXI",("COMP_INCR","COMP_ELAS"))
 439     moveMotCleFromFactToFactMulti(jdc,"MACR_ASCOUF_CALC","CONVERGENCE","ITER_INTE_PAS",("COMP_INCR","COMP_ELAS"))
 440     moveMotCleFromFactToFactMulti(jdc,"MACR_ASCOUF_CALC","CONVERGENCE","RESO_INTE",("COMP_INCR","COMP_ELAS"))
 441
 442
 443     ####################### traitement MACR_ASPIC_CALC #######################
 444     ajouteMotClefDansFacteurSiRegle(jdc,"MACR_ASPIC_CALC","INCREMENT","SUBD_METHODE='UNIFORME',",((("INCREMENT","SUBD_PAS"),"existeMCsousMCF"),))
 445     renameMotCleInFact(jdc,"MACR_ASPIC_CALC","INCREMENT","COEF_SUBD_PAS_1","SUBD_COEF_PAS_1")
 446     moveMotCleFromFactToFactMulti(jdc,"MACR_ASPIC_CALC","CONVERGENCE","RESI_INTE_RELA",("COMP_INCR","COMP_ELAS"))
 447     moveMotCleFromFactToFactMulti(jdc,"MACR_ASPIC_CALC","CONVERGENCE","ITER_INTE_MAXI",("COMP_INCR","COMP_ELAS"))
 448     moveMotCleFromFactToFactMulti(jdc,"MACR_ASPIC_CALC","CONVERGENCE","ITER_INTE_PAS",("COMP_INCR","COMP_ELAS"))
 449
 450
 451     ####################### traitement MACR_CABRI_CALC #######################
 452     ajouteMotClefDansFacteurSiRegle(jdc,"MACR_CABRI_CALC","INCREMENT","SUBD_METHODE='UNIFORME',",((("INCREMENT","SUBD_PAS"),"existeMCsousMCF"),))
 453     renameMotCleInFact(jdc,"MACR_CABRI_CALC","INCREMENT","COEF_SUBD_PAS_1","SUBD_COEF_PAS_1")
 454     moveMotCleFromFactToFactMulti(jdc,"MACR_CABRI_CALC","CONVERGENCE","RESI_INTE_RELA",("COMP_INCR","COMP_ELAS"))
 455     moveMotCleFromFactToFactMulti(jdc,"MACR_CABRI_CALC","CONVERGENCE","ITER_INTE_MAXI",("COMP_INCR","COMP_ELAS"))
 456     moveMotCleFromFactToFactMulti(jdc,"MACR_CABRI_CALC","CONVERGENCE","ITER_INTE_PAS",("COMP_INCR","COMP_ELAS"))
 457
 458
 459     ####################### traitement CALC_FATIGUE #######################
 460     dfatigue={"MATAKE":"MATAKE_MODI_AC", "DOMM_MAXI":"MATAKE_MODI_AV", "FATEMI_SOCIE":"FATESOCI_MODI_AV"}
 461     changementValeur(jdc,"CALC_FATIGUE","CRITERE",dfatigue)
 462
 463     ####################### traitement DEFI_PART_FETI #######################
 464     removeMotCleSiRegle(jdc,"DEFI_PART_FETI","MAILLAGE", ((("MODELE",),"existeMCFParmi"),(("MAILLAGE",),"existeMCFParmi")))
 465
 466     ####################### traitement MACR_ADAP_MAIL #######################
 467     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","MAILLAGE_N")
 468     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","MAILLAGE_NP1")
 469     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","RESULTAT_N")
 470     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","INDICATEUR")
 471     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","NOM_CMP_INDICA")
 472     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","CRIT_RAFF_PE")
 473     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","CRIT_RAFF_ABS")
 474     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","CRIT_RAFF_REL")
 475     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","CRIT_DERA_PE")
 476     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","CRIT_DERA_ABS")
 477     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","CRIT_DERA_REL")
 478     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","NIVE_MAX")
 479     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","INST")
 480     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","PRECISION")
 481     moveMotCleFromFactToFather(jdc,"MACR_ADAP_MAIL","ADAPTATION","CRITERE")
 482     chercheOperInsereFacteurSiRegle(jdc,"MACR_ADAP_MAIL","ADAPTATIONEW='RAFFINEMENT',",((("ADAPTATION","LIBRE","RAFFINEMENT",jdc),"MCsousMCFaPourValeur"),),estunFacteur=0)
 483     chercheOperInsereFacteurSiRegle(jdc,"MACR_ADAP_MAIL","ADAPTATIONEW='DERAFFINEMENT',",((("ADAPTATION","LIBRE","DERAFFINEMENT",jdc),"MCsousMCFaPourValeur"),),estunFacteur=0)
 484     chercheOperInsereFacteurSiRegle(jdc,"MACR_ADAP_MAIL","ADAPTATIONEW='RAFF_DERA',",((("ADAPTATION","LIBRE","RAFF_DERA",jdc),"MCsousMCFaPourValeur"),),estunFacteur=0)
 485     chercheOperInsereFacteurSiRegle(jdc,"MACR_ADAP_MAIL","ADAPTATIONEW='RAFFINEMENT_UNIFORME',",((("ADAPTATION","UNIFORME","RAFFINEMENT",jdc),"MCsousMCFaPourValeur"),),estunFacteur=0)
 486     chercheOperInsereFacteurSiRegle(jdc,"MACR_ADAP_MAIL","ADAPTATIONEW='DERAFFINEMENT_UNIFORME',",((("ADAPTATION","UNIFORME","DERAFFINEMENT",jdc),"MCsousMCFaPourValeur"),),estunFacteur=0)
 487     chercheOperInsereFacteurSiRegle(jdc,"MACR_ADAP_MAIL","ADAPTATIONEW='RIEN',",((("ADAPTATION","UNIFORME","RIEN",jdc),"MCsousMCFaPourValeur"),),estunFacteur=0)
 488     removeMotCle(jdc,"MACR_ADAP_MAIL","ADAPTATION")
 489     renameMotCle(jdc,"MACR_ADAP_MAIL","ADAPTATIONEW","ADAPTATION")
 490     dcalcelemno={"ERRE_ELGA_NORE":"ERRE_ELEM_SIGM","ERRE_ELEM_NOZ1":"ERZ1_ELEM_SIGM","ERRE_ELEM_NOZ2":"ERZ2_ELEM_SIGM","ERRE_ELNO_ELGA":"ERRE_ELNO_ELEM","ERRE_NOEU_ELGA":"ERRE_NOEU_ELEM","ERTH_ELEM_TEMP":"ERRE_ELEM_TEMP","ERTH_ELNO_ELEM":"ERRE_ELNO_ELEM","EPGR_ELNO":"EPFP_ELNO","EPGR_ELGA":"EPFP_ELGA","DURT_ELGA_TEMP":"DURT_ELNO_TEMP"}
 491     changementValeur(jdc,"MACR_ADAP_MAIL","ADAPTATION",dcalcelemno)
 492
 493
 494     ####################### traitement IMPR_FICO_HOMARD #######################
 495     removeCommande(jdc,"IMPR_FICO_HOMARD")
 496
 497
 498     #########################################################################
 499
 500
 501     f=open(outfile,'w')
 502     f.write(jdc.getSource())
 503     f.close()
 504
 505     log.ferme(hdlr)
 506
 507 def main():
 508     parser = optparse.Optionparser(usage=usage)
 509
 510     parser.add_option('-i','--infile', dest="infile", default='toto.comm',
 511         help="Le fichier à traduire")
 512     parser.add_option('-o','--outfile', dest="outfile", default='tutu.comm',
 513         help="Le fichier traduit")
 514
 515     options, args = parser.parse_args()
 516     traduc(options.infile,options.outfile)
 517
 518 if __name__ == '__main__':
 519     main()
 520