diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /1898/CH10/EX10.14/Ex10_14.sce | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '1898/CH10/EX10.14/Ex10_14.sce')
| -rwxr-xr-x | 1898/CH10/EX10.14/Ex10_14.sce | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/1898/CH10/EX10.14/Ex10_14.sce b/1898/CH10/EX10.14/Ex10_14.sce new file mode 100755 index 000000000..37aabac96 --- /dev/null +++ b/1898/CH10/EX10.14/Ex10_14.sce @@ -0,0 +1,42 @@ +clear all; clc;
+
+disp("Scilab Code Ex 10.14 : ")
+
+//Given:
+r = 0.5; //cm
+sigma_yield = 360; //MPa
+T = 3.25; //kN/cm
+A= (%pi*r^2);
+P = 15; //kN
+J = (%pi/2)*(r^4);
+sigma_y_sqr = sigma_yield^2;
+
+//Calculations:
+sigma_x = -(P/A)*10;
+sigma_y = 0;
+tou_xy = (T*r*10)/J;
+
+k = (sigma_x + sigma_y)/2;
+R = sqrt(k^2 + (tou_xy^2));
+
+sigma1 = k+R;
+sigma2 = k-R;
+l = sigma1 - sigma2;
+
+//Maximum Shear Stress Theory:
+test1 = abs(l);
+
+if(test1 >= sigma_yield)
+
+ printf("\n\nFailure occurs by Maximum Shear Stress Theory.');
+end
+
+
+//Maximum Distortion-Energy Theory:
+test2 = (sigma1^2 - (sigma1*sigma2) + sigma2^2);
+
+
+if(test2<sigma_y_sqr)
+
+ printf("\n\nFailure will not occur by Maximum Distortion-Energy Theory.');
+end
|