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

---
 1586/CH16/EX16.9/EXP16_9.jpg | Bin 0 -> 199984 bytes
 1586/CH16/EX16.9/EXP16_9.sce |  12 ++++++++++++
 2 files changed, 12 insertions(+)
 create mode 100644 1586/CH16/EX16.9/EXP16_9.jpg
 create mode 100644 1586/CH16/EX16.9/EXP16_9.sce

(limited to '1586/CH16/EX16.9')

diff --git a/1586/CH16/EX16.9/EXP16_9.jpg b/1586/CH16/EX16.9/EXP16_9.jpg
new file mode 100644
index 000000000..1dfe182c4
Binary files /dev/null and b/1586/CH16/EX16.9/EXP16_9.jpg differ
diff --git a/1586/CH16/EX16.9/EXP16_9.sce b/1586/CH16/EX16.9/EXP16_9.sce
new file mode 100644
index 000000000..c843893af
--- /dev/null
+++ b/1586/CH16/EX16.9/EXP16_9.sce
@@ -0,0 +1,12 @@
+clc;funcprot(0);//EXAMPLE 16.7
+//INITIALISATION OF VAREIABLES
+sig1=980;...............//Initial Stress of POlyisoprene in psi
+sig2=1000;.............//Fnal Stress of POlyisoprene in psi
+sig3=1500;.............// Stress of POlyisoprene after one year in psi
+t1=6;................//time in weeks
+t2=52;.............//time in weeks
+//CALCULATIONS
+Rt=-t1/(log(sig1/sig2));.....//Relaxation time in weeks
+sig=sig3/(%e^(-t2/Rt));........//Initial Stress to be placed in psi
+disp(round(Rt),"Relaxation time in weeks:")
+disp(round (sig),"Initial Stress to be placed in psi:")
-- 
cgit