diff options
Diffstat (limited to '3526/CH11/EX11.2')
| -rw-r--r-- | 3526/CH11/EX11.2/EX11_2.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/3526/CH11/EX11.2/EX11_2.sce b/3526/CH11/EX11.2/EX11_2.sce new file mode 100644 index 000000000..ce3e211e8 --- /dev/null +++ b/3526/CH11/EX11.2/EX11_2.sce @@ -0,0 +1,19 @@ +clc;funcprot(0);//EXAMPLE 11.2
+//page 319
+// Initialisation of Variables
+%Sn=2;......//Amount of Tin Dissolved in alpha solid solution
+%Sn2=10;.....//Amount of Tin Dissolved in alpha+beeta solid solution at 0 degree celsius
+m=100;........//Total mass of the Pb-Sn alloy in gm
+Pbm=90;.......//Total mass of the Pb in Pb-Sn alloy in gm
+//CALCULATIONS
+B=((%Sn2-%Sn)/(m-%Sn))*100;.......//The amount of beeta Sn that forms if a Pb-10% Sn alloy is cooled to 0 Degree celsius
+B2=100-B;......//The amount of alpha Sn that forms if a Pb-10% Sn alloy is cooled to 0 Degree celsius
+Sn1=(%Sn/100)*(B2);......//The mass of Sn in the alpha phase in g
+Sn2=%Sn2-Sn1;.....//The mass of Sn in beeta phase in g
+Pb1=B2-Sn1;....//The mass of Pb in the alpha phase in g
+Pb2=Pbm-Pb1;.........//The mass of Pb in the beeta phase in g
+disp(B,"c.Amount of beeta forms of Pb-Sn in gm:")
+disp(Sn1,"d.The mass of Sn in the alpha phase in g:")
+disp(Sn2,"d.The mass of Sn in beeta phase in g:")
+disp(Pb1,"e.The mass of Pb in the alpha phase in g:")
+disp(Pb2,"e.The mass of Pb in the beeta phase in g:")
|