12.07.2015 Views

Eliete Pereira - LEPTEN - Universidade Federal de Santa Catarina

Eliete Pereira - LEPTEN - Universidade Federal de Santa Catarina

Eliete Pereira - LEPTEN - Universidade Federal de Santa Catarina

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

APÊNDICE F 106APÊNDICE FNeste apêndice apresenta-se a implementação dos mo<strong>de</strong>los analíticos <strong>de</strong>distribuição <strong>de</strong> pressão, segundo a junta aparafusada <strong>de</strong> Al-Al <strong>de</strong> acordo com o raio dacabeça <strong>de</strong> parafuso igual a b 1 . O cálculo da distribuição <strong>de</strong> pressão das <strong>de</strong>maisconfigurações apresentadas por Gonçalves é obtido apenas mudando os parâmetros <strong>de</strong>espessura e <strong>de</strong> raio da cabeça do parafuso. A implementação dos mo<strong>de</strong>los é feita utilizandoo sofware Maple 9.5.O presente apêndice também apresenta os gráficos dos mo<strong>de</strong>los analíticos para asjuntas Al-Al e Ss-Ss utilizando os raios da cabeça <strong>de</strong> parafuso igual a b 1 e a b 2 .Mo<strong>de</strong>lo <strong>de</strong> Fernlund para a junta Al-Al, b 1 .> restart;> b:=1.6*a;> F:=evalf(Pi)*((b^2)-(a^2))*p;> n:=(15/evalf(Pi))*(F/a^2);> d[Al]:=6*a;> beta:=(alpha*evalf(Pi))/180;b := 1.6 aF := 4.900884540 a 2 pn := 23.40000000 pd Al := 6 aβ := 0.01745329252 α> c:=simplify((b+d[Al]*(evalf(tan(beta))))/a);c := 1.600000000 + 6. tan( 0.01745329252 α)> A:=n/(-c^6+2*c^5+5*c^4-20*c^3+25*c^2-14*c+3):> B:=-(4/3)*(2*c+1)*A:> C:=2*c*(c+2)*A:> De:= -4*c^2*A:> E:=-(c^3/3)*(c-4)*A:> P:=A*lambda^4+B*lambda^3+C*lambda^2+De*lambda+E:> P[d]:=(P/p):> P1:=simplify(subs(alpha=50,P[d]));P1 := -0.00007120394742 λ 4 + 0.001756463069 λ 3 + 0.07554851401 - 0.01339669098 λ 2+ 0.02180880857 λ> P2:=simplify(subs(alpha=55,P[d]));

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!