From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3776/CH6/EX6.14/Ex6_14.sce | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 3776/CH6/EX6.14/Ex6_14.sce

(limited to '3776/CH6/EX6.14/Ex6_14.sce')

diff --git a/3776/CH6/EX6.14/Ex6_14.sce b/3776/CH6/EX6.14/Ex6_14.sce
new file mode 100644
index 000000000..6198c1458
--- /dev/null
+++ b/3776/CH6/EX6.14/Ex6_14.sce
@@ -0,0 +1,12 @@
+clear
+//given  
+//from example 6.9
+St_ul = 2500 //psi - ultimate strength
+st_yl = 40000 //psi _ yielding strength 
+b = 10 //in - width from example 
+A = 2 //in2 The area of the steel
+d = 20 
+t_ul = st_yl*A //ultimate capasity
+y = t_ul/(St_ul*b*0.85) //in 0.85 because its customary
+M_ul = t_ul*(d-y/2)/12 //ft-lb Plastic moment 
+printf("\n The plastic moment of the system is  %0.3f ft-lb",M_ul)
-- 
cgit