summaryrefslogtreecommitdiff
path: root/3821/CH14/EX14.7/Example14_7.sce
blob: 68825c6674c96f1bd2e35651d9fb6575ae808a60 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
////Chapter No 14 Air Standard Cycles
////Example No 14.7 Page No  309
///Find Swept volume
//Input data
clc;
clear;
D=200*10^-3;                   //Otto cycle cylindrical bore in mm
L=450*10^-3;                   //Otto cycle Stroke in mm
vc=2*10^-3;                    //Clearance volume in mm^3
gamma1=1.4;
pi=3.142;

//Calculation
vs=(pi/4)*(D^2*L);             //Swept volume
r=((vs+vc)/vc);                 //Compression ratio
eta=100*(1-(1/(r**(gamma1-1)))); //Standard efficiency

//Output
printf('Swept volume= %f m^3 \n',vs);
printf('compression ratio= %f \n',r);
printf('standard efficiency= %f percent \n',eta);