summaryrefslogtreecommitdiff
path: root/3776/CH11/EX11.9/Ex11_9.sce
diff options
context:
space:
mode:
Diffstat (limited to '3776/CH11/EX11.9/Ex11_9.sce')
-rw-r--r--3776/CH11/EX11.9/Ex11_9.sce31
1 files changed, 15 insertions, 16 deletions
diff --git a/3776/CH11/EX11.9/Ex11_9.sce b/3776/CH11/EX11.9/Ex11_9.sce
index 98dcadcc9..ecc7bb597 100644
--- a/3776/CH11/EX11.9/Ex11_9.sce
+++ b/3776/CH11/EX11.9/Ex11_9.sce
@@ -1,16 +1,16 @@
clear
-//Given
-//FOR FLANGS
-l = 5 //in - The length of the flang
-b = 5 //in - Teh width of the flang
-t = 0.312 //in - the thickness of the flang
+//Given
+//FOR FLANGE
+l = 5 //in - The length of the flange
+b = 5 //in - Teh width of the flange
+t = 0.312 //in - the thickness of the flange
L = 20 //in - Length of the beam, Extracted from AISC manuals
-A = 4.563 //in2 - The area of crossection of the beam
-r = 1.188 //in - radius of the gyration, Extracted from AISC manuals
-//b/t- value of the flang
-k = (5 -t)/(2*t) //b/t ratio
+A = 4.563 //sq.in - The area of crossection of the beam
+r = 1.188 //in - radius of the gyration, Extracted from AISC manuals
+//b/t- value of the flange
+k = (5 -t)/(2*t) //b/t ratio
//AISC, lets check maximum allowable stress for slang
-Stressf_all = 23.1 - 0.79*k //ksi The maximum allowable stress in case of flang,AISC
+Stressf_all = 23.1 - 0.79*k //ksi The maximum allowable stress in case of flange,AISC
//web width thickness ratio
k_2 = (5 -2*t)/(t)
@@ -20,17 +20,16 @@ if k_2<16 then
//a) Overall buckling investment
k_31 = L/r //slenderness ratio
Stressb_all = 20.2 - 0.126*k_31//ksi The maximum allowable stress in case of Buckling,AISC
-p_allow = A*Stressf_all //kips The allowable concentric load
+p_allow = A*Stressf_all //kips The allowable concentric load
//b) Overall buckling investmen
-L_2 = 60 //in
+L_2 = 60 //in
k_3 = L_2/r //slenderness ratio
Stressb_all_2 = 20.2 - 0.126*k_3//ksi The maximum allowable stress in case of Buckling,AISC
-p_allow_2 = A*Stressb_all_2 //kips The allowable concentric load
+p_allow_2 = A*Stressb_all_2 //kips The allowable concentric load
printf("\n The maximum allowable stress in case of web width %0.2f ksi",Stressw_all)
-printf("\n The maximum allowable stress in case of flang %0.2f ksi",Stressf_all)
+printf("\n The maximum allowable stress in case of flange %0.2f ksi",Stressf_all)
printf("\n a) The maximum allowable load in case of Buckling %0.2f kips",p_allow)
printf("\n b) The maximum allowable load in case of Buckling %0.2f kips",p_allow_2)
-printf("\n small variation due to rounding off errors")
-
+// small variation due to rounding off errors