From 7bc77cb1ed33745c720952c92b3b2747c5cbf2df Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Sat, 3 Feb 2018 11:01:52 +0530
Subject: Added new code

---
 3886/CH8/EX8.16/8_16.sce | 9 +++++++++
 3886/CH8/EX8.16/8_16.txt | 3 +++
 2 files changed, 12 insertions(+)
 create mode 100644 3886/CH8/EX8.16/8_16.sce
 create mode 100644 3886/CH8/EX8.16/8_16.txt

(limited to '3886/CH8/EX8.16')

diff --git a/3886/CH8/EX8.16/8_16.sce b/3886/CH8/EX8.16/8_16.sce
new file mode 100644
index 000000000..bb8ccec03
--- /dev/null
+++ b/3886/CH8/EX8.16/8_16.sce
@@ -0,0 +1,9 @@
+//Least value of theta to avoid slipping of ladder
+//refer fig.8.21
+//Applying virtual work principle
+//-0.4*NA*6*cosd(theta)*delta(theta)-200*(-3*sind(theta)*delta(theta))-900*(-5*sind(theta)*delta(theta))+0.25*NB(-6*sind(theta)*delta(theta))=0
+NA=1100/(1+0.25*0.4)  //N
+NB=0.4*1000  //N
+theta=atand(2400/4500)  //degree
+printf("Thus theta=%.2f degree",theta)
+
diff --git a/3886/CH8/EX8.16/8_16.txt b/3886/CH8/EX8.16/8_16.txt
new file mode 100644
index 000000000..318209712
--- /dev/null
+++ b/3886/CH8/EX8.16/8_16.txt
@@ -0,0 +1,3 @@
+ 
+--> exec('E:\My program EM\8. Virtual work\8.16.sce', -1)
+Thus theta=28.07 degree
\ No newline at end of file
-- 
cgit