summaryrefslogtreecommitdiff
path: root/2921/CH8/EX8.1/Ex8_1.sce
blob: 07372f9672260c0a80353b90cfed7b2c15d29c54 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
clc;
clear;
mprintf('MACHINE DESIGN \n Timothy H. Wentzell, P.E. \n EXAMPLE-8.1 Page No.160\n');

Dm=0.625;            //[in] Mean diameter of spring
F=35;              //[lb] Load


K=1.25;           //[] Wahl factor for Dm/Dw=6.25 (figure 8.8)
Q=190000;         //[lb/in^2] Expected ultimate strength 

LF=0.263;         //[] Loading factor

Dw=(K*8*F*Dm/(LF*%pi*Q))^(1/2.846); //[in] Wire diameter

mprintf('\n The wire diameter of spring is %f in.',Dw);

//Use U.S Steel 12-gage wire: Dw=0.105 in.