blob: a4b1eea3a549b702151ea2a1a5265f5c6a8e9829 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
//A Textbook of Chemical Engineering Thermodynamics
//Chapter 5
//Some Applications of the Laws of Thermodynamics
//Example 1
clear;
clc;
//Given:
u1 = 1; //entering velocity of water (m/s)
d_ent = 0.2; //entrance diameter of reducer (m)
d_exit = 0.1; //exit diameter of reducer (m)
P_ent = 105; //pressure at entrance (kPa)
z = 5; //distance between entrance and exit (m)
g = 9.81; //acceleration due to gravity
den = 1000; //density of water (kg/m^3)
//To calculate the pressure at exit
A1 = (%pi/4)*d_ent^2; //cross section area of entrance (m^2)
A2 = (%pi/4)*d_exit^2; //cross section area of exit (m^2)
//By the equation of continuity and since density of water remains constant
u2 = (A1*u1)/A2;
//By Bernoulli's equation between section 1 and 2 (Eq 5.20 Page no. 118)
P_exit = (-((u2^2-u1^2)/2)-(g*z)+(P_ent*10^3/den))*(den/10^3);
mprintf('The pressure at exit is %f kPa',P_exit);
//end
|
