From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 764/CH7/EX7.12.b/result7_12.txt   | 49 +++++++++++++++++++++++++++++++++++++++
 764/CH7/EX7.12.b/solution7_12.sce | 18 ++++++++++++++
 2 files changed, 67 insertions(+)
 create mode 100755 764/CH7/EX7.12.b/result7_12.txt
 create mode 100755 764/CH7/EX7.12.b/solution7_12.sce

(limited to '764/CH7/EX7.12.b')

diff --git a/764/CH7/EX7.12.b/result7_12.txt b/764/CH7/EX7.12.b/result7_12.txt
new file mode 100755
index 000000000..232d53208
--- /dev/null
+++ b/764/CH7/EX7.12.b/result7_12.txt
@@ -0,0 +1,49 @@
+-->//(Threaded Joints) Example 7.12
+ 
+-->//Refer Fig.7.27 on page 244
+ 
+-->//Number of bolts n
+ 
+-->n = 16
+ n  =
+ 
+    16.  
+ 
+-->//Pitch circle diameter of the bolts 2b (mm)
+ 
+-->b = 2000/2
+ b  =
+ 
+    1000.  
+ 
+-->//Diameter of the pillar flange 2a (mm)
+ 
+-->a = 2250/2
+ a  =
+ 
+    1125.  
+ 
+-->//Load acting on the crane P (kN)
+ 
+-->P = 50
+ P  =
+ 
+    50.  
+ 
+-->//Radius r (mm)
+ 
+-->r = 7500
+ r  =
+ 
+    7500.  
+ 
+-->//Maximum permissible tensile stress sigmaMax (N/mm2)
+ 
+-->sigmaMax = 75
+ sigmaMax  =
+ 
+    75.  
+ 
+
+Area at the core cross-section(A) = 319.690265 mm2
+ 
\ No newline at end of file
diff --git a/764/CH7/EX7.12.b/solution7_12.sce b/764/CH7/EX7.12.b/solution7_12.sce
new file mode 100755
index 000000000..556f5c345
--- /dev/null
+++ b/764/CH7/EX7.12.b/solution7_12.sce
@@ -0,0 +1,18 @@
+
+//Obtain path of solution file
+path = get_absolute_file_path('solution7_12.sce')
+//Obtain path of data file
+datapath = path + filesep() + 'data7_12.sci'
+//Clear all
+clc
+//Execute the data file
+exec(datapath)
+//Calculate the moment arm for load P l (mm)
+l = (r - a)
+//Calculate the absolute maximum force Pmax (N)
+Pmax = (2 * P * 1000 * l * (a + b))/(n * ((2 * (a^2)) + (b^2)))
+//Calculate the core cross-section area of the cap screw A (mm2)
+A = Pmax/sigmaMax
+//Choose proper diameter from Table 7.1
+//Print results
+printf('\nArea at the core cross-section(A) = %f mm2\n',A)
-- 
cgit