blob: f314f60302f1e858c326818fb82e766f657b8546 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
clc;
clear all;
disp("Total power required")
L=50;//m
D=5;//m
U=8;//m/s
ta=20;// degree C
rho=1030;//kg/m^3
v=10^(-6);//m^2/s
ReL=U*L/v;
Rex=5*10^5;
x=Rex*v/U;
Cf=0.455/(log10(ReL))^2.58;
A=%pi*D*L;//m^2
Fd=Cf*0.5*rho*A*U^2;
P=Fd*U/1000;//kW
disp("kW",P,"Power required =")
|
