From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 767/CH1/EX1.11.2/Ch1Exa1_11_2.sci | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) create mode 100755 767/CH1/EX1.11.2/Ch1Exa1_11_2.sci (limited to '767/CH1/EX1.11.2') diff --git a/767/CH1/EX1.11.2/Ch1Exa1_11_2.sci b/767/CH1/EX1.11.2/Ch1Exa1_11_2.sci new file mode 100755 index 000000000..1cb564a33 --- /dev/null +++ b/767/CH1/EX1.11.2/Ch1Exa1_11_2.sci @@ -0,0 +1,20 @@ +// Scilab code Exa 1.11.2 : To determine distances between the isotopic Ar ions in Bainbridge mass spectrograph : Page 41 (2011) +amu = 1.673e-027; // Atomic mass unit, kg +E = 5e+04; // Electric field, V/m +B1 = 0.4; // Magnetic field, tesla +v = E/B1; // Velocity of ions, m/s +B = 0.8; // Magnetic field, tesla +e = 1.602e-019; //charge of electron,C +m_Ar = zeros(1,3); // Array of masses of three Ar ions, amu +m_Ar(1,1) = 36,m_Ar(1,2) = 38,m_Ar(1,3) = 40; // Masses of three isoptopes of Ar, amu +r_Ar = zeros(1,3); // Array of radii of three Ar ions, mm +for i = 1:1:3 + r_Ar(1,i) = (m_Ar(1,i)*amu*v)/(B*e)*1e+03; // Radius of Ar ion orbit, mm + disp(r_Ar(1,i)); +end +d1 = 2*(r_Ar(1,2)-r_Ar(1,1)); // Distance b/w first and second line, mm +d2 = 2*(r_Ar(1,3)-r_Ar(1,2)); // Distance b/w second and third line, mm +printf("\nThe distance between successive lines due to three different isotopes : %3.1f mm and %3.1f mm", d1,d2); + +// Result +// The distance between successive lines due to three different isotopes : 6.5 mm and 6.5 mm \ No newline at end of file -- cgit