summaryrefslogtreecommitdiff
path: root/858/CH4/EX4.12/example_12.sce
blob: 0d524f6f804691913f51645f1ec0b36a4d47c1e3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
clc
clear 
printf("example 4.12 page number 143\n\n")

//to find the power requirements

Q=3800/(24*3600)    //in m3/s
d=0.202    //in m

u=Q/((3.14/4)*d^2);    //in m/s
delta_P=5.3*10^6    //in Pa
density=897    //in kg/m3
F=delta_P/density;    //in J/kg
ws=9.8*30+F;
mass_flow_rate= Q*density;
power=(ws*mass_flow_rate)/0.6;

printf("power required = %f kW",power/1000)