diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /1226/CH20/EX20.7/EX20_7.sce | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '1226/CH20/EX20.7/EX20_7.sce')
| -rwxr-xr-x | 1226/CH20/EX20.7/EX20_7.sce | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/1226/CH20/EX20.7/EX20_7.sce b/1226/CH20/EX20.7/EX20_7.sce new file mode 100755 index 000000000..7016d8fb2 --- /dev/null +++ b/1226/CH20/EX20.7/EX20_7.sce @@ -0,0 +1,21 @@ +clc;funcprot(0);//EXAMPLE 20.7
+// Initialisation of Variables
+FAD=14;...........//Free air delivered in m^3/min
+p1=0.95;.........//Induction pressure in bar
+t1=305;........//Induction temperature in K
+p2=7;...........//Delivery pressure in bar
+n=1.3;...........//Adiabatic index
+VcbyVs=0.05;........//Ratio of clearance volume and swept volume
+R=287;...........//Gas constant in J/kgK
+t=288;...........//free air temperature in K
+p=1.013;.........//free air pressure in bar
+//Calculations
+m=(p*100000*FAD)/(R*t);..........//Mass delivered per min in kg
+t2=t1*((p2/p1)^((n-1)/n));
+IP=((n/(n-1))*m*(R/1000)*(t2-t1))/60;.........//Indicated power in kW
+disp(IP,"Indicated power in kW:")
+v4byv3=(p2/p1)^(1/n);v4byvs=v4byv3*VcbyVs;v1minv4=(1+VcbyVs)-v4byvs;
+Vbyvs=v1minv4*(t/t1)*(p1/p);
+etav=Vbyvs/1;.............//Volumetric efficiency
+disp(etav*100,"Volumetric efficiency in %:")
+
|