DEBUT(LANG='EN') mesh = LIRE_MAILLAGE(FORMAT='MED', UNITE=20) model = AFFE_MODELE(AFFE=_F(MODELISATION=('3D', ), PHENOMENE='MECANIQUE', TOUT='OUI'), MAILLAGE=mesh) mater = DEFI_MATERIAU(ELAS=_F(E=7500.0, NU=0.4)) fieldmat = AFFE_MATERIAU(AFFE=_F(MATER=(mater, ), TOUT='OUI'), MODELE=model) load = AFFE_CHAR_MECA(DDL_IMPO=_F(DX=0.0, DY=0.0, DZ=0.0, GROUP_MA=('kotei', )), FORCE_FACE=_F(FY=1.0, GROUP_MA=('saica', )), MODELE=model) reslin = MECA_STATIQUE(CHAM_MATER=fieldmat, EXCIT=_F(CHARGE=load), MODELE=model) unnamed = CALC_CHAMP(CHAM_MATER=fieldmat, CONTRAINTE=('SIGM_NOEU', ), CRITERES=('SIEQ_NOEU', ), DEFORMATION=('EPSI_NOEU', ), MODELE=model, RESULTAT=reslin) IMPR_RESU(FORMAT='MED', RESU=(_F(NOM_CHAM=('DEPL', ), RESULTAT=reslin), _F(NOM_CHAM=('SIGM_NOEU', 'SIEQ_NOEU', 'EPSI_NOEU'), RESULTAT=unnamed)), UNITE=80) FIN()