diff options
author | prashantsinalkar | 2018-02-03 10:59:42 +0530 |
---|---|---|
committer | prashantsinalkar | 2018-02-03 10:59:42 +0530 |
commit | d1e070fe2d77c8e7f6ba4b0c57b1b42e26349059 (patch) | |
tree | 612077a22c8142c0ae754ec11882a4e7d5dc25a4 /3776/CH11/EX11.9 | |
parent | f35ea80659b6a49d1bb2ce1d7d002583f3f40947 (diff) | |
download | Scilab-TBC-Uploads-d1e070fe2d77c8e7f6ba4b0c57b1b42e26349059.tar.gz Scilab-TBC-Uploads-d1e070fe2d77c8e7f6ba4b0c57b1b42e26349059.tar.bz2 Scilab-TBC-Uploads-d1e070fe2d77c8e7f6ba4b0c57b1b42e26349059.zip |
Modified the code
Diffstat (limited to '3776/CH11/EX11.9')
-rw-r--r-- | 3776/CH11/EX11.9/Ex11_9.sce | 31 |
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 |