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.

.. code-block:: text


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