Changes for support new version Code-Aster

d1.comm

@@ -69,16 +69,21 @@ RESU=MECA_STATIQUE(MODELE=MODE,
                    CHAM_MATER=MATE,
                    EXCIT=_F(CHARGE=CHAR,),);
 
-RESU=CALC_ELEM(reuse =RESU,
+RESU=CALC_CHAMP(reuse =RESU,
                MODELE=MODE,
                CHAM_MATER=MATE,
                RESULTAT=RESU,
-               OPTION=('SIGM_ELNO','EPSI_ELNO','SIEF_ELNO','SIEQ_ELNO',),
+               CONTRAINTE=('SIGM_ELNO','SIEF_ELNO',),
+               DEFORMATION=('EPME_ELNO',),
+               CRITERES=('SIEQ_ELNO',),
                EXCIT=_F(CHARGE=CHAR,),);
 
-RESU=CALC_NO(reuse =RESU,
+RESU=CALC_CHAMP(reuse =RESU,
              RESULTAT=RESU,
-             OPTION=('EPSI_NOEU','SIEF_NOEU','SIGM_NOEU','SIEQ_NOEU',),);
+             CONTRAINTE=('SIEF_NOEU','SIGM_NOEU',),
+             DEFORMATION=('EPME_NOEU',),
+             CRITERES=('SIEQ_NOEU',),
+             );
 
 IMPR_RESU(FORMAT='MED',
           UNITE=80,

d3.comm

@@ -69,16 +69,21 @@ RESU=MECA_STATIQUE(MODELE=MODE,
                    CHAM_MATER=MATE,
                    EXCIT=_F(CHARGE=CHAR,),);
 
-RESU=CALC_ELEM(reuse =RESU,
+RESU=CALC_CHAMP(reuse =RESU,
                MODELE=MODE,
                CHAM_MATER=MATE,
                RESULTAT=RESU,
-               OPTION=('SIGM_ELNO','EPSI_ELNO','SIEF_ELNO','SIEQ_ELNO',),
+               CONTRAINTE=('SIGM_ELNO','SIEF_ELNO',),
+               DEFORMATION=('EPME_ELNO',),
+               CRITERES=('SIEQ_ELNO',),
                EXCIT=_F(CHARGE=CHAR,),);
 
-RESU=CALC_NO(reuse =RESU,
+RESU=CALC_CHAMP(reuse =RESU,
              RESULTAT=RESU,
-             OPTION=('EPSI_NOEU','SIEF_NOEU','SIGM_NOEU','SIEQ_NOEU',),);
+             CONTRAINTE=('SIEF_NOEU','SIGM_NOEU',),
+             DEFORMATION=('EPME_NOEU',),
+             CRITERES=('SIEQ_NOEU',),
+             );
 
 IMPR_RESU(FORMAT='MED',
           UNITE=80,

d4.comm

@@ -69,16 +69,21 @@ RESU=MECA_STATIQUE(MODELE=MODE,
                    CHAM_MATER=MATE,
                    EXCIT=_F(CHARGE=CHAR,),);
 
-RESU=CALC_ELEM(reuse =RESU,
+RESU=CALC_CHAMP(reuse =RESU,
                MODELE=MODE,
                CHAM_MATER=MATE,
                RESULTAT=RESU,
-               OPTION=('SIGM_ELNO','EPSI_ELNO','SIEF_ELNO','SIEQ_ELNO',),
+               CONTRAINTE=('SIGM_ELNO','SIEF_ELNO',),
+               DEFORMATION=('EPME_ELNO',),
+               CRITERES=('SIEQ_ELNO',),
                EXCIT=_F(CHARGE=CHAR,),);
 
-RESU=CALC_NO(reuse =RESU,
+RESU=CALC_CHAMP(reuse =RESU,
              RESULTAT=RESU,
-             OPTION=('EPSI_NOEU','SIEF_NOEU','SIGM_NOEU','SIEQ_NOEU',),);
+             CONTRAINTE=('SIEF_NOEU','SIGM_NOEU',),
+             DEFORMATION=('EPME_NOEU',),
+             CRITERES=('SIEQ_NOEU',),
+             );
 
 IMPR_RESU(FORMAT='MED',
           UNITE=80,

d5.comm

@@ -69,16 +69,21 @@ RESU=MECA_STATIQUE(MODELE=MODE,
                    CHAM_MATER=MATE,
                    EXCIT=_F(CHARGE=CHAR,),);
 
-RESU=CALC_ELEM(reuse =RESU,
+RESU=CALC_CHAMP(reuse =RESU,
                MODELE=MODE,
                CHAM_MATER=MATE,
                RESULTAT=RESU,
-               OPTION=('SIGM_ELNO','EPSI_ELNO','SIEF_ELNO','SIEQ_ELNO',),
+               CONTRAINTE=('SIGM_ELNO','SIEF_ELNO',),
+               DEFORMATION=('EPME_ELNO',),
+               CRITERES=('SIEQ_ELNO',),
                EXCIT=_F(CHARGE=CHAR,),);
 
-RESU=CALC_NO(reuse =RESU,
+RESU=CALC_CHAMP(reuse =RESU,
              RESULTAT=RESU,
-             OPTION=('EPSI_NOEU','SIEF_NOEU','SIGM_NOEU','SIEQ_NOEU',),);
+             CONTRAINTE=('SIEF_NOEU','SIGM_NOEU',),
+             DEFORMATION=('EPME_NOEU',),
+             CRITERES=('SIEQ_NOEU',),
+             );
 
 IMPR_RESU(FORMAT='MED',
           UNITE=80,

d6.comm

@@ -68,16 +68,21 @@ RESU=MECA_STATIQUE(MODELE=MODE,
                    CHAM_MATER=MATE,
                    EXCIT=_F(CHARGE=CHAR,),);
 
-RESU=CALC_ELEM(reuse =RESU,
+RESU=CALC_CHAMP(reuse =RESU,
                MODELE=MODE,
                CHAM_MATER=MATE,
                RESULTAT=RESU,
-               OPTION=('SIGM_ELNO','EPSI_ELNO','SIEF_ELNO','SIEQ_ELNO',),
+               CONTRAINTE=('SIGM_ELNO','SIEF_ELNO',),
+               DEFORMATION=('EPME_ELNO',),
+               CRITERES=('SIEQ_ELNO',),
                EXCIT=_F(CHARGE=CHAR,),);
 
-RESU=CALC_NO(reuse =RESU,
+RESU=CALC_CHAMP(reuse =RESU,
              RESULTAT=RESU,
-             OPTION=('EPSI_NOEU','SIEF_NOEU','SIGM_NOEU','SIEQ_NOEU',),);
+             CONTRAINTE=('SIEF_NOEU','SIGM_NOEU',),
+             DEFORMATION=('EPME_NOEU',),
+             CRITERES=('SIEQ_NOEU',),
+             );
 
 IMPR_RESU(FORMAT='MED',
           UNITE=80,

regular.comm

@@ -67,16 +67,21 @@ RESU=MECA_STATIQUE(MODELE=MODE,
                    CHAM_MATER=MATE,
                    EXCIT=_F(CHARGE=CHAR,),);
 
-RESU=CALC_ELEM(reuse =RESU,
+RESU=CALC_CHAMP(reuse =RESU,
                MODELE=MODE,
                CHAM_MATER=MATE,
                RESULTAT=RESU,
-               OPTION=('SIGM_ELNO','EPSI_ELNO','SIEF_ELNO','SIEQ_ELNO',),
+               CONTRAINTE=('SIGM_ELNO','SIEF_ELNO',),
+               DEFORMATION=('EPME_ELNO',),
+               CRITERES=('SIEQ_ELNO',),
                EXCIT=_F(CHARGE=CHAR,),);
 
-RESU=CALC_NO(reuse =RESU,
+RESU=CALC_CHAMP(reuse =RESU,
              RESULTAT=RESU,
-             OPTION=('EPSI_NOEU','SIEF_NOEU','SIGM_NOEU','SIEQ_NOEU',),);
+             CONTRAINTE=('SIEF_NOEU','SIGM_NOEU',),
+             DEFORMATION=('EPME_NOEU',),
+             CRITERES=('SIEQ_NOEU',),
+             );
 
 IMPR_RESU(FORMAT='MED',
           UNITE=80,