diff options
Diffstat (limited to '3557/CH6/EX6.12/Ex6_12.sce')
-rw-r--r-- | 3557/CH6/EX6.12/Ex6_12.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/3557/CH6/EX6.12/Ex6_12.sce b/3557/CH6/EX6.12/Ex6_12.sce new file mode 100644 index 000000000..eef02579e --- /dev/null +++ b/3557/CH6/EX6.12/Ex6_12.sce @@ -0,0 +1,13 @@ +//Example 6.12//
+
+s1=2;//MPa //MegaPascal
+s2=1;//MPa //Megapascal
+a=60;//days //relaxation time for a rubber band at 25 degree C
+t=(a)*log(s1/s2)
+mprintf("t = %f days",t)
+Q=30*10^3;//J/mol //activation energy for the relaxation process
+R=8.314;//J/(mol.K) // universal gas constant
+T1=308;//K //Kelvin //absolute temperature
+T2=298;//K //Kelvin //absolute temperature
+t35=a*exp((Q/R)*((1/T1)-(1/T2)))
+mprintf("\n t35 = %f days",t35)
|