summaryrefslogtreecommitdiff
path: root/629/CH9/EX9.1/example9_1.sce
blob: 0a5ae501e8242eccf2fb728217b0a3a7bf7f5b56 (plain)
1
2
3
4
5
6
7
8
clear
clc
//Example 9.1 SHEAR STRESS IN COUETTE FLOW
U=1; //speed of upper plate [m/s]
L=3*10^-4; //distance between the plates [m]
mu=1*10^-1; //[N.s/m^2]
tau=mu*U/L //shear stress [N/m^2]
printf("\nThe shear stress on the plates = %.f N/m^2.\n",tau)