blob: 5ff997cdd1ed543f965ab03cf9f5dee0dbfdd66e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
clc;
clear;
mprintf('MACHINE DESIGN \n Timothy H. Wentzell, P.E. \n EXAMPLE-13.1 Page No.280\n');
//Pitch-line velocity
Nt=24;
Pd=12;
Dp=Nt/Pd;
n=1750;
Vm=%pi*Dp*n/12;
mprintf('\n Pitch-line velocity = %f ft/min.',Vm);
//Transmitted force
hp=5;
Ft=33000*hp/Vm;
mprintf('\n Transmitted force = %f lb.',Ft);
//Axial force
psi=15*%pi/180;
Fa=Ft*tan(psi);
mprintf('\n Axial force = %f lb.',Fa);
//Separating force
theta=20*%pi/180;
psit=atan(tan(theta)/cos(psi));
Fn=Ft*tan(psit);
mprintf('\n Separating force = %f lb.',Fn);
|
