summaryrefslogtreecommitdiff
path: root/1586/CH7/EX7.1
diff options
context:
space:
mode:
Diffstat (limited to '1586/CH7/EX7.1')
-rw-r--r--1586/CH7/EX7.1/EXP7_1.jpgbin0 -> 164246 bytes
-rw-r--r--1586/CH7/EX7.1/EXP7_1.sce8
2 files changed, 8 insertions, 0 deletions
diff --git a/1586/CH7/EX7.1/EXP7_1.jpg b/1586/CH7/EX7.1/EXP7_1.jpg
new file mode 100644
index 000000000..cbacf2556
--- /dev/null
+++ b/1586/CH7/EX7.1/EXP7_1.jpg
Binary files differ
diff --git a/1586/CH7/EX7.1/EXP7_1.sce b/1586/CH7/EX7.1/EXP7_1.sce
new file mode 100644
index 000000000..fbb59599b
--- /dev/null
+++ b/1586/CH7/EX7.1/EXP7_1.sce
@@ -0,0 +1,8 @@
+clc;funcprot(0);//EXAMPLE 7.1
+// Initialisation of Variables
+f=1.12;.......//Geometry factor for the specimen and flaw
+sigma=45000;.....//Applied stress on Steel in psi
+K=80000;.........//The stress intensity factor
+//CALCULATIONS
+a=(K/(f*sigma))^2/%pi;........//Depth of crank in in
+disp(a,"Depth of crank that will propagate in the steel in in:")