src/tests/daSalome/zzzz159a.3

   1 DEBUT();
   2
   3 DSDE__ = 200.;
   4
   5 YOUN__ = 8.E4;
   6
   7 SIGY__ = 1.;
   8
   9 MA=LIRE_MAILLAGE();
  10
  11 MA=DEFI_GROUP(reuse =MA,
  12               MAILLAGE=MA,
  13               CREA_GROUP_NO=_F(TOUT_GROUP_MA='OUI',),);
  14
  15
  16 ACIER=DEFI_MATERIAU(ECRO_LINE=_F(D_SIGM_EPSI=DSDE__,
  17                                  SY=SIGY__,),
  18                     ELAS=_F(NU=0.3,
  19                             E=YOUN__,),);
  20
  21 CHMAT=AFFE_MATERIAU(AFFE=_F(MATER=ACIER,
  22                             TOUT='OUI',),
  23                     MAILLAGE=MA,);
  24
  25 MO=AFFE_MODELE(AFFE=_F(TOUT='OUI',
  26                        PHENOMENE='MECANIQUE',
  27                        MODELISATION='AXIS',),
  28                MAILLAGE=MA,);
  29
  30 TRACTION=AFFE_CHAR_MECA(DDL_IMPO=(_F(DY=5.E-3,
  31                                      GROUP_NO='CD',),
  32                                   _F(DY=0.0,
  33                                      GROUP_NO='AB',),),
  34                         MODELE=MO,);
  35
  36
  37 RAMPE=DEFI_FONCTION(NOM_PARA='INST',
  38                     VALE=(0.0,0.0,1.0,1.0),);
  39
  40 INSTANTS=DEFI_LIST_REEL(INTERVALLE=_F(JUSQU_A=1.0,
  41                                       NOMBRE=10,),
  42                         DEBUT=0.0,);
  43
  44 EVOL=STAT_NON_LINE(CHAM_MATER=CHMAT,
  45                    MODELE=MO,
  46                    ARCHIVAGE=_F(LIST_INST=INSTANTS,
  47                                 ARCH_ETAT_INIT='OUI',),
  48                    CONVERGENCE=_F(ITER_GLOB_MAXI=10,
  49                                   RESI_GLOB_RELA=1.E-05,),
  50                    COMP_INCR=_F(RELATION='VMIS_ISOT_LINE',),
  51                    INCREMENT=_F(LIST_INST=INSTANTS,
  52 #                                SUBD_METHODE='UNIFORME',
  53 #                                SUBD_PAS=4,
  54 #                                SUBD_COEF_PAS_1=1.0,
  55 #                                SUBD_PAS_MINI=1.E-05,
  56                                 ),
  57                    NEWTON=_F(REAC_ITER=1,
  58                              REAC_INCR=1,),
  59                    EXCIT=_F(CHARGE=TRACTION,
  60                             FONC_MULT=RAMPE,),);
  61
  62 EVOL=CALC_ELEM(reuse =EVOL,
  63                RESULTAT=EVOL,
  64                CHAM_MATER=CHMAT,
  65                MODELE=MO,
  66                OPTION=('SIEF_ELNO_ELGA','VARI_ELNO_ELGA'),);
  67
  68 REPONSE1=POST_RELEVE_T(ACTION=_F(OPERATION='EXTRACTION',
  69                         INTITULE='SIGYY',
  70                         RESULTAT =EVOL,
  71                         NOM_CHAM ='SIEF_ELNO_ELGA',
  72                         NOM_CMP  = 'SIYY',
  73                         GROUP_NO = 'A',),);
  74
  75 REPONSE2=POST_RELEVE_T(ACTION=_F(OPERATION='EXTRACTION',
  76                         INTITULE='V1',
  77                         RESULTAT =EVOL,
  78                         NOM_CHAM ='VARI_ELNO_ELGA',
  79                         NOM_CMP  = 'V1',
  80                         GROUP_NO = 'A',),);
  81
  82
  83 FIN();