Salome HOME
commentaire
[tools/eficas.git] / Editeur / Patrons / ASTER / thermique.salome.comm
1
2
3 DEBUT();
4
5 MESH=LIRE_MAILLAGE(UNITE=21,
6                    FORMAT='MED',);
7
8 MATER=DEFI_MATERIAU(THER=_F(LAMBDA=1.2,),);
9
10 MODEL=AFFE_MODELE(MAILLAGE=MESH,
11                   AFFE=_F(TOUT='OUI',
12                           PHENOMENE='THERMIQUE',
13                           MODELISATION='3D',),);
14
15 MATFIELD=AFFE_MATERIAU(MAILLAGE=MESH,
16                        AFFE=_F(TOUT='OUI',
17                                MATER=MATER,),);
18
19 LOADING=AFFE_CHAR_THER(MODELE=MODEL,
20                        TEMP_IMPO=_F(GROUP_MA='Bloq',
21                                     TEMP=23.,),
22                        FLUX_REP=_F(GROUP_MA='Press',
23                                    FLUN=2.,),
24                        SOURCE=_F(GROUP_MA='Source',
25                                  SOUR=2.,),);
26
27 TEMP=THER_LINEAIRE(MODELE=MODEL,
28                    CHAM_MATER=MATFIELD,
29                    EXCIT=_F(CHARGE=LOADING,),);
30
31 IMPR_RESU(FORMAT='MED',
32           RESU=_F(RESULTAT=TEMP,),);
33
34 FIN();