TITR'table 3d'; OPTI DIME 3 ELEM QUA4; densite 0.04; * ++++++++++++++ * +modelisation+ * ++++++++++++++ *points P1=0. 0. 0.700; P2=0. 0.33 0.700; P3=0. 0.40 0.700; P4=0. 0.47 0.700; P5=0. 0.60 0.700; V1=0.09 0.47 0.70; V2=0.09 0.40 0.70; V3=0.09 0.33 0.70; V4=1.26 0.47 0.70; V5=1.26 0.40 0.70; V6=1.26 0.33 0.70; V7=0.675 0.47 0.70; vtot=V1 et V2 et V3 et V4 et V5 et V6 et V7 coul jaune; *lignes d1= P1 d P2 d P3 d P4 d P5; vec1=0.09 0. 0.; vec2=0.585 0. 0.; *surfaces table surf1=d1 trans vec1 trans vec2 trans vec2 trans vec1; table1=vtot et surf1; *creation des points de contact des vis sur la face *inférieure de la table w1=surf1 point proch V1; w2=surf1 point proch V2; w3=surf1 point proch V3; w4=surf1 point proch V4; w5=surf1 point proch V5; w6=surf1 point proch V6; w7=surf1 point proch V7; V8=V7 plus (0. -0.4 0.); W8=surf1 point proch V8; dw13=w1 d w3; dw46=w4 d w6; dw14=w1 d w4; *ligne collée à la table T2=0.09 0.27 0.70; vect1=0. 0.24 0.; T1=T2 plus vect1; ligne1= T1 droi T2 coul vert; *tracer tube montant remontant incliné en appui simple sur le sol T3=0.09 0.127 0.557; vect2=0. -0.04 -0.557; vect4=0. -0.0349731 -0.487; T4=T3 plus vect2; T8=T3 PLUS vect4; ligne3= T3 d T8 d T4; *tracer la courbe du montant reliant à tube1 (ou tube2) C1=0.09 0.2856 0.555; ligne2=cerc T2 C1 T3; *tube en travers E a mi hauteur diam 2.5 vect3=1.17 0. 0.; T5=T3 plus vect3; ligne6= T3 droi T5; *tube en travers F contre table diam 2.5 T6=0.09 0.47 0.70; vect3=1.17 0. 0.; T7=T6 plus vect3; ligne7= T6 droi V7 d T7; *tube hoblon courbé G reliant les appuis vect5=0. 0.43 0.; T9=T8 PLUS vect5; vect7=0. 0.215 -2.0131; G1=T8 PLUS vect7; ligne4= T8 cerc G1 T9; *pied J: appui simple vect6=0. 0. -0.07; T10=T9 PLUS vect6; ligne5= T9 droi T10; *symétrie s1=0.675 0.0 0.0; s2=0.675 0.69 0.0; s3=0.675 0.69 -0.30; syme1=ligne5 et ligne4 et ligne2 et ligne3 et ligne1 coul vert; syme2= syme1 syme 'PLAN' s1 s2 s3; *points et lignes de la symétrie T11=T1 plus vect3; T21=T2 plus vect3; T41=T4 plus vect3; T31=T3 plus vect3; T81=T8 plus vect3; T91=T9 plus vect3; G11=G1 plus vect3; T101=T10 plus vect3; C11=C1 plus vect3; ligne31= T31 droi T81 droi T41; ligne51= T91 droi T101; ligne41= T81 cerc G11 T91; ligne11= T11 droi T21; ligne21=cerc T21 C11 T31; lignetot=syme1 et ligne11 et ligne21 et ligne7 et ligne6 et ligne41 et ligne51 et ligne31 coul rouge; elim lignetot; tout=lignetot et table1; tube1=ligne1 et ligne2 et ligne3 et ligne5 et ligne11 et ligne21 et ligne31 et ligne51; tube2=ligne6 et ligne7; hoblon=ligne4 et ligne41; * +++++++++++++++++++++ * +matrice de rigidite+ * +++++++++++++++++++++ motube1=mode tube1 mecanique elastique poutre; motube2=mode tube2 mecanique elastique poutre; mohoblon=mode hoblon mecanique elastique poutre; modall=mode surf1 mecanique elastique coq4; motot=motube1 et motube2 et mohoblon et modall; matube1=mate motube1 youn 21.E10 nu 0.25 sect (4901.E-7) inry(373.E-9) inrz(373.E-9) tors(746.E-9) rho 7800; matube2=mate motube2 youn 21.E10 nu 0.25 sect (3016.E-7) inry(8701.E-11) inrz(8701.E-11) tors(174.E-9) rho 7800; mahoblon=mate mohoblon youn 21.E10 nu 0.25 sect (4901.E-7) inry(373.E-9) inrz(373.E-9) tors(746.E-9) rho 7800; madall=mate modall epai 0.023 youn 11.E9 nu 0.45 rho 450; matot=matube1 et matube2 et mahoblon et madall; rig1=rigi motot matot; mass1=mass motot matot; CHG=manu chpo tout uz -9.81; FG=mass1*chg; AMPF=-1000; F1=force Fz AMPF w8; * ++++++++++++++++++++ * +conditions limites+ * ++++++++++++++++++++ rel1=rela ense Ux Uy Uz (V1 et w1); rel2=rela ense Ux Uy Uz (V2 et w2); rel3=rela ense Ux Uy Uz (V3 et w3); rel4=rela ense Ux Uy Uz (V4 et w4); rel5=rela ense Ux Uy Uz (V5 et w5); rel6=rela ense Ux Uy Uz (V6 et w6); rel7=rela ense Ux Uy Uz (V7 et w7); liaison1=rela ense Uz (ligne1 et dw13); liaison2=rela ense Uz (ligne11 et dw46); liaison3=rela ense Uz (ligne7 et dw14); BLO1=BLOQ (T4 et T41 ) Uz; BLO2=BLOQ (T101 et T10) Uz; RITOT=RIG1 ET BLO1 et BLO2 et rel1 et rel2 et rel3 et rel4 et rel5 et rel6 et rel7 et liaison1 et liaison2 et liaison3; * ++++++++++++ * +resolution+ * ++++++++++++ ftot=f1 et fg; DEP1=RESOU RITOT ftot; def1=defo dep1 tout; sig1=sigma dep1 motot matot; trace tout; * +++++++++++++++++++ * +FORCES AUX NOEUDS+ * +++++++++++++++++++ Re=reac ritot dep1; list Re; R1=extr Re Fz w1; MESS 'REACTION EN w1' R1 'N'; R2=extr Re Fz w2; MESS 'REACTION EN w2' R2 'N'; R3=extr Re Fz w3; MESS 'REACTION EN w3' R3 'N'; R4=extr Re Fz w4; MESS 'REACTION EN w4' R4 'N'; R5=extr Re Fz w5; MESS 'REACTION EN w5' R5 'N'; R6=extr Re Fz w6; MESS 'REACTION EN w6' R6 'N'; R7=extr Re Fz w7; MESS 'REACTION EN w7' R7 'N'; * +++++++++++++++++++++++++++++++++++++++++++ * +flèche du point d'application de la force+ * +++++++++++++++++++++++++++++++++++++++++++ DEPG=extr dep1 uz w8; DEPG=1.E3*DEPG; MESS 'FLECHE EN w8' DEPG 'mm'; OEIL=0. -1000. 0.; OEIL1=-1000. -1000. 500.; trac OEIL sig1 motot matot def1; trac OEIL1 sig1 motot matot def1;