summaryrefslogtreecommitdiff
path: root/3886/CH2/EX2.21/Ex2_21.sce
blob: 06c4ef72b5d74c205b11075d000524de996d2623 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
//reactions developed at contact surfaces
//Refer fig. 2.26 (a),(b) and (c)
//using geometry
theta=acosd(0.8)  //degree
//consider equilibrium of cylinder 1
//Using equilibrium conditions
RB=800/sind(theta)  //N
RA=RB*cosd(theta)  //N
//consider equilibrium of cylinder 2
//Using equilibrium conditions
RD=((RB*sind(theta))+1200)/cosd(45)  //N
RC=RD*sind(45)+RB*cosd(theta)  //N
printf("\nThe reactions are:-\nRA=%.1f N\nRB=%.1f N\nRC=%.1f N\nRD=%.1f N",RA,RB,RC,RD)