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

---
 2744/CH5/EX5.14/Ex5_14.sce | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)
 create mode 100755 2744/CH5/EX5.14/Ex5_14.sce

(limited to '2744/CH5/EX5.14/Ex5_14.sce')

diff --git a/2744/CH5/EX5.14/Ex5_14.sce b/2744/CH5/EX5.14/Ex5_14.sce
new file mode 100755
index 000000000..57c5894c8
--- /dev/null
+++ b/2744/CH5/EX5.14/Ex5_14.sce
@@ -0,0 +1,30 @@
+clear;
+clc;
+b = 6;// inches
+d = 4;// inches
+t = 5/8;// inch
+a1 = d*t;// in^2
+y1 = d/2;// inches
+a2 = (b-t)*t;// in^2
+y2 = t/2;// inch
+a = a1+a2;// in^2
+J = (a1*y1+a2*y2)/(a1+a2);// inches
+I_AB = (1/3)*t*d^3 + (1/3)*(b-t)*t^3;// in^4
+I_xx = I_AB - a*J^2;// in^4
+I_yy = (1/12)*t*b^3 + (1/12)*(d-t)*t^3;// in^4
+printf('The position of the c.g is J = %.2f inches',J);
+printf('\n I_xx = %.2f in^4\n I_yy = %.2f in^4',I_xx,I_yy);
+
+
+//14(a)
+H = 18;// feet
+l = 10;// feet
+w = 3/2;// cwt/ per .sq. foot
+y_c = 2.97;// inches
+y_t = 1.03;// inches
+W = (3/40)*(w*l);// tons
+BM_max = W*l*12/8;// ton-inches
+M_r = BM_max;// ton-inches
+f_c = M_r*y_c/I_xx ;// tons/in^2
+f_t = M_r*y_t/I_xx ;// tons/in^2
+printf('\n\n Maximum stresses induced are f_c = %.2f tons/in^2\n f_t = %.2f tons/in^2',f_c,f_t);
-- 
cgit