diff options
Diffstat (limited to '3683/CH16/EX16.3/Ex16_3.sce')
| -rw-r--r-- | 3683/CH16/EX16.3/Ex16_3.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/3683/CH16/EX16.3/Ex16_3.sce b/3683/CH16/EX16.3/Ex16_3.sce new file mode 100644 index 000000000..f87b75a2e --- /dev/null +++ b/3683/CH16/EX16.3/Ex16_3.sce @@ -0,0 +1,15 @@ +Df=100//in mm
+bf=1500//in mm
+bw=300//in mm
+d=700//in mm
+Ast=4510//in sq mm
+fy=250//in MPa
+fck=15//in MPa
+Asf=round(0.36*fck*bf*Df/0.87/fy)//area of steel required for flange, in sq mm
+//as Ast>Asf, Xu>Df
+Xu=round((0.87*fy*Ast-0.446*fck*(bf-bw)*Df)/0.36/fck/bw)//in mm
+Xc=0.531*d//Xc>Xu; hence OK
+a=0.43*Xu//as Df>0.43 Xu, stress in flange is not uniform
+yf=0.15*Xu+0.65*Df//in mm
+Mu=(0.36*fck*bw*Xu*(d-0.416*Xu)+0.446*fck*(bf-bw)*yf*(d-yf/2))/10^6//in kN-m
+mprintf("Moment of resistance of T-beam=%f kN-m",Mu)
|