# MODIF  DATE 07/03/2005   AUTEUR CIBHHLV L.VIVAN 
# RESPONSABLE MABBAS M.ABBAS
#
# TITRE TEST DE REFERENCE POUR LA MACRO DE CALCUL DE BRIDES CABRI
#            CONFIGURATION MANAGEMENT OF EDF VERSION
# ======================================================================
# COPYRIGHT (C) 1991 - 2003  EDF R&D                  WWW.CODE-ASTER.ORG
# THIS PROGRAM IS FREE SOFTWARE; YOU CAN REDISTRIBUTE IT AND/OR MODIFY
# IT UNDER THE TERMS OF THE GNU GENERAL PUBLIC LICENSE AS PUBLISHED BY
# THE FREE SOFTWARE FOUNDATION; EITHER VERSION 2 OF THE LICENSE, OR
# (AT YOUR OPTION) ANY LATER VERSION.
#
# THIS PROGRAM IS DISTRIBUTED IN THE HOPE THAT IT WILL BE USEFUL, BUT
# WITHOUT ANY WARRANTY; WITHOUT EVEN THE IMPLIED WARRANTY OF
# MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. SEE THE GNU
# GENERAL PUBLIC LICENSE FOR MORE DETAILS.
#
# YOU SHOULD HAVE RECEIVED A COPY OF THE GNU GENERAL PUBLIC LICENSE
# ALONG WITH THIS PROGRAM; IF NOT, WRITE TO EDF R&D CODE_ASTER,
#    1 AVENUE DU GENERAL DE GAULLE, 92141 CLAMART CEDEX, FRANCE.
# ======================================================================

DEBUT(CODE=_F(  NOM = 'CABRI02A',NIV_PUB_WEB='INTRANET'));

# DEFINITION DES DONNEES MATERIAUX

# Temperature initiale, assemblage libre de contraintes
TEMP_INI=25.0;

# Temperature moyenne du transitoire pour calcul de lambda et rhoCp
TEMP_MOY = 170.0;

INCLUDE_MATERIAU(NOM_AFNOR='Z2CN1810',
                 TYPE_MODELE='REF',
                 VARIANTE='A',
                 TYPE_VALE='NOMI',
                 NOM_MATER='MA_BRI',
                 EXTRACTION=_F(COMPOR='THER',
                               TEMP_EVAL= TEMP_MOY,),
                 UNITE_LONGUEUR='MM');

INCLUDE_MATERIAU(NOM_AFNOR='Z12CN13',
                 TYPE_MODELE='REF',
                 VARIANTE='A',
                 TYPE_VALE='NOMI',
                 NOM_MATER='MA_ECR',
                 EXTRACTION=_F(COMPOR='THER',
                               TEMP_EVAL= TEMP_MOY,),
                 UNITE_LONGUEUR='MM',);

INCLUDE_MATERIAU(NOM_AFNOR='Z12CN13',
                 TYPE_MODELE='REF',
                 VARIANTE='A',
                 TYPE_VALE='NOMI',
                 NOM_MATER='MA_RON',
                 EXTRACTION=_F(COMPOR='THER',
                               TEMP_EVAL= TEMP_MOY,),
                 UNITE_LONGUEUR='MM',);

INCLUDE_MATERIAU(NOM_AFNOR='Z2CN1810',
                 TYPE_MODELE='REF',
                 VARIANTE='A',
                 TYPE_VALE='NOMI',
                 NOM_MATER='MA_GOU',
                 EXTRACTION=_F(COMPOR='THER',
                               TEMP_EVAL= TEMP_MOY,),
                 UNITE_LONGUEUR='MM',);

INCLUDE_MATERIAU(NOM_AFNOR='Z6CND1712',
                 TYPE_MODELE='REF',
                 VARIANTE='A',
                 TYPE_VALE='NOMI',
                 NOM_MATER='MA_LIM',
                 EXTRACTION=_F(COMPOR='THER',
                               TEMP_EVAL= TEMP_MOY,),
                 UNITE_LONGUEUR='MM',);

FIN();