diff options
Diffstat (limited to '3526/CH7/EX7.9/EX7_9.sce')
| -rw-r--r-- | 3526/CH7/EX7.9/EX7_9.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/3526/CH7/EX7.9/EX7_9.sce b/3526/CH7/EX7.9/EX7_9.sce new file mode 100644 index 000000000..bfc213b78 --- /dev/null +++ b/3526/CH7/EX7.9/EX7_9.sce @@ -0,0 +1,11 @@ +//page 195
+clc;funcprot(0);//EXAMPLE 7.9
+// Initialisation of Variables
+Ln1=0.5
+Ln2=-2.0
+
+sigma1=52;........//the maximum allowed stress level on ceramic at one point in MP.
+sigma2=23.5;.......//the maximum allowed stress level on ceramic at another point in MP.
+//CALCULATIONS
+m=(Ln1-Ln2)/(log(sigma1)-log(sigma2));.......//Weibull modulus of ceramic
+disp(m,"Weibull modulus of ceramic:")
|