summaryrefslogtreecommitdiff
path: root/2168/CH5/EX5.4
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2168/CH5/EX5.4
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2168/CH5/EX5.4')
-rwxr-xr-x2168/CH5/EX5.4/Chapter5_example4.sce23
1 files changed, 23 insertions, 0 deletions
diff --git a/2168/CH5/EX5.4/Chapter5_example4.sce b/2168/CH5/EX5.4/Chapter5_example4.sce
new file mode 100755
index 000000000..ff76ebb48
--- /dev/null
+++ b/2168/CH5/EX5.4/Chapter5_example4.sce
@@ -0,0 +1,23 @@
+clc
+clear
+//Input data
+af=25//Air fuel ratio
+cv=[0.17,0.00004]//Cv=0.17+0.00004T where Cv is Specific heat at constant volume and T is the temperature in K
+r=14//Compression ratio
+p1=1//Pressure at the beginning of compression in kg/cm^2
+T1=153+273//Temperature at the beginning of compression in K
+CV=10000//Heating value of fuel in kcal/kg
+n=1.35//Adiabatic constant
+R=29//Characteristic gas constant in mkg/kg.K
+J=427//Mechanical equivalent of heat in kg.m/kcal
+
+//Calculations
+T2=(T1*r^(n-1))//Temperature at the end of compression in K
+a=(cv(2)/2)//For solving T3
+b=cv(1)+(R/J)//For solving T3
+c=(-T2*cv(1))-((cv(2)/2)*T2^2)-((R/J)*T2)-(CV/(af+1))//Foe solving T3
+T3=(-b+sqrt(b^2-(4*a*c)))/(2*a)//Soving for T3 in K
+pc=(((T3/T2)-1)/(r-1))*100//Percentage cut off
+
+//Output
+printf('The percentage of stroke at which the constant pressure combustion stops is %i percent',pc)