1 # MODIF DATE 24/10/2006 AUTEUR DURAND C.DURAND
2 # CONFIGURATION MANAGEMENT OF EDF VERSION
3 # ======================================================================
4 # COPYRIGHT (C) 1991 - 2001 EDF R&D WWW.CODE-ASTER.ORG
5 # THIS PROGRAM IS FREE SOFTWARE; YOU CAN REDISTRIBUTE IT AND/OR MODIFY
6 # IT UNDER THE TERMS OF THE GNU GENERAL PUBLIC LICENSE AS PUBLISHED BY
7 # THE FREE SOFTWARE FOUNDATION; EITHER VERSION 2 OF THE LICENSE, OR
8 # (AT YOUR OPTION) ANY LATER VERSION.
10 # THIS PROGRAM IS DISTRIBUTED IN THE HOPE THAT IT WILL BE USEFUL, BUT
11 # WITHOUT ANY WARRANTY; WITHOUT EVEN THE IMPLIED WARRANTY OF
12 # MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. SEE THE GNU
13 # GENERAL PUBLIC LICENSE FOR MORE DETAILS.
15 # YOU SHOULD HAVE RECEIVED A COPY OF THE GNU GENERAL PUBLIC LICENSE
16 # ALONG WITH THIS PROGRAM; IF NOT, WRITE TO EDF R&D CODE_ASTER,
17 # 1 AVENUE DU GENERAL DE GAULLE, 92141 CLAMART CEDEX, FRANCE.
18 # ======================================================================
19 #------------------------------------------------------
20 # LAMBDA EN FONCTION DE LA TEMPéRATURE
45 # RHO_CP EN FONCTION DE LA TEMPéRATURE
70 # E EN FONCTION DE LA TEMPéRATURE
81 100. ,209.4E+9 *coef2,
82 150. ,206.0E+9 *coef2,
83 200. ,201.8E+9 *coef2,
84 250. ,197.5E+9 *coef2,
85 300. ,193.5E+9 *coef2,
86 350. ,189.0E+9 *coef2,
87 400. ,184.5E+9 *coef2,
88 450. ,179.0E+9 *coef2,
89 500. ,173.5E+9 *coef2,
90 550. ,167.0E+9 *coef2,
94 # NU EN FONCTION DE LA TEMPéRATURE
99 PROL_DROITE='CONSTANT',
100 PROL_GAUCHE='CONSTANT',
105 # ALPHA EN FONCTION DE LA TEMPéRATURE
112 VALE=( 20., 9.42E-6, 50., 9.60E-6,
113 100., 9.96E-6, 150., 10.20E-6,
114 200., 10.44E-6, 250., 10.69E-6,
115 300., 10.95E-6, 350., 11.19E-6,
116 400., 11.40E-6, 450., 11.59E-6,
121 THER_NL=_F( ## SUBST THER
122 RHO_CP = _A1, ## EVAL _A1
123 LAMBDA = _A0, ## EVAL _A0
125 ELAS_FO=_F( ## SUBST ELAS
127 NU = _A3, ## EVAL _A3
128 ALPHA = _A4, ## EVAL _A4
129 TEMP_DEF_ALPHA = 20., ## SUPPR