blob: b6c66e42d32d8ae2bcc0d9bbb5bbc76b5a9d2f91 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
b=225//in mm
D=500//in mm
c=50//cover, in mm
Asc=1520//in sq mm
Ast=Asc
fck=20//in MPa
fy=500//in MPa
fcc=0.446*fck//in MPa
//(i)
xu=1.3*D//in mm
m=0.43*D//in mm
esc1=0.002*(xu-c)/(xu-m)
esc2=0.002*(xu-D+c)/(xu-m)
//by interpolation
fsc1=412.515//in MPa
fsc2=183.794//in MPa
//stress block parameters for xu / D = 1.3
n=0.409
l=0.468
A=n*fck*D//area of stress block
r=l*D//distance of c.g., in mm
Pu=(A*b+Asc*(fsc1-fcc)+Ast*fsc2)/10^3//in kN
Mu=(A*b*(D/2-r)+Asc*(fsc1-fcc)*(D/2-c)-Ast*fsc2*(D/2-c))/10^6//in kN-m
mprintf("(i) For xu = 1.3 D\nP=%f kN\nMu=%f kN-m\n",Pu,Mu)
//(ii)
xu=400//in mm
esc=0.0035*(xu-c)/xu
est=0.0035*(D-c-xu)/xu
//by interpolation
fsc=422.11//in MPa
fst=87.45//in MPa
Pu=(0.36*fck*b*xu+Asc*(fsc-fcc)-Ast*fst)/10^3//in kN
Mu=(0.36*fck*b*xu*(D/2-0.416*xu)+Asc*(fsc-fcc)*(D/2-c)+Ast*fst*(D/2-c))/10^6//in kN-m
mprintf("(ii) For xu = 400 mm\nP=%f kN\nMu=%f kN-m",Pu,Mu)
//answer in textbook for Mu in (ii) is incorrect
|
