summaryrefslogtreecommitdiff
path: root/3683/CH1/EX1.13/Ex1_13.sce
blob: b5de4b312fec4e6b0d753e0b557570c1bf31fd7a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
//b=d/2 (given)
sigma_cbc=5//in MPa
sigma_st=140//in MPa
m=18.66//modular ratio
M=65*10^6//bending moment, in N-mm
//critical depth of neutral axis, Xc=d/(1+sigma_st/(m*sigma_cbc))=a*d
a=1/(1+sigma_st/(m*sigma_cbc))
d=(M/(sigma_cbc*a*(1-a/3)/4))^(1/3)//in mm
d=530//round-off, in mm
Xc=a*d//in mm
b=d/2//in mm
Ast=M/sigma_st/0.87/d//in sq mm
Ast=1007//round-off, in sq mm
mprintf("Dimensions of section=%d x %d mm\nArea of steel=%d mm^2",b,d,Ast)