1 files changed, 16 insertions, 0 deletions
diff --git a/2762/CH13/EX13.2.2/13_2_2.sce b/2762/CH13/EX13.2.2/13_2_2.sce
new file mode 100755
index 000000000..0b2dcd1ec
--- /dev/null
+++ b/2762/CH13/EX13.2.2/13_2_2.sce
@@ -0,0 +1,16 @@
+//Transport Processes and Seperation Process Principles
+//Chapter 13
+//Example 13.2-2
+//Membrane Seperation Processes
+//given data
+//nomenclature similar to previous problem
+c1=200;//urea in g/m3
+c2=0;
+kc1=1.25e-5;
+pm=8.73e-6;
+kc2=3.33e-5;
+Na= (c1-c2)/((1/kc1)+(1/pm)+(1/kc2));
+A=2;//area in m2
+R=Na*3600*A;//rate of removal
+mprintf("flux=%f g/s m2",Na)
+mprintf("rate of removal= %f g urea/h",R)