initial commit / add all books

1 files changed, 26 insertions, 0 deletions

diff --git a/2762/CH3/EX3.2.1/3_2_1.sce b/2762/CH3/EX3.2.1/3_2_1.sce
new file mode 100755
index 000000000..89c3c9e1e
--- /dev/null
+++ b/2762/CH3/EX3.2.1/3_2_1.sce
@@ -0,0 +1,26 @@
+//Transport Processes and Seperation Process Principles

+//Chapter 3

+//Example 3.2-1

+//Principles of Momentum Transfer and Applications

+//given data

+rho=1.043;//density of air at 328.5K in kg/m3

+v=23;//velocity of air in m/s

+D=0.6;//diameter of a cylinder

+mu=2.03/100000;//viscosity of air Pa.s

+delh=0.205;// 0.205m of water pitot tube reading

+rhow=1000;//density of water 

+delP=delh*(rhow-rho)*9.80665;//pressure diff and g=9.80655 m/s2

+patm=101325;//atm pressure in pascals

+p1=patm+0.02008*100000;//absolute pressure+ pressure diff

+rhoc=(p1/patm)*1.043;//corrected air density

+delH=10.7/1000;//manometer reading, m of water

+Cp=0.98;

+delP=delH*(rhow-rhoc)*9.80655;//pressure diff in Pa

+v=Cp*((2*delP)/rhoc)^0.5;//max vel at center

+Re=D*v*rhoc/mu;//Reynolds Number

+vr=0.85;//from the given graph the ratio of avg vel/max vel is 0.85

+vavg=vr*v;//the average velcity in m/s

+mprintf(" average velcity = %f m/s",vavg)

+A=(3.14/4)*(D*D);//cross sec area in m2

+V=A*vavg;//volumetric flow rate in m3/s

+mprintf("volumetric flow rate = %f m3/s",V)