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

---
 2837/CH19/EX19.1/Ex19_1.sce   | 32 ++++++++++++++++++++++++++++++++
 2837/CH19/EX19.10/Ex19_10.sce | 13 +++++++++++++
 2837/CH19/EX19.11/Ex19_11.sce | 27 +++++++++++++++++++++++++++
 2837/CH19/EX19.12/Ex19_12.sce | 24 ++++++++++++++++++++++++
 2837/CH19/EX19.13/Ex19_13.sce | 16 ++++++++++++++++
 2837/CH19/EX19.2/Ex19_2.sce   | 22 ++++++++++++++++++++++
 2837/CH19/EX19.3/Ex19_3.sce   | 17 +++++++++++++++++
 2837/CH19/EX19.4/Ex19_4.sce   | 21 +++++++++++++++++++++
 2837/CH19/EX19.5/Ex19_5.sce   | 23 +++++++++++++++++++++++
 2837/CH19/EX19.6/Ex19_6.sce   | 11 +++++++++++
 2837/CH19/EX19.7/Ex19_7.sce   | 14 ++++++++++++++
 2837/CH19/EX19.8/Ex19_8.sce   | 14 ++++++++++++++
 2837/CH19/EX19.9/Ex19_9.sce   | 11 +++++++++++
 13 files changed, 245 insertions(+)
 create mode 100755 2837/CH19/EX19.1/Ex19_1.sce
 create mode 100755 2837/CH19/EX19.10/Ex19_10.sce
 create mode 100755 2837/CH19/EX19.11/Ex19_11.sce
 create mode 100755 2837/CH19/EX19.12/Ex19_12.sce
 create mode 100755 2837/CH19/EX19.13/Ex19_13.sce
 create mode 100755 2837/CH19/EX19.2/Ex19_2.sce
 create mode 100755 2837/CH19/EX19.3/Ex19_3.sce
 create mode 100755 2837/CH19/EX19.4/Ex19_4.sce
 create mode 100755 2837/CH19/EX19.5/Ex19_5.sce
 create mode 100755 2837/CH19/EX19.6/Ex19_6.sce
 create mode 100755 2837/CH19/EX19.7/Ex19_7.sce
 create mode 100755 2837/CH19/EX19.8/Ex19_8.sce
 create mode 100755 2837/CH19/EX19.9/Ex19_9.sce

(limited to '2837/CH19')

diff --git a/2837/CH19/EX19.1/Ex19_1.sce b/2837/CH19/EX19.1/Ex19_1.sce
new file mode 100755
index 000000000..02112e650
--- /dev/null
+++ b/2837/CH19/EX19.1/Ex19_1.sce
@@ -0,0 +1,32 @@
+clc
+clear
+//Initalization of variables
+n=1.4
+t1=540 //R
+tmax=1200 //F
+tmax2=1500 //F
+pr=5
+cp=0.24
+//calculations
+t2=t1*(pr)^((n-1)/n)
+work=cp*(t2-t1)
+t4=(tmax+460) /pr^((n-1)/n)
+twork=cp*(tmax+460-t4)
+net=twork-work
+eff=1- 1/pr^((n-1)/n)
+Qs=cp*(tmax+460-t2)
+ett=net/Qs *100
+t42=(tmax2+460)/pr^((n-1)/n)
+twork2=cp*(tmax2+460-t42)
+net2=twork2-work
+Qs2=cp*(tmax2+460-t2)
+eff3=net2/Qs2 *100
+//results
+printf("Compressor work = %.1f Btu/lb",work)
+printf("\n Turbine work = %.1f Btu/lb",twork)
+printf("\n Net work = %.1f Btu/lb",net)
+printf("\n Thermal efficiency = %.1f percent",eff*100)
+printf("\n In case 2, Thermal efficiency = %.1f percent",ett)
+printf("\n In case 2, Turbine work = %.1f Btu/lb",twork2)
+printf("\n In case 2, Net work = %.1f Btu/lb",net2)
+printf("\n In case 3, Thermal efficiency = %.1f percent,",eff3)
diff --git a/2837/CH19/EX19.10/Ex19_10.sce b/2837/CH19/EX19.10/Ex19_10.sce
new file mode 100755
index 000000000..8e0abbba3
--- /dev/null
+++ b/2837/CH19/EX19.10/Ex19_10.sce
@@ -0,0 +1,13 @@
+clc
+clear
+//Initalization of variables
+cp=0.24
+h=138.8
+t3=1960 //R
+//calculations
+t4d=t3-h/cp
+Qs=cp*(t3-t4d)
+work=43.9 //Btu/lb
+etat=work/Qs *100
+//results
+printf("Thermal efficiency of the unit = %.1f percent",etat)
diff --git a/2837/CH19/EX19.11/Ex19_11.sce b/2837/CH19/EX19.11/Ex19_11.sce
new file mode 100755
index 000000000..3946cb9f3
--- /dev/null
+++ b/2837/CH19/EX19.11/Ex19_11.sce
@@ -0,0 +1,27 @@
+clc
+clear
+//Initalization of variables
+n=1.4
+t1=540 //R
+tmax=1500 //F
+pr=5
+cp=0.24
+p1=14 //psia
+p3=70 //psia
+//calculations
+pint=p1*sqrt(pr)
+t2=t1*(pint/p1)^((n-1)/n)
+t4=t1*(p3/pint)^((n-1)/n)
+w=cp*(t4-t1)
+w2=2*w
+t6=(tmax+460)/(p3/pint)^((n-1)/n)
+t8=(tmax+460)/(pint/p1)^((n-1)/n)
+work=cp*(tmax+460-t6)
+w22=2*work
+net=w22-w2
+Qa=cp*(tmax+460-t2)
+Qb=cp*(tmax+460-t6)
+Qt=Qa+Qb
+eta=net/Qt*100
+//results
+printf("Thermal efficiency = %.2f percent",eta)
diff --git a/2837/CH19/EX19.12/Ex19_12.sce b/2837/CH19/EX19.12/Ex19_12.sce
new file mode 100755
index 000000000..50de73b37
--- /dev/null
+++ b/2837/CH19/EX19.12/Ex19_12.sce
@@ -0,0 +1,24 @@
+clc
+clear
+//Initalization of variables
+n=1.4
+t1=540 //R
+tmax=1500 //F
+pr=5
+cp=0.24
+p1=14 //psia
+p3=70 //psia
+w2=75.9 //Btu/lb
+Qa=265 //Btu/lb
+//calculations
+pint=p1*sqrt(pr)
+t6=(tmax+460)/(p3/pint)^((n-1)/n)
+t8=(tmax+460)/(pint/p1)^((n-1)/n)
+work=cp*(tmax+460-t6)
+w22=2*work
+net=w22-w2
+Qb=cp*(tmax+460-t6)
+Qt=Qa+Qb
+eta=net/Qt*100
+//results
+printf("Thermal efficiency = %.1f percent",eta)
diff --git a/2837/CH19/EX19.13/Ex19_13.sce b/2837/CH19/EX19.13/Ex19_13.sce
new file mode 100755
index 000000000..de3027d69
--- /dev/null
+++ b/2837/CH19/EX19.13/Ex19_13.sce
@@ -0,0 +1,16 @@
+clc
+clear
+//Initalization of variables
+n=1.4
+t1=540 //R
+tmax=1500 //F
+pr=5
+cp=0.24
+t3=1558 //R
+net=125.8 //Btu/lb
+//calculations
+Q=cp*(tmax+460-t3)
+Qt=2*Q
+eta=net/Qt*100
+//results 
+printf("Thermal efficiency = %.1f percent",eta)
diff --git a/2837/CH19/EX19.2/Ex19_2.sce b/2837/CH19/EX19.2/Ex19_2.sce
new file mode 100755
index 000000000..0c253cf0f
--- /dev/null
+++ b/2837/CH19/EX19.2/Ex19_2.sce
@@ -0,0 +1,22 @@
+clc
+clear
+//Initalization of variables
+work=75.9 //Btu/lb
+twork=173.5 //Btu/lb
+eta=0.8
+t2=856 //R
+t1=540 //R
+t4=1960 //R
+cp=0.24
+//calculations
+cwork=work/eta
+internal=twork*eta
+net=-cwork+internal
+t2d=(t2-t1)/eta + t1
+Qs=cp*(t4-t2d)
+eff=net/Qs *100
+//results
+printf("Indicated compressor work = %.1f Btu/lb",cwork)
+printf("\n Internal work = %.1f Btu/lb",internal)
+printf("\n Net work = %.1f Btu/lb",net)
+printf('\n Thermal efficiency = %.2f percent",eff)
diff --git a/2837/CH19/EX19.3/Ex19_3.sce b/2837/CH19/EX19.3/Ex19_3.sce
new file mode 100755
index 000000000..2906083e6
--- /dev/null
+++ b/2837/CH19/EX19.3/Ex19_3.sce
@@ -0,0 +1,17 @@
+clc
+clear
+//Initalization of variables
+eff=0.97
+c1=94.9 //Btu/lb
+c2=138.8 //Btu/lb
+ntee=246 //Btu/lb
+//calculations
+cwork=c1/eff
+twork=c2*eff
+net=twork-cwork
+etat=net/ntee *100
+//results
+printf("Compressor work = %.1f Btu/lb",cwork)
+printf("\n Turbine work = %.1f Btu/lb",twork)
+printf("\n Net work = %.1f Btu/lb",net)
+printf("\n Thermal efficiency = %.1f percent",etat)
diff --git a/2837/CH19/EX19.4/Ex19_4.sce b/2837/CH19/EX19.4/Ex19_4.sce
new file mode 100755
index 000000000..1851ae34e
--- /dev/null
+++ b/2837/CH19/EX19.4/Ex19_4.sce
@@ -0,0 +1,21 @@
+clc
+clear
+//Initalization of variables
+pr=5
+p1=14 //psia
+pd=3 //psi
+pen=70 //psia
+tin=1960  //R
+n=1.4
+cp=0.24
+Qs=265 //Btu/lb
+//calculations
+p2=p1*pr
+pe=pen-pd
+prt=pe/p1
+tex=tin/prt^((n-1)/n)
+twork=cp*(tin-tex)
+net=twork-75.9
+eff=net/Qs *100
+//results
+printf("Thermal efficiency = %.1f percent",eff)
diff --git a/2837/CH19/EX19.5/Ex19_5.sce b/2837/CH19/EX19.5/Ex19_5.sce
new file mode 100755
index 000000000..b775ca94d
--- /dev/null
+++ b/2837/CH19/EX19.5/Ex19_5.sce
@@ -0,0 +1,23 @@
+clc
+clear
+//Initalization of variables
+pr=5
+p1=14 //psia
+pd=3 //psi
+pen=70 //psia
+tin=1960  //R
+n=1.4
+cp=0.24
+Qs=265
+ef=0.95
+//calculations
+p2=p1*pr
+pe=pen-pd
+prt=pe/p1
+tex=tin/prt^((n-1)/n)
+twork=cp*(tin-tex)
+net=twork-75.9
+Qs2=Qs/ef
+eff=net/Qs2 *100
+//results
+printf("Thermal efficiency = %.1f percent",eff)
diff --git a/2837/CH19/EX19.6/Ex19_6.sce b/2837/CH19/EX19.6/Ex19_6.sce
new file mode 100755
index 000000000..2f1d174f0
--- /dev/null
+++ b/2837/CH19/EX19.6/Ex19_6.sce
@@ -0,0 +1,11 @@
+clc
+clear
+//Initalization of variables
+pr1=1.0590
+pr2=4.396
+p1=14 //psia
+//calculations
+prr=pr2/pr1
+p2=p1*prr
+//results
+printf("Final pressure = %.1f psia",p2)
diff --git a/2837/CH19/EX19.7/Ex19_7.sce b/2837/CH19/EX19.7/Ex19_7.sce
new file mode 100755
index 000000000..6aca930a6
--- /dev/null
+++ b/2837/CH19/EX19.7/Ex19_7.sce
@@ -0,0 +1,14 @@
+clc
+clear
+//Initalization of variables
+t1=540 //R
+h1=129.06
+pr1=1.386
+cr=5
+//calculations
+pr2=pr1*cr
+disp("From air tables,")
+h2=204.63
+cwork=h2-h1
+//results
+printf("Compressor work = %.2f Btu/lb",cwork)
diff --git a/2837/CH19/EX19.8/Ex19_8.sce b/2837/CH19/EX19.8/Ex19_8.sce
new file mode 100755
index 000000000..49d069a4a
--- /dev/null
+++ b/2837/CH19/EX19.8/Ex19_8.sce
@@ -0,0 +1,14 @@
+clc
+clear
+//Initalization of variables
+cr=5
+pr3=176.73 //psia
+h3=14580.3 //Btu/mol
+M=28.9
+//calculations
+pr4=pr3/cr
+h4=9409
+twork=h3-h4
+turb=twork/M
+//results
+printf("Turbine work = %.1f Btu/lb",turb)
diff --git a/2837/CH19/EX19.9/Ex19_9.sce b/2837/CH19/EX19.9/Ex19_9.sce
new file mode 100755
index 000000000..c2d32e4ef
--- /dev/null
+++ b/2837/CH19/EX19.9/Ex19_9.sce
@@ -0,0 +1,11 @@
+clc
+clear
+//Initalization of variables
+chem=19000 //Btu/lb
+m1=204.63 //Btu/lb
+M=28.9
+w=14580.3
+//calculations
+ma=(chem-w/M)/(w/M -m1)
+//results
+printf("Air fuel ratio = %.1f lb air/lb fuel",ma)
-- 
cgit