diff options
Diffstat (limited to '3257/CH2/EX2.1/Ex2_1.sce')
| -rwxr-xr-x | 3257/CH2/EX2.1/Ex2_1.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3257/CH2/EX2.1/Ex2_1.sce b/3257/CH2/EX2.1/Ex2_1.sce new file mode 100755 index 000000000..25890574d --- /dev/null +++ b/3257/CH2/EX2.1/Ex2_1.sce @@ -0,0 +1,14 @@ +// Calculation of ultimate tensile strength
+clc
+K = 689655 // in kPa
+n = 0.5
+A0 = 1 // let
+printf("\n Example 2.1")
+sigma = K*n^n
+A_neck = A0*exp(-n)
+P= sigma*A_neck
+UTS = P/A0
+printf("\n True ultimate tensile strength is %.2fkPa",sigma)
+printf("\n Engineering UTS of material is %.2f kPa",UTS)
+// Answer in book is 295521.79 kPa
+
|