summaryrefslogtreecommitdiff
path: root/764/CH7/EX7.14.b
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /764/CH7/EX7.14.b
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '764/CH7/EX7.14.b')
-rwxr-xr-x764/CH7/EX7.14.b/result7_14.txt77
-rwxr-xr-x764/CH7/EX7.14.b/solution7_14.sce44
2 files changed, 121 insertions, 0 deletions
diff --git a/764/CH7/EX7.14.b/result7_14.txt b/764/CH7/EX7.14.b/result7_14.txt
new file mode 100755
index 000000000..3b6ab9f51
--- /dev/null
+++ b/764/CH7/EX7.14.b/result7_14.txt
@@ -0,0 +1,77 @@
+-->//(Threaded Joints) Example 7.14
+
+-->//Refer Fig.7.29 on page 246
+
+-->//Force acting on bracket P (kN)
+
+-->P = 5
+ P =
+
+ 5.
+
+-->//Angle made by the force with the vertical theta (degree)
+
+-->theta = 60
+ theta =
+
+ 60.
+
+-->//Number of bolts N
+
+-->N = 4
+ N =
+
+ 4.
+
+-->//Tensile yield strength of 30C8 Syt (N/mm2)
+
+-->Syt = 400
+ Syt =
+
+ 400.
+
+-->//Factor of safety fs
+
+-->fs = 5
+ fs =
+
+ 5.
+
+-->//Distance of the centre of gravity from the lower edge cg (mm)
+
+-->cg = 60 + 100
+ cg =
+
+ 160.
+
+-->//Distance between the point force and lower edge f (mm)
+
+-->f = 200
+ f =
+
+ 200.
+
+-->//Distance of the force point from the tilting edge t (mm)
+
+-->t = 240
+ t =
+
+ 240.
+
+-->//Distance between bolt1 and pt.C l1 (mm)
+
+-->l1 = 200 + 60
+ l1 =
+
+ 260.
+
+-->//Distance between bolt2 and pt.C l2 (mm)
+
+-->l2 = 60
+ l2 =
+
+ 60.
+
+
+Area at the core cross-section(A) = 34.874654 mm2
+ \ No newline at end of file
diff --git a/764/CH7/EX7.14.b/solution7_14.sce b/764/CH7/EX7.14.b/solution7_14.sce
new file mode 100755
index 000000000..dca3fc713
--- /dev/null
+++ b/764/CH7/EX7.14.b/solution7_14.sce
@@ -0,0 +1,44 @@
+
+//Obtain path of solution file
+path = get_absolute_file_path('solution7_14.sce')
+//Obtain path of data file
+datapath = path + filesep() + 'data7_14.sci'
+//Clear all
+clc
+//Execute the data file
+exec(datapath)
+//Calculate the permissible shear stress tauMax (N/mm2)
+tauMax = ((50/100)*Syt)/fs
+//Horizontal component of force P Ph (N)
+Ph = P * 1000 * sind(theta)
+//Vertical component of force P Pv (N)
+Pv = P * 1000 * cosd(theta)
+//Calculate the direct tensile force on each bolt Dtensile (N)
+Dtensile = Ph/N
+//Calculate the turning moment due to horizontal component Mh (N-mm)
+Mh = Ph * (f - cg)
+//Calculate the direct shear force on each bolt Sshear (N)
+Sshear = Pv/N
+//Calculate the turning moment due to vertical component Mv (N-mm)
+Mv = Pv * t
+//Calculate the tensile force on appropriate bolt due to bending moment Ftensile (N)
+if (l1 > l2) then
+ Ftensile = ((Mh + Mv)*l1)/(2*((l1^2) + (l2^2)))
+else
+ Ftensile = ((Mh + Mv)*l2)/(2*((l1^2) + (l2^2)))
+end
+//Calculate the total tensile force on each bolt Pt (N)
+Pt = Dtensile + Ftensile
+//Assume the core cross-section area of the bolts to be 1mm2 A
+A = 1
+//Calculate the resultant tensile stress in the bolt res (N/mm2)
+res = Pt/A
+//Calculate the shear stress in bolts Stau (N/mm2)
+Stau = Sshear/A
+//Calculate the maximum shear stress in the bolts tau (N/mm2)
+tau = (((res/2)^2) + (Stau^2))^(1/2)
+//Calculate the actual core cross-section area of the bolts A (mm2)
+A = tau/tauMax
+//Choose proper diameter from Table 7.1
+//Print results
+printf('\nArea at the core cross-section(A) = %f mm2\n',A)