blob: e469d6ac9d54f9508b59764a5d030e29c4e8848f (
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
|
//Ex 7.11
clc;
clear;
close;
format('v',7);
//Given data :
d=270/1000;//meter
L=380/1000;//meter
Pmi=6;//bar
N=350;//rpm
WsubS=1000;//N
Db=1.5;//meter
mf=10;//Kg/hr
CV=44400;//KJ/Kg
IP=Pmi*10^5*(%pi/4*d^2)*L*N/2/60/1000;//KW
disp(IP,"Indicated Power in KW : ");
BP=(WsubS)*%pi*Db*N/60/1000;//KW
disp(BP,"Brake Power in KW : ");
Etta_m=BP/IP*100;//%
disp(Etta_m,"Mechanical Efficiency in % : ");
mf=mf/60/60;//Kg/s
Etta_b=BP/mf/CV*100;//
disp(Etta_b,"Indicated thermal Efficiency in % : ");
|
