Sample command files
=================================


Mechanical calculation with a global control (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),

...)


Kinematic loads for a natural mode calculation:
------------------------------------------------------

**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**,);

# calculation of the natural modes of the structure

MODES = CALC_MODES (MATR_RIGI = KASS,

MATR_MASS = MASS,

CALC_FREQ =_F (NMAX_FREQ =10)


"Step by step" calculation using commands FACTORISER and RESOUDRE:
------------------------------------------------------

**CHCINE = AFFE_CHAR_CINE** (MODELE =MO, MECA_IMPO =(

_F (GROUP_NO = 'SUPY', DY = 0. ),

_F (GROUP_NO = 'CHARGE', X = -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 =NUDE, **CHAR_CINE = CHCINE**)

SCMBRE = CREA_CHAMP (...)

**VCINE = CALC_CHAR_CINE** (NUME_DDL =NAKED, **CHAR_CINE = CHCINE**)

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

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