summaryrefslogtreecommitdiff
path: root/2744/CH10/EX10.8
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2744/CH10/EX10.8
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 '2744/CH10/EX10.8')
-rwxr-xr-x2744/CH10/EX10.8/Ex10_8.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/2744/CH10/EX10.8/Ex10_8.sce b/2744/CH10/EX10.8/Ex10_8.sce
new file mode 100755
index 000000000..f665b3e64
--- /dev/null
+++ b/2744/CH10/EX10.8/Ex10_8.sce
@@ -0,0 +1,14 @@
+clear;
+clc;
+d = 12;// inches
+t = 3;// inches
+p_x1 = 900;// lb/in^2
+x1 = 0.5*d;// inches
+p_x2 = 0;
+x2 = 0.5*d+t;// inches
+//from Lame's formulae
+b = (p_x1-p_x2)/((1/x1^2)-(1/x2^2));
+a = (b/x1^2)- p_x1;
+f_x1 = (b/x1^2)+a;// lb/in^2
+f_x2 = (b/x2^2)+a;// lb/in^2
+printf('The maximum and minimum intensities of circumferential stresses are: f_6 = %d lb/in^2.,tensile\n f_9 = %d lb/in^2., tensile',f_x1,f_x2);