1 files changed, 9 insertions, 0 deletions
diff --git a/443/CH4/EX4.1/4_1.sce b/443/CH4/EX4.1/4_1.sce
new file mode 100755
index 000000000..511844b05
--- /dev/null
+++ b/443/CH4/EX4.1/4_1.sce
@@ -0,0 +1,9 @@
+pathname=get_absolute_file_path('4_1.sce')
+filename=pathname+filesep()+'4_1_data.sci'
+exec(filename)
+//Change in efficiency with respect to efficiency
+//z=dn/n
+n=1-((1/r)^(y-1))
+z=-((1-n)*(y-1)*log(8)*(dCv))/n
+printf("\n\nRESULTS\n\n")
+printf("\nThe effect of efficiency on Otto cycle is %f",z*100)
+\ No newline at end of file