diff options
Diffstat (limited to '3557/CH6/EX6.9/Ex6_9.sce')
| -rw-r--r-- | 3557/CH6/EX6.9/Ex6_9.sce | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/3557/CH6/EX6.9/Ex6_9.sce b/3557/CH6/EX6.9/Ex6_9.sce new file mode 100644 index 000000000..e6de54b79 --- /dev/null +++ b/3557/CH6/EX6.9/Ex6_9.sce @@ -0,0 +1,8 @@ +//Example6.9//
+P=3000;//kg //load
+D=10;//mm//diamter sphere of tungsten carbide
+d=3.91;//mm //diameter impression in the iron surface
+BHN=(2*P)/((%pi*D)*(D-sqrt(D^2-d^2)))
+mprintf("BHN = %i",BHN)
+//From the Figure 6.28b
+printf("\n(TS)BHN=240 = 800 Mpa")
|