diff options
Diffstat (limited to '3776/CH1/EX1.8/Ex1_8.sce')
| -rw-r--r-- | 3776/CH1/EX1.8/Ex1_8.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/3776/CH1/EX1.8/Ex1_8.sce b/3776/CH1/EX1.8/Ex1_8.sce new file mode 100644 index 000000000..e30f1631e --- /dev/null +++ b/3776/CH1/EX1.8/Ex1_8.sce @@ -0,0 +1,19 @@ +clear +//Given +A_angle = 2 //in*2 +stress_allow = 20 //ksi, The maximum alowable stress +F = stress_allow*A_angle //K, The maximum force +AD = 3 //in, from the figure +DC = 1.06 //in, from the figure +strength_AWS = 5.56 // kips/in,Allowable strength according to AWS + +//caliculations +//momentum at point "d" is equal to 0 +R_1 = (F*DC)/AD //k,Resultant force developed by the weld +R_2 = (F*(AD-DC))/AD //k,Resultant force developed by the weld + +l_1 = R_1/strength_AWS //in,Length of the Weld 1 +l_2 = R_2/strength_AWS //in,Length of the Weld 2 + +printf("\n Length of the Weld 1: %0.2f in",l_1) +printf("\n Length of the Weld 2: %0.2f in",l_2) |