summaryrefslogtreecommitdiff
path: root/698/CH2/EX2.10/P10_thickness_of_bracket_at_section.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /698/CH2/EX2.10/P10_thickness_of_bracket_at_section.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '698/CH2/EX2.10/P10_thickness_of_bracket_at_section.sce')
-rw-r--r--698/CH2/EX2.10/P10_thickness_of_bracket_at_section.sce40
1 files changed, 40 insertions, 0 deletions
diff --git a/698/CH2/EX2.10/P10_thickness_of_bracket_at_section.sce b/698/CH2/EX2.10/P10_thickness_of_bracket_at_section.sce
new file mode 100644
index 000000000..bf250b7bd
--- /dev/null
+++ b/698/CH2/EX2.10/P10_thickness_of_bracket_at_section.sce
@@ -0,0 +1,40 @@
+clc
+//Example 2.10
+//Thickness of bracket at section
+//------------------------------------------------------------------------------
+
+//Given Data:
+//Loads
+P=4500 // N
+
+//Distance of line of action from horizontal axis of bracket
+c=0.025 // m
+
+//Distance of vertical axis of bracket from bottom
+
+//Height of section
+h=0.05 // m
+
+//Permissible tensile stress
+S_perm=70*(10^6)
+
+//------------------------------------------------------------------------------
+//Printing result file to .txt
+//Moment of force about vertical axis
+M=P*h
+
+res10=mopen(TMPDIR+'10_thickness_of_bracket_at_section.txt','wt')
+//Assuming the thickness of the bracket is b
+mfprintf(res10,"Assuming the thickness of the bracket as b,\n")
+mfprintf(res10,"The area of cross section will be A=0.05*b\n")
+mfprintf(res10,"Moment of inertia will be I=b*(0.05)^3/12\n")
+
+mfprintf(res10,"The tensile stress is given by equation:\n\tSn_max=(P/A)+((M*c)/I)\n\n")
+b=(1/S_perm)*((P/h)+((M*c*12)/(h^3)))
+
+mfprintf(res10,"b=%0.5f m",b)
+mfprintf(res10,"\n\n%d mm is required to limit the stress at %d MN/m^2",(b*1000),(S_perm*(10^-6)))
+mclose(res10)
+editor(TMPDIR+'10_thickness_of_bracket_at_section.txt')
+//------------------------------------------------------------------------------
+//-----------------------------End of program----------------------------------- \ No newline at end of file