summaryrefslogtreecommitdiff
path: root/49/CH7/EX7.8/ex8.sce
blob: c3ecc51e2ee2cba09db9b222780ddcd68748540f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//CHAPTER 7_ Flow Measurement
//Caption : Constant-Pressure-Drop , Variable-Area Meters(Rotameters)
// Example 8// Page 455
Qd=.1/60    //('enter the maximum flow of water=:')
t=298  //('enter the temperature in k=:')
d=.03  //('enter the float diameter in m=:')
L=0.5  //('enter the total length of rotameter=:')
D=.03  //('enter the diameter of tube at inlet=:')
Vb=25*10^-6  //('enter the total volume of float=:')
Af=7.068*10^-4    // area of float
j=2*9.81*Vb/Af;
y=L;
disp("Tube taper is given by:")
disp("a=(Qd*2)/(%pi*D*y*j^(1/2))")
a=(Qd*2)/(%pi*D*y*j^(1/2));
printf('tube taper is %1.4f m/m(taper)\n',a)