summaryrefslogtreecommitdiff
path: root/3776/CH5/EX5.3/Ex5_3.sce
blob: 44cb6144add2b87fb1a7e4ca7b2431e56b5287b7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
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 = 3       // inch - Distance from 'a'
//caliculation
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 
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_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)
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)