blob: c4921112e28564a8850038c9bed18b8cffff6ff1 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
clc;
clear;
mprintf('MACHINE DESIGN \n Timothy H. Wentzell, P.E. \n EXAMPLE-14.3 Page No.315\n');
//Power rating of belt
P1=27+2.98;
SF=1.5;
P=P1/SF;
P=round(P);
mprintf('\n Power rating = %f hp.',P);
//Length of belt
C=20;
D1=8;
D2=16;
L1=2*C+1.57*(D1+D2)+(D2-D1)^2/(4*C);
//Use an 80-inch belt
L=80;
mprintf('\n Length of belt = %f in.',L);
|
