summaryrefslogtreecommitdiff
path: root/3776/CH5/EX5.3/Ex5_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '3776/CH5/EX5.3/Ex5_3.sce')
-rw-r--r--3776/CH5/EX5.3/Ex5_3.sce16
1 files changed, 8 insertions, 8 deletions
diff --git a/3776/CH5/EX5.3/Ex5_3.sce b/3776/CH5/EX5.3/Ex5_3.sce
index 44cb6144a..46e8c4366 100644
--- a/3776/CH5/EX5.3/Ex5_3.sce
+++ b/3776/CH5/EX5.3/Ex5_3.sce
@@ -2,26 +2,26 @@ clear
//given
F = 5 //K - force acting on the system
tan1 = (4/3) // the Tan of the angle of force with x axis
-l_ab = 12 //inch - the total length of ab
+l_ab = 12 //inch - the total length of ab
l = 3 // inch - Distance from 'a'
-//caliculation
+//calculation
F_X = 4 //K
F_Y = 3 //k
//M_A = 0 momentum at point a is zero
-// F_X*l- R_B_Y*l_ab = 0
+// F_X*l- R_B_Y*l_ab = 0
R_B_Y = F_X*l/l_ab
//M_B= 0 momentum at point b is zero
// R_A_Y*l_ab - F_X*(l_ab - l)
R_A_Y = F_X*(l_ab - l)/l_ab
-
+
//F_X = 0 forces in x directions
-R_A_X = F_Y + R_B_Y
+R_A_X = F_Y + R_B_Y
R_B_X = R_B_Y // since the angle is 45 (180/%pi)*
-//resultants
-R_A = (R_A_X**2 + R_A_Y**2**0.5)
-R_B = (R_B_X**2 + R_B_Y**2**0.5)
+//resultants
+R_A = (R_A_X**2 + R_A_Y**2)**0.5
+R_B = (R_B_X**2 + R_B_Y**2)**0.5
printf("The X,Y components and resultant of reaction force at A is %0.3f, %0.3f,%0.3f N",R_A_X,R_A_Y,R_A)
printf("\nThe X,Y components and resultant of reaction force at B is %0.3f, %0.3f,%0.3f N",R_B_X,R_B_Y,R_B)