summaryrefslogtreecommitdiff
path: root/2921/CH6/EX6.3/Ex6_3.sce
blob: ebaea175aa1057b7f9d383c54a69a1c5f7af16b3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
clc;
clear;
mprintf('MACHINE DESIGN \n Timothy H. Wentzell, P.E. \n EXAMPLE-6.3 Page No.122\n');

Alpha=6.5*10^-6;       //[in/(in*F)] Thermal expansion coefficient (Appendix 8)
L=5;                   //[in] Length of engagement

Delta=0.01204;       //[Degree] Elongation

DT=Delta/(Alpha*L);    //[F] The temperature we would need to heat this bolt above the sevice temperature

mprintf('\n The temperature we would need to heat this bolt above the sevice temperature is %f F.',DT);