blob: bea1a2bd21728010034b2b4028dcbf9acc3d9d7f (
plain)
1
2
3
4
5
6
7
8
9
10
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)
|
