1 files changed, 32 insertions, 0 deletions
diff --git a/1808/CH5/EX5.7/Chapter5_Exampl7.sce b/1808/CH5/EX5.7/Chapter5_Exampl7.sce
new file mode 100644
index 000000000..38a44ebf5
--- /dev/null
+++ b/1808/CH5/EX5.7/Chapter5_Exampl7.sce
@@ -0,0 +1,32 @@
+clc
+clear
+//INPUT DATA
+pa=1;//ambient pressure in bar
+ta=15;//temperature in Degree C
+ps1=0.98;//ambient pressure in bar
+ts1=30;//temperature in Degree C
+c=0.04;//clearance
+N=500;//speed in rpm
+p1=1;//ambient pressure
+p2=5;//discharge pressure
+n=1.3;//for cylinders
+
+//CALCULATIONS
+
+//Suction and ambient conditions are same
+vs=0.04*2*N;//swept volume in m^3/min
+nv=1+c-(c*(p2/p1)^(1/n));//volumetric efficiency in percentage
+v14=nv*(vs)/60;//volume in m^3/sec
+ip=(n/(n-1))*p1*100*(v14)*((p2/p1)^((n-1)/n)-1);//indicated power in kJ/min
+
+//Suction and ambient conditions are different
+nv1=1+c-(c*(p2/ps1)^(1/n));//volumetric efficiency in percentage
+v141=nv1*(vs)/60;//volume in m^3/sec
+ip1=(n/(n-1))*ps1*100*(v141)*(((p2/ps1)^((n-1)/n))-1);//indicated power in kJ/min
+vamb=p1*(ta+273)*(v141)/(pa*(ts1+273));//Air discharged in m^3/s
+
+//OUTPUT
+printf('(a)Suction and ambient conditions are same \n (i)Indicated power %3.2f kW \n (ii)air discharged is %3.4f m^3/s \n ',ip,v14)
+printf('(a)Suction and ambient conditions are different \n (i)Indicated power %3.2f kW \n (ii)air discharged is %3.4f m^3/s \n ',ip1,v141)
+
+