diff options
author | prashantsinalkar | 2018-02-03 11:01:52 +0530 |
---|---|---|
committer | prashantsinalkar | 2018-02-03 11:01:52 +0530 |
commit | 7bc77cb1ed33745c720952c92b3b2747c5cbf2df (patch) | |
tree | 449d555969bfd7befe906877abab098c6e63a0e8 /3862/CH5/EX5.11 | |
parent | d1e070fe2d77c8e7f6ba4b0c57b1b42e26349059 (diff) | |
download | Scilab-TBC-Uploads-master.tar.gz Scilab-TBC-Uploads-master.tar.bz2 Scilab-TBC-Uploads-master.zip |
Diffstat (limited to '3862/CH5/EX5.11')
-rw-r--r-- | 3862/CH5/EX5.11/Ex5_11.sce | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/3862/CH5/EX5.11/Ex5_11.sce b/3862/CH5/EX5.11/Ex5_11.sce new file mode 100644 index 000000000..6261d9690 --- /dev/null +++ b/3862/CH5/EX5.11/Ex5_11.sce @@ -0,0 +1,23 @@ +clear +// +l=6.0 //length of ladder +u1=0.4 //coefficient of friction between the wall and the ladder +w=200.0 //weight of ladder +u2=0.25 //coefficient of friction between floor and the ladder +wl=900.0 //weight of load +ll=5.0 //distance of load +//force balancing +//Na Nb normal reaction at A and B +//Fa Fb friction at A and B +//Fa=u2*Na +//Fb=u1*Nb +//Na+Fb=w+wl +//Fa=Nb +Nb=(wl+w)*u2/(1+u2*u1) +Na=Nb/u2 +Fa=u2*Na +Fb=u1*Nb +//sum of all moments about a is =0 +temp=((w*l*0.5)+(wl*ll)-(Fb*l))/(Nb*l) +o=atan(temp)*180/3.14 +printf("\n Angle of inclination is %0.3f degrees",o) |