From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 2735/CH12/EX12.1/Ex12_1.sce | 19 +++++++++++++++++++
 2735/CH12/EX12.2/Ex12_2.sce | 20 ++++++++++++++++++++
 2735/CH12/EX12.3/Ex12_3.sce | 24 ++++++++++++++++++++++++
 2735/CH12/EX12.4/Ex12_4.sce | 21 +++++++++++++++++++++
 2735/CH12/EX12.5/Ex12_5.sce | 19 +++++++++++++++++++
 2735/CH12/EX12.6/Ex12_6.sce | 14 ++++++++++++++
 2735/CH12/EX12.7/Ex12_7.sce | 21 +++++++++++++++++++++
 2735/CH12/EX12.8/Ex12_8.sce | 23 +++++++++++++++++++++++
 8 files changed, 161 insertions(+)
 create mode 100755 2735/CH12/EX12.1/Ex12_1.sce
 create mode 100755 2735/CH12/EX12.2/Ex12_2.sce
 create mode 100755 2735/CH12/EX12.3/Ex12_3.sce
 create mode 100755 2735/CH12/EX12.4/Ex12_4.sce
 create mode 100755 2735/CH12/EX12.5/Ex12_5.sce
 create mode 100755 2735/CH12/EX12.6/Ex12_6.sce
 create mode 100755 2735/CH12/EX12.7/Ex12_7.sce
 create mode 100755 2735/CH12/EX12.8/Ex12_8.sce

(limited to '2735/CH12')

diff --git a/2735/CH12/EX12.1/Ex12_1.sce b/2735/CH12/EX12.1/Ex12_1.sce
new file mode 100755
index 000000000..d52728238
--- /dev/null
+++ b/2735/CH12/EX12.1/Ex12_1.sce
@@ -0,0 +1,19 @@
+clc
+clear
+//Initialization of variables
+p1=100 //psia
+p2=14.7 //psia
+k=1.4
+T1=700 //R
+R=10.73/29
+V=50
+cv=0.171
+cp=0.24
+R2=1.986/29
+//calculations
+T2=T1/ (p1/p2)^((k-1)/k)
+m1=p1*V/(R*T1)
+m2=p2*V/(R*T2)
+Wrev= cv*(m1*T1 - m2*T2) - (m1-m2)*(T2)*cp
+//results
+printf("Work done in case 1 = %d Btu",Wrev)
diff --git a/2735/CH12/EX12.2/Ex12_2.sce b/2735/CH12/EX12.2/Ex12_2.sce
new file mode 100755
index 000000000..83e38433a
--- /dev/null
+++ b/2735/CH12/EX12.2/Ex12_2.sce
@@ -0,0 +1,20 @@
+clc
+clear
+//Initialization of variables
+p1=100 //psia
+p2=10 //psia
+n=1.3
+T1=800 //R
+cv=0.172
+R=1.986/29
+T0=537 //R
+cp=0.24
+//calculations
+T2=T1*(p2/p1)^((n-1)/n)
+dwir=cv*(T1-T2)
+dwr=R*(T2-T1)/(1-n)
+dq=dwr-dwir
+dI=-T0*(cp*log(T2/T1) - R*log(p2/p1))
+//results
+printf("The friction of the process per pound of air = %.1f Btu/lbm",dq)
+printf("\n Loss of available energy = %.2f Btu/lbm",dI)
diff --git a/2735/CH12/EX12.3/Ex12_3.sce b/2735/CH12/EX12.3/Ex12_3.sce
new file mode 100755
index 000000000..2967007f3
--- /dev/null
+++ b/2735/CH12/EX12.3/Ex12_3.sce
@@ -0,0 +1,24 @@
+clc
+clear
+//Initialization of variables
+ms=10 //lbm
+den=62.3 //lbm/ft^3
+A1=0.0218 //ft^2
+A2=0.00545 //ft^2
+p2=50 //psia
+p1=100 //psia
+gc=32.2 //ft/s^2
+dz=30 //ft
+T0=537 //R
+T1=620 //R
+T2=420 //R
+//calculations
+V1=ms/(A1*den)
+V2=ms/(A2*den)
+df=-144/den*(p2-p1) - (V2^2 -V1^2)/(2*gc) - dz
+dI=-T0/T1 *df
+dI2= -T0/T2 *df
+//results
+printf("Friction = %.1f ft-lbf/lbm",df)
+printf("\n Available energy loss in case a = %.1f ft-lbf/lbm",dI)
+printf("\n Available energy loss in case b = %.1f ft-lbf/lbm",dI2)
diff --git a/2735/CH12/EX12.4/Ex12_4.sce b/2735/CH12/EX12.4/Ex12_4.sce
new file mode 100755
index 000000000..3adff26c3
--- /dev/null
+++ b/2735/CH12/EX12.4/Ex12_4.sce
@@ -0,0 +1,21 @@
+clc
+clear
+//Initialization of variables
+r=2.5 //in
+mf=160 //cfm
+rho=1/14
+mu=0.0000121
+v=14 //ft^3/lbm
+g=32.2 //ft/s^2
+z=100 //ft
+//calculations
+A=3.14*(r/12)^2
+V=mf/A /60
+Re=(2*r/12)*V*rho/mu
+disp("From fig 12.4,")
+f=0.0225/4
+dp=4*f*(rho)*(V/v)^2 /(2*g*(2*r/12)) *z
+//dp=2.32
+//results
+printf("Pressure drop = %.2f lbf/ft^2 100 ft",dp)
+disp("The answer in the textbook is wrong. Please use a calculator to verify it.")
diff --git a/2735/CH12/EX12.5/Ex12_5.sce b/2735/CH12/EX12.5/Ex12_5.sce
new file mode 100755
index 000000000..119022ede
--- /dev/null
+++ b/2735/CH12/EX12.5/Ex12_5.sce
@@ -0,0 +1,19 @@
+clc
+clear
+//Initialization of variables
+D=0.0724 //ft
+gc=32.2 //ft/s^2
+rho=1/14
+L=100 //ft
+mu2=1.46*10^(-10)
+dp=2.32
+dia=5 //in
+rho2=48500
+vol=14 //ft^3/lbm
+//calculations
+ref=D^3 *2*dp*gc*rho/(mu2*L)
+mf=rho2*%pi/4 *(dia/12) *sqrt(mu2)
+mfr=mf*vol*60
+//results
+printf("Mass rate of air flow = %d cfm",mfr)
+disp("The answer is a bit different due to rounding off error in textbook")
diff --git a/2735/CH12/EX12.6/Ex12_6.sce b/2735/CH12/EX12.6/Ex12_6.sce
new file mode 100755
index 000000000..ed6dd72b1
--- /dev/null
+++ b/2735/CH12/EX12.6/Ex12_6.sce
@@ -0,0 +1,14 @@
+clc
+clear
+//Initialization of variables
+cp=0.25
+T=3460 //R
+T0=520 //R
+dG=1228 //Btu/lbm
+//calculations
+hf=cp*(T-T0)-T0*cp*log(T/T0)
+dC=hf-dG
+Ec=hf/dG
+//results
+printf("Loss of available energy = %d Btu/lbm mixture ",dC)
+printf("\n Effectiveness of combustion = %.3f ",Ec)
diff --git a/2735/CH12/EX12.7/Ex12_7.sce b/2735/CH12/EX12.7/Ex12_7.sce
new file mode 100755
index 000000000..17d530815
--- /dev/null
+++ b/2735/CH12/EX12.7/Ex12_7.sce
@@ -0,0 +1,21 @@
+clc
+clear
+//Initialization of variables
+cp1=0.25
+T=3460 //R
+T0=946.2 //R
+T00=520 //R
+dG=1228 //Btu/lbm
+cp=0.45
+//calculations
+dqa=cp1*(T-T0)
+w=cp*dqa
+hf=cp1*(T-T00)-T00*cp1*log(T/T00)
+heat=w-hf
+eff=w/hf
+epower=w/dG
+//results
+printf("Loss of available energy = %.1f Btu/lbm mixture ",heat)
+printf("\n Efficiency of cycle = %.3f ",eff)
+printf("\n Effectiveness of overall cycle = %.2f",epower)
+disp("The answer is a bit different due to rounding off error in textbook")
diff --git a/2735/CH12/EX12.8/Ex12_8.sce b/2735/CH12/EX12.8/Ex12_8.sce
new file mode 100755
index 000000000..84c738348
--- /dev/null
+++ b/2735/CH12/EX12.8/Ex12_8.sce
@@ -0,0 +1,23 @@
+clc
+clear
+//Initialization of variables
+p1=400 //psia
+t1=600 //F
+h1=1306.9 //Btu/lbm
+b1=480.9 //Btu/lbm
+p2=50 //psia
+h2=1122 //Btu/lbm
+h3=1169.5 //Btu/lbm
+b3=310.9 //Btu/lbm
+//calculations
+disp("All the values are obtained from Mollier chart,")
+dw13=h1-h3
+dw12=h1-h2
+dasf=b3-b1
+etae=dw13/dw12
+eta=abs(dw13/dasf)
+dq=dw13+dasf
+//results
+printf("Engine efficiency = %.1f percent",etae*100)
+printf("\n Effectiveness = %.1f percent",eta*100)
+printf("\n Loss of available energy  = %.1f Btu/lbm",dq)
-- 
cgit