summaryrefslogtreecommitdiff
path: root/2762/CH2/EX2.7.1/2_7_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '2762/CH2/EX2.7.1/2_7_1.sce')
-rwxr-xr-x2762/CH2/EX2.7.1/2_7_1.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/2762/CH2/EX2.7.1/2_7_1.sce b/2762/CH2/EX2.7.1/2_7_1.sce
new file mode 100755
index 000000000..80c44fd45
--- /dev/null
+++ b/2762/CH2/EX2.7.1/2_7_1.sce
@@ -0,0 +1,22 @@
+//Transport Processes and Seperation Process Principles
+//Chapter 2
+//Example 2.7-1
+//Principles of Momentum Transfer and Overall Balances
+//given data
+//Q=(z2-z1)*g+(v2^2-v1^2)/2 + (H2-H1)
+//for KE terms
+v1=1.52;//velociy of inlet stream
+v2=9.14;//velocity of exit stream
+KE=((v1^2)-(v2^2))/2;
+//for PE terms
+z1=0 ,// (z2-z1)*g
+z2=15.2;//ht of exit stream
+g=9.80665;// g force
+PE=(z2-z1)*g;
+//enthalpy change
+H2=2771.4*1000;//exit ,enthalpy data from appendix
+H1=76.97*1000;//inlet enthalpy
+H=H2-H1;
+Q=KE+PE+H;
+mprintf("the amount of heat to be added %f J/kg",Q)
+//end