blob: ea2e2420db833920334b34d6aefcf3e0b4108e19 (
plain)
1
2
3
4
5
6
7
8
9
10
|
clc;funcprot(0);//EXAMPLE 14.8
// Initialisation of Variables
Ktc=60;.........//The plane-strain Fracture toughness in MPa-m^-1/2
Ktc2=80;......//The fracture toughness of L sample in MPa-m^-1/2
f=1.12;........//A geometry factor for the specimen and flaw
sigma=200;......//A titanium-alloy 6246 plate is exposed to a tensile stress
a=((Ktc/(f*sigma))^2)/%pi;......//The critical flaw length of Crank in cm
a2=((Ktc2/(f*sigma))^2)/%pi;......//The critical flaw length of Crank of L sample in cm
disp(a*10^2," The critical flaw length of Crank in cm: ")
disp(a2*10^2,"The critical flaw length of Crank of L sample in cm:")
|
