From: Christian Caremoli <> Date: Fri, 2 Jun 2006 11:08:19 +0000 (+0000) Subject: CCAR:ajout fichiers de test X-Git-Tag: V1_10b1~3 X-Git-Url: http://git.salome-platform.org/gitweb/?a=commitdiff_plain;h=ac5e3012c40c776d57ff69ce8dfb038d975adbb4;p=tools%2Feficas.git CCAR:ajout fichiers de test --- diff --git a/Tests/testcomm/cabri02a.comm b/Tests/testcomm/cabri02a.comm new file mode 100755 index 00000000..4c858c6f --- /dev/null +++ b/Tests/testcomm/cabri02a.comm @@ -0,0 +1,78 @@ +# 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(); diff --git a/Tests/testcomm/param1.comm b/Tests/testcomm/param1.comm new file mode 100644 index 00000000..79172614 --- /dev/null +++ b/Tests/testcomm/param1.comm @@ -0,0 +1,36 @@ + +DEBUT() +TEMP_MOY=50. +coef0 = 1.E-3 + +A0=DEFI_FONCTION( NOM_PARA='TEMP', + PROL_DROITE='EXCLU', + PROL_GAUCHE='EXCLU', + VALE=( + 20. ,14.7 *coef0, + 50. ,15.2 *coef0, + 100. ,15.8 *coef0, + 150. ,16.7 *coef0, + 200. ,17.2 *coef0, + 250. ,18. *coef0, + 300. ,18.6 *coef0, + 350. ,19.3 *coef0, + 400. ,20. *coef0, + 450. ,20.5 *coef0, + 500. ,21.1 *coef0, + 550. ,21.7 *coef0, + 600. ,22.2 *coef0, + 650. ,22.7 *coef0, + 700. ,23.2 *coef0, + 750. ,23.7 *coef0, + 800. ,24.1 *coef0, + 950. ,26.67 *coef0, + 1150. ,29.24 *coef0, + 1370. ,32.06 *coef0, + )) + +DEFI_MATERIAU( ELAS=_F( RHO = 1.E08, + NU = 0.3, + E = A0(TEMP_MOY))) + +FIN() diff --git a/Tests/testcomm/pars1.comm b/Tests/testcomm/pars1.comm new file mode 100644 index 00000000..410fcd81 --- /dev/null +++ b/Tests/testcomm/pars1.comm @@ -0,0 +1,3 @@ +DEBUT() +a=1 # comment +FIN()