summaryrefslogtreecommitdiff
path: root/1586/CH7/EX7.8/EXP7_8.sce
blob: 0500469ddf4d37e88b1c4afd37bff9465b62f75e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
clc;funcprot(0);//EXAMPLE 7.8
// Initialisation of Variables
m=9;.........//Weibull modulus of an ceramic 
sigma1=250;.......//The flexural strength in MPa
F1=0.4;.......//probability of failure 
F2=0.1;.......//Expected the probability of failure
//CALCULATIONS
sigma2=exp(log(sigma1)-(log(log(1/(1-F1)))/m ));.....// The characteristic strength of the ceramic
sigma3=exp((log(log(1/(1-F2)))/m)+log(sigma2));........//Expected level of stress that can be supported in MPa
disp(sigma2,"The characteristic strength of the ceramic in MPa:")
disp(sigma3,"Expected level of stress that can be supported in MPa:")