Examples
========



Command file for MONOCRISTAL
-------------------------------------

The commands below illustrate the content of the sd_comporfor single-crystal behavior:


.. code-block:: text

    COMPOR1 = DEFI_COMPOR (

    MONOCRISTAL =(

    _F (MATER = ACIER,

    ECOULEMENT =' MONO_VISC1 ',

    ECRO_ISOT =' MONO_ISOT1 ',

    ECRO_CINE =' MONO_CINE1 ',

    ELAS =' ELAS ',

    FAMI_SYST_GLIS =' OCTAEDRIQUE ',),),);




Printing the data structure
-------------------------------------

.. code-block:: text

    ===== IMPR_CO OF STRUCTURE FROM DONNEE: COMPOR1???????????????????

    ATTRIBUT: F CONTENU: T BASE: >G <

    NOMBRE OF OBJETS (OR COLLECTIONS) TROUVES: 2


    === === === === === === === === === === === === === === ===

    IMPRESSION FROM CONTENU DES OBJETS TROUVES:

    ----------------------------------------------------------------------------


    IMPRESSION SEGMENT FROM VALEURS > COMPOR1. CPRI >>>>

    1 - 1 1 44 1 1

    6 - 1 44

    ----------------------------------------------------------------------------


    IMPRESSION SEGMENT FROM VALEURS > COMPOR1. CPRK >>>>

    1 - > OCTAEDRIQUE <> ACIER <> MONO_VISC1 <

    4 - > MONO_ISOT1 <> MONO_CINE1 <> ELAS <

    ===== FIN IMPR_CO OF FROM STRUCTURE OF DONNEE: COMPOR1??????????????????




Command file for POLYCRISTAL
-------------------------------------

The commands below illustrate the content of the sd_comporfor homogenized polycrystal behavior (test SSNV171B) based on the previous monocrystal:


.. code-block:: text

    COMPORP = DEFI_COMPOR (POLYCRISTAL =(

    _F (MONOCRISTAL = COMPOR1,

    FRAC_VOL =0.25,

    ANGL_REP =( 30.,0.,0. )),

    _F (MONOCRISTAL = COMPOR1,

    FRAC_VOL =0.25,

    ANGL_REP =( 20.,0.,0. )),

    _F (MONOCRISTAL = COMPOR1,

    FRAC_VOL =0.25,

    ANGL_REP =( 10.,0.,0. )),

    _F (MONOCRISTAL = COMPOR1,

    FRAC_VOL =0.25,

    ANGL_REP =( 40.,0.,0. )),

    ),

    LOCALISATION =' BETA ', DA=0. , DL=0. ,

    );




Printing the data structure
-------------------------------------

.. code-block:: text

    ===== IMPR_CO OF STRUCTURE FROM DONNEE: COMPORP???????????????????

    ATTRIBUT: F CONTENU: T BASE: >G <

    NOMBRE FROM OBJETS (OR COLLECTIONS) TROUVES: 3


    === === === === === === === === === === === === === === ===

    IMPRESSION FROM CONTENU DES OBJETS TROUVES:

    --------------------------------------------------------------------------------


    IMPRESSION SEGMENT FROM VALEURS > COMPORP. CPRI >>>>

    1 - 2 4 176 1 1

    6 - 1 44 1 1 44

    11 - 1 1 44 1 1

    16 - 44 9 2

    --------------------------------------------------------------------------------


    IMPRESSION SEGMENT FROM VALEURS > COMPORP. CPRK >>>>

    1 - > BETA <> COMPOR1 <> 1 <

    4 - > OCTAEDRIQUE <> ACIER <> MONO_VISC1 <

    7 - > MONO_ISOT1 <> MONO_CINE1 <> ELAS <

    --------------------------------------------------------------------------------


    IMPRESSION SEGMENT FROM VALEURS > COMPORP. CPRR >>>>

    1 - 2.50000D-01 3.00000D+01 0.00000D+01 0.00000D+00 2.50000D-01

    6 - 2.00000D+01 0.00000D+00 0.00000D+00 2.50000D-01 1.00000D+01

    11 - 0.00000D+00 0.00000D+00 2.50000D+00 2.50000D-01 4.00000D+01 0.00000D+00

    16 - 0.00000D+00 0.00000D+00 0.00000D+00

    ===== FIN IMPR_CO OF FROM STRUCTURE OF DONNEE: COMPORP??????????????????




Command file for MULTIFIBRE
------------------------------------

The commands below illustrate the content of the sd_comporfor multifiber behavior (test SSNL119B):


.. code-block:: text

    GF= DEFI_GEOM_FIBRE (

    FIBRE = _F (GROUP_FIBRE =' SACI ', CARA =' DIAMETRE ',

    COOR_AXE_POUTRE = (0.,0.,),

    VALE =( 0.066, -0.218, 32.E-3,

    -0.066, -0.218, 32.E-3,

    0.066, 0.218, 8.E-3,

    -0.066, 0.218,8.E-3,),),

    SECTION = _F (GROUP_FIBRE =' SBET ', MAILLAGE_SECT = MASEC,

    TOUT_SECT = 'OUI', COOR_AXE_POUTRE = (0., 0.,),),


    MOPOU = AFFE_MODELE (

    MAILLAGE = MAPOU,

    AFFE =_F (TOUT =' OUI ', PHENOMENE =' MECANIQUE', MODELISATION =' POU_D_EM ',),

    );


    EB = 37272.0E+06

    BETON = DEFI_MATER_GC (

    MAZARS =_F (UNITE_LONGUEUR = 'M',

    FCJ =40.963E+06, EIJ =EB, EPSI_C =1.75754E-03, AT=1.0, NU=0.2,

    ),

    RHO =2400.0, INFO =2,

    )


    ACIER = DEFI_MATER_GC (

    ACIER =_F (E = 2.0E+11, D_ SIGM_EPSI =3.28E+9, SY=4.E+8,),

    RHO =7800. ,

    )


    MATOR = DEFI_MATERIAU (ELAS =_F (E=2.E11, NU=0.0, RHO =7800.0,),);


    POUCA = AFFE_CARA_ELEM (MODELE = MOPOU, INFO =1,

    POUTRE =_F (GROUP_MA =( 'POUTRE'),

    SECTION =' RECTANGLE ', CARA =(' HY ',' HZ '),

    VALE =( 0.2,0.5), PREC_AIRE =5., PREC_INERTIE =10.,),

    ORIENTATION =_F (GROUP_MA =( 'POUTRE'), CARA =' ANGL_VRIL ',

    VALE =-90.0,),

    GEOM_FIBRE =GF,

    MULTIFIBRE =_F (GROUP_MA =( 'POUTRE'), GROUP_FIBRE =( 'SBET', 'SACI')),

    );


    COMPPMF = DEFI_COMPOR (GEOM_FIBRE =GF,

    MATER_SECT = MATOR,

    MULTIFIBRE =(

    _F (GROUP_FIBRE =' SACI ', MATER = ACIER, RELATION =' VMIS_CINE_LINE'),

    _F (GROUP_FIBRE =' SBET ', MATER = BETON, RELATION =' MAZARS_GC'),

    ),

    )


    IMPR_CO (CONCEPT =_F (NOM = COMPPMF))




Printing the data structure
-------------------------------------

.. code-block:: text

    ===== IMPR_CO OF STRUCTURE FROM DONNEE: COMPPMF???????????????????

    ATTRIBUT: F CONTENU: T BASE: >G <

    NOMBRE OF OBJETS (OR COLLECTIONS) TROUVES: 2


    === === === === === === === === === === === === === === ===

    IMPRESSION FROM CONTENU DES OBJETS TROUVES:

    --------------------------------------------------------------------------------


    IMPRESSION SEGMENT FROM VALEURS > COMPPMF. CPRI >>>>


    1 - 3 7 2

    --------------------------------------------------------------------------------


    IMPRESSION SEGMENT FROM VALEURS > COMPPMF. CPRK >>>>

    1 - > SBET <> BETON <> MAZARS_GC <

    4 - > ANALYTIQUE <> PETIT <> 40 <

    7 - > SACI <> ACIER <> VMIS_CINE_LINE <

    10 - > ANALYTIQUE <> PETIT <> 4 <

    13 - > MATOR <

    ===== FIN IMPR_CO OF FROM STRUCTURE OF DONNEE: COMPPMF??????????????????