TITRE 'Transfert de Chaleur dans un tas de plaquettes forestières'; OPTI DIME 2 ELEM tri3; *largeur du tas L = 20.; *hauteur du tas H = 6.; *pente par rapport à l'horizontale Agl = 45.; *définition des points du contour P1 = (0. - (L / 2.) - 5.) (0. - 5.); P2 = ((L / 2.) + 5.) (0. - 5.); P3 = ((L / 2.) + 5.) 0.; P4 = (L / 2.) 0.; P5 = (0. - (L / 2.)) 0.; P6 = (0. - (L / 2.) - 5.) 0.; P7 = (H*(COS(Agl))/(SIN(Agl))- (L / 2.)) (H); P8 = (0.-(H*(COS(Agl))/(SIN(Agl)))+ (L / 2.)) (H); *définition des droites du contour D1 = P1 DROI P2 10; D2 = P2 DROI P3 4; D3 = P3 DROI P4 4; D4 = P4 DROI P5 8; D5 = P5 DROI P6 4; D6 = P6 DROI P1 4; D7 = P5 DROI P7 8; D8 = P7 DROI P8 8; D9 = P8 DROI P4 8; *définition des contours CT1 = D1 ET D2 ET D3 ET D4 ET D5 ET D6; CT2 = D4 ET D7 ET D8 ET D9; SF1 = SURFACE CT1; SF2 = SURFACE CT2; SF1 = COUL (SF1) ROUGE; SF2 = COUL (SF2) VERT; TRACE (SF1 ET SF2); *Choix du comportement et du modèle élément fini MOSOL = MODE SF1 THERMIQUE ISOTROPE; MOTAS = MODE SF2 THERMIQUE ISOTROPE; CTAIR = D3 ET D5 ET D7 ET D8 ET D9 MOAIR = CTAIR MODE CONVECTION; *Donnée matériaux et éléments MATSOL = MATE MOSOL K 2.6; MATTAS = MATE MOTAS K 0.05; MATAIR = MATE MOAIR H 10.0; *Conditions aux limites CTSOL = D1 CLSOL = BLOQ CTSOL T; FCLSOL = DEPI CLSOL 20.; *Chargement (flux) FLUAIR = CONV MOAIR MATAIR T 10.; *FLUTAS = FLUX ????; *Matrices de conductivité CONDSOL = COND MOSOL MATSOL; CONDTAS = COND MOTAS MATTAS; CONDTOT = CONDSOL ET CONDTAS ET CLSOL; *Flux FLUTOT = FCLSOL ET FLUAIR; *Résolution CHTEMP = RESO CONDTOT FLUTOT; *Post-traitement TITR 'CHAMP DE TEMPERATURES'; TRAC CHTEMP (SF1 ET SF2); FIN;