summaryrefslogtreecommitdiff
path: root/2078/CH10/EX10.4/Example10_4.sce
blob: 42c54883d9b078ce5cbad99562751e30f643b7b4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//Exa 10.4
clc;
clear;
close;
//Given data :
L=150;//m
wc=1;//kg
A=1.25;//cm^2
U_stress=4200;//kg/cm^2
Pw=100;//kg/m^2(Wind pressure)
SF=4;//factor of safety
W_stress=U_stress/SF;//kg/cm^2
T=W_stress*A;//kg
d=sqrt(A/(%pi/4));//cm
w_w=Pw*d*10^-2;//kg
wr=sqrt(wc^2+w_w^2);//kg
S=wr*L^2/8/T;//m
disp(S,"Maximum sag(m)");