4. example#
The example below performs a calculation on 2 Fourier harmonics by MACRO_ELAS_MULT, enriches the RESULTAT type concept by CALC_CHAMP before recombining the fields calculated by COMB_FOURIER.
Fourier calculation on the first two symmetric harmonics
resu = MACRO_ELAS_MULT (MODELE = me,
CHAM_MATER = cm,
CHAR_MECA_GLOBAL = blocked,
CAS_CHARGE = (
_F (MODE_FOURIER = 1,
TYPE_MODE = 'SYME',
CHAR_MECA = ch,
SOUS_TITRE = 'fourier mode 1 SYME '),
_F (MODE_FOURIER = 2,
TYPE_MODE = 'SYME',
CHAR_MECA = ch,
SOUS_TITRE = 'fourier mode 2 SYME '),),
)
Calculation of stresses and nodal reactions by CALC_CHAMP
resu = CALC_CHAMP (reuse = resu,
RESULTAT = water,
CONTRAINTE = 'SIGM_ELNO',
FORCE = 'REAC_NODA',
Fourier recombination on displacements, reactions and constraints for 45° and 135°
English 1 = 45.
English2 = 135.
co_four = COMB_FOURIER (RESULTAT = resu,
NOM_CHAM = ('DEPL', 'REAC_NODA', 'SIGM_ELNO'),
ANGLE = (English1, English2),);