1 files changed, 15 insertions, 0 deletions
diff --git a/2762/CH3/EX3.1.5/3_1_5.sce b/2762/CH3/EX3.1.5/3_1_5.sce
new file mode 100755
index 000000000..eba51209a
--- /dev/null
+++ b/2762/CH3/EX3.1.5/3_1_5.sce
@@ -0,0 +1,15 @@
+//Transport Processes and Seperation Process Principles
+//Chapter 3
+//Example 3.1-5
+//Principles of Momentum Transfer and Applications
+//given data
+p=[0.25 0.40 0.35];//percentages of diff particle sizes
+s=[25 50 75];//sizes of the particles in mm
+phi=0.68;//sphericity
+sump=0
+for i=1:3
+    term=p(1,i)/(phi*s(1,i))
+    sump=sump+term
+end
+Dpm=1/sump;
+mprintf("mean diameter= %f mm",Dpm)