3. Exemples de fichiers de commandes#

3.1. Calcul mécanique avec une commande globale (STAT_NON_LINE) :#

DEPIMP = AFFE_CHAR_CINE ( MODELE=MOD,

MECA_IMPO=_F( GROUP_MA = “LCD1”, DY = -2.0))

RESU=STAT_NON_LINE( MODELE=MOD, CHAM_MATER=CHMAT,

EXCIT= _F( CHARGE = DEPIMP , FONC_MULT = FONC),

…)

3.2. Charges cinématiques pour un calcul de modes propres :#

CHARCINE = AFFE_CHAR_CINE (MODELE=MODEL,

MECA_IMPO=_F(GROUP_MA=”GM2”, DX=0.0, DY=0.0))

KASS= ASSE_MATRICE (MATR_ELEM=KELEM,

NUME_DDL=NUME,

CHAR_CINE=CHARCINE ,);

MASS= ASSE_MATRICE (MATR_ELEM=MELEM,

NUME_DDL=NUME,

CHAR_CINE=CHARCINE ,);

# calcul des modes propres de la structure

MODES=CALC_MODES(MATR_RIGI=KASS,

MATR_MASS=MASS,

CALC_FREQ=_F( NMAX_FREQ=10 ))

3.3. Calcul « pas à pas » en utilisant les commandes FACTORISER et RESOUDRE :#

CHCINE=AFFE_CHAR_CINE ( MODELE=MO, MECA_IMPO=(

_F( GROUP_NO = “SUPY”, DY = 0.),

_F( GROUP_NO = “CHARGE”, DX = -1.)))

MEL=CALC_MATR_ELEM( MODELE=MO, CHAM_MATER=CHMAT, OPTION=”RIGI_MECA”)

NU=NUME_DDL( MATR_RIGI=MEL )

MATAS= ASSE_MATRICE ( MATR_ELEM=MEL, NUME_DDL=NU, CHAR_CINE=CHCINE )

SCMBRE=CREA_CHAMP( … )

VCINE=CALC_CHAR_CINE ( NUME_DDL=NU, CHAR_CINE=CHCINE )

MATAS=FACTORISER(reuse=MATAS, MATR_ASSE=MATAS )

DEP= RESOUDRE (MATR=MATAS, CHAM_NO=SCMBRE, CHAM_CINE=VCINE )