summaryrefslogtreecommitdiff
path: root/800/CH11
diff options
context:
space:
mode:
Diffstat (limited to '800/CH11')
-rwxr-xr-x800/CH11/EX11.1/11_1.sce8
-rwxr-xr-x800/CH11/EX11.3/11_3.sce22
-rwxr-xr-x800/CH11/EX11.4/11_4.sce6
-rwxr-xr-x800/CH11/EX11.5/11_5.sce7
4 files changed, 43 insertions, 0 deletions
diff --git a/800/CH11/EX11.1/11_1.sce b/800/CH11/EX11.1/11_1.sce
new file mode 100755
index 000000000..61ceebb13
--- /dev/null
+++ b/800/CH11/EX11.1/11_1.sce
@@ -0,0 +1,8 @@
+//clear//
+clc
+clear
+exec("11.1data.sci");
+WAZ1=DAB*CT0*(yAb-yAs)/s;
+WAZ2=c*DAB*CT0*log((1-yAs)/(1-yAb))/s;
+disp(WAZ1)
+disp(WAZ2)
diff --git a/800/CH11/EX11.3/11_3.sce b/800/CH11/EX11.3/11_3.sce
new file mode 100755
index 000000000..a8089f8c4
--- /dev/null
+++ b/800/CH11/EX11.3/11_3.sce
@@ -0,0 +1,22 @@
+clc
+clear
+exec("11.3data.sci");
+//this is only Part A of the problem.
+dp=(6*(D^2)*L/4)^(1/3);
+disp("Particle diameter dp =")
+disp(dp)
+disp("m")
+ac=6*(1-phi)*(1/dp);
+disp("Surface area pervolume of bed =")
+disp(ac)
+disp("m^2/m^3")
+Re =dp*U/v;
+Y=(2*r*Lp+2*r^2)/dp^2;
+Reprime=Re/((1-phi)*Y);
+DAB=DAB0*(T/T0)^(1.75);
+Sc=v/DAB;
+Shprime=((Reprime)^.5)*Sc^(1/3);
+kc=DAB*(1-phi)*Y*(Shprime)/(dp*phi);
+X=1-exp(-kc*ac*z/U);
+disp("X =")
+disp(X)
diff --git a/800/CH11/EX11.4/11_4.sce b/800/CH11/EX11.4/11_4.sce
new file mode 100755
index 000000000..cf68df236
--- /dev/null
+++ b/800/CH11/EX11.4/11_4.sce
@@ -0,0 +1,6 @@
+clc
+clear
+exec("11.4data.sci")
+X2=1-(1/exp((log(1/(1-X1)))*(1/2)*((2)^.5)));
+disp("X2 =")
+disp(X2) \ No newline at end of file
diff --git a/800/CH11/EX11.5/11_5.sce b/800/CH11/EX11.5/11_5.sce
new file mode 100755
index 000000000..7be1b1b00
--- /dev/null
+++ b/800/CH11/EX11.5/11_5.sce
@@ -0,0 +1,7 @@
+//clear//
+clc
+clear
+exec("11.5data.sci")
+X2=1-(1/exp((log(1/(1-X1)))*((T2/T1)^(5/12))));
+disp("X2 =")
+disp(X2)