summaryrefslogtreecommitdiff
path: root/3557/CH6/EX6.4/Ex6_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '3557/CH6/EX6.4/Ex6_4.sce')
-rw-r--r--3557/CH6/EX6.4/Ex6_4.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/3557/CH6/EX6.4/Ex6_4.sce b/3557/CH6/EX6.4/Ex6_4.sce
new file mode 100644
index 000000000..bea1a2bd2
--- /dev/null
+++ b/3557/CH6/EX6.4/Ex6_4.sce
@@ -0,0 +1,11 @@
+//Example 6.4//
+
+rO=0.132;//nm //Ionic radius of Oxygen (From appendix 2)
+p=2*rO
+mprintf("p = %f nm",p)
+a=7.0*10^9;//Pa //The theoretical strength of the defect free glass
+p1=0.264*10^-9//m
+c=1*10^-6;//m //crack length
+s=(1/2)*a*(p1/c)^(1/2)
+mprintf("\ns = %e Mpa = 57MPa (As M =10^6)",s)
+