summaryrefslogtreecommitdiff
path: root/3886/CH5/EX5.3/5_3.sce
blob: e28e6232fb20c836a5c4270c34fb87a49bd9d037 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//finding the inclination of the plane and coefficient of friction
//refer fig 5.7 
//consider equilibrium of system
//Case (a)
//N=500*cosd(theta)
//Using law of friction
//F1=mu*N
//500*sind(theta)-500*mu*cosd(theta)=200
//Case (b)
//N=500*cosd(theta)
//usin law of friction
//F2=mu*N
//500*mu*cosd(theta)+500*sind(theta)=300
//add final equations from both cases
theta=asind(0.5)  //degree
//substitute this value in final equation from case (b)
mu=(50)/(500*cosd(30))  
printf("\ntheta=%.2d degree\nmu=%0.3f",theta,mu)