summaryrefslogtreecommitdiff
path: root/3683/CH15/EX15.4/Ex15_4.sce
blob: c87a137ca512882005e663cc280b41971c83d4e3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
b=225//width, in mm
d=500//effective depth, in mm
Asc=125//in sq mm
Ast=754//in sq mm
top_cover=50//in mm
fck=15//in MPa
fy=500//in MPa
Xc=0.456*d//in mm
fcc=0.446*fck//in MPa
//for d'/d=50/500=0.1 and Fe500 grade steel,
fsc=412//in MPa
Mu=(0.36*fck*b*Xc*(d-0.416*Xc)+(fsc-fcc)*Asc*(d-top_cover))/10^6//in kN-m
mprintf("Moment of resistance of the beam = %f kN-m",Mu)