1 # -*- coding: iso-8859-1 -*-
5 BOX=LIRE_MAILLAGE(FORMAT='MED',);
7 BETON=DEFI_MATERIAU(THER=_F(LAMBDA=8000.,
10 MOTH=AFFE_MODELE(MAILLAGE=BOX,
12 PHENOMENE='THERMIQUE',
13 MODELISATION='3D',),);
15 #BOX=MODI_MAILLAGE( reuse=BOX,
17 # ORIE_PEAU_3D=_F(GROUP_MA=('CL_1','CL_2','XMIN','XMAX','YMIN','YMAX','ZMIN','ZMAX',),)
20 CHMAT=AFFE_MATERIAU(MAILLAGE=BOX,
24 CHTH=AFFE_CHAR_THER(MODELE=MOTH,
25 TEMP_IMPO=(_F(GROUP_MA='CL_1',
29 FLUX_REP=(_F(GROUP_MA='XMIN',
42 RESU=THER_LINEAIRE(MODELE=MOTH,
44 EXCIT=_F(CHARGE=CHTH,),);
46 IMPR_RESU(FORMAT='MED',
47 RESU=_F(RESULTAT=RESU,
49 NOM_CHAM_MED='TEMPERATURE',),);
51 # Extraction de la temperature sur un noeud predefini
53 TA=POST_RELEVE_T(ACTION=_F(OPERATION='EXTRACTION',
64 NOM_PARA=('INTITULE','TEMP',),);
66 # Calcul de l'indicateur d'erreur
68 RESU=CALC_ERREUR(reuse =RESU,
73 IMPR_RESU(FORMAT='MED',
74 RESU=_F(RESULTAT=RESU,
78 NOM_CHAM_MED='ERREUR',),);
85 #CHECKSUM:5021673eed6e81bf9074892cd639b2ad -:FIN CHECKSUM