initial commit / add all books

13 files changed, 245 insertions, 0 deletions

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)