summaryrefslogtreecommitdiff
path: root/1962/CH1/EX1.6/example1_6.sce
blob: 57d3e32fa417f38b35a6eb3b4ef3cc07e8e90c63 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//example 1.6
//page 20
clc; funcprot(0);
//initialisation of variable
mu=0.09//viscosity
U=1;//velocity
Y=1/1000;//clearence
L=0.2;
d=0.05;
pi=3.14;
sigma=mu*U/Y;//stress
A=pi*d*L;
F=A*sigma;
disp(F,"Force applied (N)=");
clear