From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 1586/CH4/EX4.3/EXP4_3.sce | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 1586/CH4/EX4.3/EXP4_3.sce

(limited to '1586/CH4/EX4.3/EXP4_3.sce')

diff --git a/1586/CH4/EX4.3/EXP4_3.sce b/1586/CH4/EX4.3/EXP4_3.sce
new file mode 100644
index 000000000..96c30452e
--- /dev/null
+++ b/1586/CH4/EX4.3/EXP4_3.sce
@@ -0,0 +1,20 @@
+clc;funcprot(0);//EXAMPLE 4.3
+// Initialisation of Variables
+a01=0.2866;............//The Lattice parameter of BCC in nm
+a02=0.3571;............//The Lattice parameter of FCC in nm
+r=0.071;............//Radius of carbon atom in nm
+ni1=12;..........//No. of interstitial sites per unit   cell for BCC
+ni2=4;...........//No. of interstitial sites per unit   cell for FCC
+//CALCULATIONS
+Rb=(sqrt(3)*a01)/4;.......//Radius of iron atom in nm
+Ri1=sqrt(0.3125*a01^2)-Rb;.......// Interstitial Radius  of iron atom in nm
+Rf=(sqrt(2)*a02)/4;.........//the radius of the iron atom in nm
+Ri2=(a02-(2*Rf))/2;................//the radius of the interstitial site in nm
+%C1=(ni1/(ni1+2))*100;...........//The atomic percentage  of carbon contained in the BCC iron in percent
+%C2=(ni2/(ni2+4))*100;...........//The atomic percentage  of carbon contained in the FCC iron in percent
+disp(Rb,"Radius of iron atom in nm")
+disp(Ri1,"Interstitial Radius  of iron atom in nm:")
+disp(Rf,"the radius of the iron atom in nm:")
+disp(Ri2,"the radius of the interstitial site in nm:")
+disp(%C1,"The atomic percentage  of carbon contained  in  BCC  iron in percent:")
+disp(%C2,"The atomic percentage  of carbon contained  in  FCC  iron in percent:")
-- 
cgit