summaryrefslogtreecommitdiff
path: root/3821/CH7/EX7.8/Example7_8.sce
blob: 0214e40133c3925e42c76da1956625f267263454 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
///Chapter No 7 Fluid Mechanics
////Example 7.8 Page No:118
/// Find Power required to maintain the speed of upper plate
//Input data
clc;
clear;
dy=1.5*10^-4;      //Two horizontal plates are placed in m
mu=0.12;            //Space between plates  Ns/m**2
A=2.5;              //Upper area is required to move in m**2
du=0.6;             //Speed rerlated to lower plate in m/s


////(1)Calculation
tau=mu*(du/dy);   //Shear stress N/m**2
F=tau*A;            //Force in N
P=F*du;             //Power required to maintain the speed of upper plate in W


//Output 
printf('Shear stress=%f N/m^2 \n ',tau);
printf('Force=%f N \n ',F);
printf('Power required to maintain the speed of upper plate=%f W \n ',P);