initial commit / add all books

1 files changed, 35 insertions, 0 deletions

diff --git a/1808/CH3/EX3.23/Chapter3_Exampl23.sce b/1808/CH3/EX3.23/Chapter3_Exampl23.sce
new file mode 100644
index 000000000..13274156a
--- /dev/null
+++ b/1808/CH3/EX3.23/Chapter3_Exampl23.sce
@@ -0,0 +1,35 @@
+clc

+clear

+//INPUT DATA

+l=20;//Stroke in cm

+d=15;//Bore in cm

+N=400;//speed in rpm

+Rc=22;//compression ratio

+p1=101.325;//Pressure in kN/m^2

+t1=303;//temperature in K

+n1=1.3;//no of cycles

+n2=1.35;//no of cycles

+g=1.4;//constant

+cp=1.005;//specific pressure

+cv=0.718;//specific volume

+R=0.287;//gas constnat

+v1=0.003698;//specific volume in m^3/s

+vs=0.00353;//specific volume in m^3/s

+ro=2.68;//cutoff ratio

+

+//CALCULATIONS

+p2=p1*(Rc^(n1));//pressure in kN/m^2

+t2=t1*(Rc^(n1-1));//temperature in K

+t3=t2*(ro);//temperature in K

+p4=p2*((ro/Rc)^n2);//maximum pressure in kN/m^2

+t4=t3*(1/((Rc/ro)^(n2-1)));//maximum temperature in K

+m=p1*v1/(R*t1);//mass flow rate in kg/s

+wn=R*((t3-t2)+((t3-t4)/(n2-1))-((t2-t1)/(n1-1)));//work done in kJ/kg

+pm=wn*m/(vs);//mean effective pressure in kN/m^2

+Qs=cp*(t3-t2);//heat supplied in kJ/kg

+nd=(wn/Qs)*100;//thermal efficiency in percentage

+P=wn*m*N/60;//POWER DEVELOPED

+

+//OUTPUT

+printf('(a)The temperature and pressure at all corner points are \n  pressure at point 1 is %3.2f kN/m^2 \n temperature at point 2 is %3.2f K \n  temperature at point 3 is %3.2f K \n maximum pressure is %3.2f kN/m^2 \n temperature at point 4 is %3.2f K \n(b)The mean effective pressure is %3.3f kN/m^2 \n (c)Thermal efficiency is %3.2f percentage \n (d)Power developed is %3.2f kJ/s ',p2,t2,t3,p4,t4,pm,nd,P)

+