initial commit / add all books

6 files changed, 90 insertions, 0 deletions

diff --git a/1052/CH11/EX11.2/112.sce b/1052/CH11/EX11.2/112.sce
new file mode 100755
index 000000000..6f3b218e2
--- /dev/null
+++ b/1052/CH11/EX11.2/112.sce
@@ -0,0 +1,15 @@
+clc;

+//Example 11.2

+//Page no. 113

+printf("Example 11.2-Page no.113\n\n")

+//given

+//Pressure(P),Temp.(T),Molecular wt. of gas(M)

+P=1//atm

+T_d=60//degree F

+M=29//gram

+//Gas constant R

+R=.73

+T=T_d+460//  rankin

+//density of gaS

+rho=(P*M)/(R*T)

+printf("density of gas rho =%flb/ft^3",rho)

diff --git a/1052/CH11/EX11.3/113.sce b/1052/CH11/EX11.3/113.sce
new file mode 100755
index 000000000..f830aa86e
--- /dev/null
+++ b/1052/CH11/EX11.3/113.sce
@@ -0,0 +1,15 @@
+clc

+//Example 11.3

+//Page no. 114

+printf("Example 11.3-Page no. 114\n\n")

+//given

+//standard volumetric flowrate of a gas stream(Qs),standard conditions,actual conditions

+ Qs=2000//scfm

+ Ps=1//atm

+ Ts=60//degree F

+ Pa=1//atm

+ Ta=700//degree F

+Ta=Ta+460//rankin

+Ts=Ts+460//rankin

+ Qa=Qs*(Ta/Ts)*(Ps/Pa)

+printf("actual volumetric flowrate Qa=%f acfm",Qa)

diff --git a/1052/CH11/EX11.4/114.sce b/1052/CH11/EX11.4/114.sce
new file mode 100755
index 000000000..c6963d0aa
--- /dev/null
+++ b/1052/CH11/EX11.4/114.sce
@@ -0,0 +1,14 @@
+clc

+//Example 11.4

+//Page no. 115

+printf("Example 11.4-Page no. 115\n\n")

+//given

+//mass flowrate of flue gas ,average moleculer weight flue gas,standard conditions

+ m=50//lb/min

+ M=29//lb/lbmol

+ Ts=60//degree F

+ Ps=1//atm

+ R=0.73//atm.ft^3/(lbmol.degree R)

+ Ts=Ts+460//rankin

+ Qs=(m/M)*(R*Ts/Ps)

+ printf("standard volumetric flowrate Qs=%f scfm",Qs)

diff --git a/1052/CH11/EX11.5/115.sce b/1052/CH11/EX11.5/115.sce
new file mode 100755
index 000000000..a370d96bc
--- /dev/null
+++ b/1052/CH11/EX11.5/115.sce
@@ -0,0 +1,13 @@
+clc

+//Example 11.5

+//Page no. 116

+printf("Example 11.5-Page no.1 116\n\n")

+//given

+//specific volume(V),temperature(T),pressure(P)

+V=12.084//ft^3/lb

+T=70//degree F

+P=1//atm

+R=0.73

+T=T+460//rankin

+Mw=(R*T)/(P*V)

+printf("molecular weight of gas Mw=%f",Mw)

diff --git a/1052/CH11/EX11.6/116.sce b/1052/CH11/EX11.6/116.sce
new file mode 100755
index 000000000..a3c78492f
--- /dev/null
+++ b/1052/CH11/EX11.6/116.sce
@@ -0,0 +1,15 @@
+clc;

+//Example 11.6

+//page no 118

+printf("Example 11.6 page no 118\n\n");

+clear;

+//first and second viral coeff.

+B=-0.159//m^3/kgmol

+C=0.009//(m^3/kgmol)^2

+V_new=0

+V=0.820;

+for i=1:3

+    V_new=(1+(B)/V+(C)/(V^2))/1.22

+    V=V_new

+end

+printf("\nVolume of gas V=%f L/gmol",V)

diff --git a/1052/CH11/EX11.7/117.sce b/1052/CH11/EX11.7/117.sce
new file mode 100755
index 000000000..3a12cd6db
--- /dev/null
+++ b/1052/CH11/EX11.7/117.sce
@@ -0,0 +1,18 @@
+clc;

+//Example 11.7

+//page no 118

+printf("Example 11.7 page no 118\n\n");

+//given

+T_c=343// critical temperature,deg R

+P_c=45.4//critical pressure,atm

+//emplying redlich kwong (R-K)equation

+R=0.73//gas constant 

+a=round(0.42748*R^2*T_c^2.5/P_c)//R-k constant

+b=0.08664*R*T_c/P_c//R-k constant

+ //   V_new=[[490/(V-b)]-[a/(25.9*V*V+b)]]/10

+ // V=V_new

+//by trial and error method

+V=48.8

+printf("\n Volume V=%f ft^3/lbmol ",V);

+

+