summaryrefslogtreecommitdiff
path: root/2921/CH16/EX16.1/Ex16_1.sce
blob: d85c16d0618b2cb1f5f060a07e3b4921781b34f5 (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.1 Page No.358\n');

//Torque capacity
f=0.3;
N=120;
ro=12;
ri=9;
Tf=f*N*(ro+ri)/2;

mprintf('\n Torque capacity = %f in-lb.',Tf);
n=2000;
//Power

Pf=Tf*n/63000;

mprintf('\n Power = %f hp.',Pf);