diff options
Diffstat (limited to '1367/CH8/EX8.3')
| -rwxr-xr-x | 1367/CH8/EX8.3/8_3.sce | 30 | ||||
| -rwxr-xr-x | 1367/CH8/EX8.3/8_3r.txt | 20 |
2 files changed, 50 insertions, 0 deletions
diff --git a/1367/CH8/EX8.3/8_3.sce b/1367/CH8/EX8.3/8_3.sce new file mode 100755 index 000000000..f5d7a31cb --- /dev/null +++ b/1367/CH8/EX8.3/8_3.sce @@ -0,0 +1,30 @@ +//Find Rupture Energy Modulous Of Rupture and Notch Imapct Strength
+//Ex:8.3
+clc;
+clear;
+close;
+l=0.1;//frictinal and windage losses in kgf-m
+dr=5.9;//dial reading in kgf-m
+u=dr-l;//in kgf-m
+disp(u,"Rupture Energy (in kgf-m) = ");
+t=10;//in mm
+d=t/5;//depth of V-notch in mm
+te=t-d;//effective thickness in mm
+ve=75*10*te;//effective volume in cu. mm
+vem=ve*10^-9;//in cu. m
+mr=u/vem;//in kgf/sqm
+disp(mr,"Modulous Of Rupture (in kgf/sqm) = ");
+ae=t*te;//effective area of cross section in sqmm
+aem=ae*10^-6;//in sqm
+is=u/aem;//in kg/m
+disp(is,"Notch Imapct Strength (in kg/m) = ");
+ui=30;//in kgf-m
+a=160;//angle in degrees
+r=0.8;//swing radius in m
+uf=ui-u;//in kgf-m
+w=19.33;//weight of hammer in kgf-m
+hf=uf/w;//in m
+disp(hf,"Height risen by Hammer (in m) = ");
+//hf=r*(1-cos(b))
+b=acosd((r-hf)/r);//in degrees
+disp(b,"Angle after Breaking the specimen (in degress) = ");
\ No newline at end of file diff --git a/1367/CH8/EX8.3/8_3r.txt b/1367/CH8/EX8.3/8_3r.txt new file mode 100755 index 000000000..cdf9e78af --- /dev/null +++ b/1367/CH8/EX8.3/8_3r.txt @@ -0,0 +1,20 @@ +
+ Rupture Energy (in kgf-m) =
+
+ 5.8
+
+ Modulous Of Rupture (in kgf/sqm) =
+
+ 966666.67
+
+ Notch Imapct Strength (in kg/m) =
+
+ 72500.
+
+ Height risen by Hammer (in m) =
+
+ 1.25194
+
+ Angle after Breaking the specimen (in degress) =
+
+ 124.39708
\ No newline at end of file |