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

---
 1970/CH5/EX5.10/Ch05Exa10.sce | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100755 1970/CH5/EX5.10/Ch05Exa10.sce

(limited to '1970/CH5/EX5.10')

diff --git a/1970/CH5/EX5.10/Ch05Exa10.sce b/1970/CH5/EX5.10/Ch05Exa10.sce
new file mode 100755
index 000000000..2238f4624
--- /dev/null
+++ b/1970/CH5/EX5.10/Ch05Exa10.sce
@@ -0,0 +1,14 @@
+// Scilab code Exa5.10 : : Page 206 (2011)
+clc; clear;
+h_kt = 1.05457e-34;        // Reduced Planck's constant, joule sec
+e = 1.60218e-19;        // Charge of an electron, coulomb
+l = 2;                // Orbital angular momentum
+eps_0 = 8.5542e-12;        // Absolute permittivity of free space, coulomb square per newton per metre square
+Z_D = 90;            // Atomic number of daughter nucleus
+m = 6.644e-27;        // Mass of alpha particle, Kg
+R = 8.627e-15;        // Radius of daughter nucleus, metre
+T1_by_T0 = exp(2*l*(l+1)*h_kt/e*sqrt(%pi*eps_0/(Z_D*m*R)));    // Hindrance factor
+printf("\nThe hindrance factor for alpha particle = %5.3f" ,T1_by_T0);
+
+// Result
+// The hindrance factor for alpha particle = 1.768 
\ No newline at end of file
-- 
cgit