1 files changed, 16 insertions, 0 deletions
diff --git a/551/CH13/EX13.19/19.sce b/551/CH13/EX13.19/19.sce
new file mode 100755
index 000000000..25f36a543
--- /dev/null
+++ b/551/CH13/EX13.19/19.sce
@@ -0,0 +1,16 @@
+clc
+r=14; //let clearance volume be unity
+y=1.4;
+
+//When the fuel is cut-off at 5%
+rho1=5/100*(r-1)+1;
+n_diesel1=1-1/y/r^(y-1)*((rho1^y-1)/(rho1-1));
+
+//When the fuel is cut-off at 8%
+rho2=8/100*(r-1)+1;
+n_diesel2=1-1/y/r^(y-1)*((rho2^y-1)/(rho2-1));
+
+%loss=(n_diesel1-n_diesel2)*100;
+disp("percentage loss in efficiency due to delay in fuel cut off =")
+disp(%loss)
+disp("%")
+\ No newline at end of file