blob: 735ae09f2d86b4230e666a26f7d5daec2fb6817e (
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-16.3 Page No.360\n');
//For alpha=20 deg.
alpha=20*(%pi/180);
f=0.35;
rm=12/2;
Fa=75;
Tf=(f*rm*Fa)/(sin(alpha)+f*cos(alpha));
mprintf('\n Torque capacity (alpha=20 deg.) = %f in-lb.',Tf);
//For alpha=10 deg.
alpha=10*(%pi/180);
Tf=(f*rm*Fa)/(sin(alpha)+f*cos(alpha));
mprintf('\n Torque capacity (alpha=10 deg.) = %f in-lb.',Tf);
|