blob: fbb59599b5253a052ab183dbdb8ac2c8747be4a2 (
plain)
1
2
3
4
5
6
7
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:")
|
