summaryrefslogtreecommitdiff
path: root/3557/CH8/EX8.3/Ex8_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '3557/CH8/EX8.3/Ex8_3.sce')
-rw-r--r--3557/CH8/EX8.3/Ex8_3.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/3557/CH8/EX8.3/Ex8_3.sce b/3557/CH8/EX8.3/Ex8_3.sce
new file mode 100644
index 000000000..36b09377f
--- /dev/null
+++ b/3557/CH8/EX8.3/Ex8_3.sce
@@ -0,0 +1,11 @@
+//Example 8.3//
+
+a=25*10^-6;// m // length of surface crack
+// (a) For Sic,
+b=3;//MPa sqrt(m) //fracture toughness
+s1=b/(sqrt(%pi*a))
+mprintf("s1 = %i MPa",s1)
+// (b) For PSZ,
+c=9;//MPa sqrt(m)// fracture toughness
+s2=c/(sqrt(%pi*a))
+mprintf("\n s2 = %i MPa (Answer calculated in textbook is wrong)",s2)