diff options
Diffstat (limited to '1586/CH9/EX9.2/EXP9_2.sce')
| -rw-r--r-- | 1586/CH9/EX9.2/EXP9_2.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/1586/CH9/EX9.2/EXP9_2.sce b/1586/CH9/EX9.2/EXP9_2.sce new file mode 100644 index 000000000..a0642aa18 --- /dev/null +++ b/1586/CH9/EX9.2/EXP9_2.sce @@ -0,0 +1,12 @@ +clc;funcprot(0);//EXAMPLE 9.2
+// Initialisation of Variables
+d=18;........//Diameter of the casting in in
+x=2;........//Thickness of the casting in in
+B=22:............//Mold constant of casting
+V=(%pi/4)*d^2*x;......//Volume of the casting in in^3
+A=2*(%pi/4)*d^2+%pi*d*x;........//The surface area of the casting in contact with the mold
+t=B*(V/A)^2;........//
+tr=0.75*t;.......//
+Vr/Ar=sqrt(tr/B);............//
+x2=(Vr*d)/(2*(Ar*d-4*Vr));........//
+disp(x2,)
|