summaryrefslogtreecommitdiff
path: root/3683/CH16/EX16.4/Ex16_4.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3683/CH16/EX16.4/Ex16_4.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3683/CH16/EX16.4/Ex16_4.sce')
-rw-r--r--3683/CH16/EX16.4/Ex16_4.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/3683/CH16/EX16.4/Ex16_4.sce b/3683/CH16/EX16.4/Ex16_4.sce
new file mode 100644
index 000000000..cadee8158
--- /dev/null
+++ b/3683/CH16/EX16.4/Ex16_4.sce
@@ -0,0 +1,18 @@
+Df=100//in mm
+bf=1250//in mm
+bw=250//in mm
+d=650//in mm
+Ast=2800//in sq mm
+fy=415//in MPa
+fck=20//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
+//but Xu<Df; this indicates that stress in the flange is not uniform, hence replace Df by yf
+Xu=(0.87*fy*Ast-0.446*fck*(bf-bw)*0.65*Df)/(0.36*fck*bw+0.446*fck*(bf-bw)*0.15)//in mm
+Xc=0.479*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)
+//answer in textbook is incorrect