summaryrefslogtreecommitdiff
path: root/779/CH18/EX18.6
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /779/CH18/EX18.6
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 '779/CH18/EX18.6')
-rwxr-xr-x779/CH18/EX18.6/18_6.sce20
1 files changed, 20 insertions, 0 deletions
diff --git a/779/CH18/EX18.6/18_6.sce b/779/CH18/EX18.6/18_6.sce
new file mode 100755
index 000000000..36a4b9ac1
--- /dev/null
+++ b/779/CH18/EX18.6/18_6.sce
@@ -0,0 +1,20 @@
+P1 = 1; P41 = 15; // P41 = P4/P1
+P21 = (P41)^(1/3);
+P2 = P21*P1; n = 1.3; R = 0.287;
+P3 = P21*P2;
+P11 = P2; P12 = P1;
+b = 0.45; s = 0.3; // Bore and stroke of cylinder
+Vs = (%pi/4)*b^2*s; // Swept volume of the cylinder
+V11 = 0.05*Vs; // Clearance volume
+V1 = V11+Vs;
+V12 = V11*(P11/P12)^(1/n);
+disp("m3",V1-V12,"Effective swept volume of the LP cylinder is")
+T1 = 291; T3 = T1; T5 = T1;
+P43 = P21; // P4/P3
+T6 = T5*(P43)^((n-1)/n);
+disp("K",T6,"Delivery temperature is")
+P4 = 15; // Delivery pressure
+V6_7 = (P1/P4)*(T6/T1)*(V1-V12); // V6-V7
+disp("m3",V6_7,"Volume of the air delivered")
+W = ((3*n*R*T1)/(n-1))*((P21)^((n-1)/n)-1);
+disp("kJ",W,"Work done per kg of the air is")