blob: bdc9c1d1df8a4ec611c1953661bc385078f03d99 (
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
|
// A Textbook of Fluid Mecahnics and Hydraulic Machines - By R K Bansal
// Chapter 1-Properties of Fluid
// Problem 1.32
//Given Data Set in the Problem
visc=5/10
D=0.5
N=200
L=100/10^3
t=1*10^-3
//Calculations
//Using , tangential velocity=(pi*D*N)/60
u_tang=%pi*D*N/60
du=u_tang-0
dy=t
du_dy=du/dy
ss=visc*(du_dy) //Shear stress =viscosity*Velocity gradient
Area=%pi*D*L
F_shear=ss*Area
T=F_shear*D/2 //Torque=Shear force*D/2
Power_lost=T*(2*%pi*N/60) //Power lost =Torque*(2*pi*N/60)
mprintf("ThePower lost by the sleeve of 100m in oil is %f kW",Power_lost*10^-3)
|