summaryrefslogtreecommitdiff
path: root/3886/CH8/EX8.11/8_11.sce
diff options
context:
space:
mode:
Diffstat (limited to '3886/CH8/EX8.11/8_11.sce')
-rw-r--r--3886/CH8/EX8.11/8_11.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/3886/CH8/EX8.11/8_11.sce b/3886/CH8/EX8.11/8_11.sce
new file mode 100644
index 000000000..80f80af83
--- /dev/null
+++ b/3886/CH8/EX8.11/8_11.sce
@@ -0,0 +1,13 @@
+//Range of force P
+//refer fig. 8.15
+//a-when the motion is impending up the plane
+mu=0.3
+N=1000*cosd(70)
+F=mu*N //N
+//Applying virtual work principle
+aP=1000*sind(70)+300*cosd(70) //N
+//b-when the motion is impending down the plane
+//Applying virtual work principle
+bP=1000*sind(70)-300*cosd(70) //N
+printf("Block is in equilibrium for P=%.2f N to %.2f N",bP,aP)
+