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

---
 1004/CH9/EX9.4/Ch09Ex4.sci | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100755 1004/CH9/EX9.4/Ch09Ex4.sci

(limited to '1004/CH9/EX9.4/Ch09Ex4.sci')

diff --git a/1004/CH9/EX9.4/Ch09Ex4.sci b/1004/CH9/EX9.4/Ch09Ex4.sci
new file mode 100755
index 000000000..29cd15146
--- /dev/null
+++ b/1004/CH9/EX9.4/Ch09Ex4.sci
@@ -0,0 +1,13 @@
+// Scilab Code Ex9.4 Average number of collsions for thermalization of neutrons: Pg:202 (2008)
+A = 9;    // Mass number of beryllium
+xi = 2/A - 4/(3*A^2);    // Logarithmic energy decrement of energy distribution of neutron
+E0 = 2;    // Initial energy of neutrons, MeV
+En_prime = 0.025e-06;    // Thermal energy of the neutrons, MeV
+n = 1/xi*log(E0/En_prime);    // Average number of collisions needed for neutrons to thermalize
+En_half = 1/2*E0;    // Half of the initial energy of neutrons, MeV
+n_half = 1/xi*log(E0/En_half);    // Number of collsions for half the initial energy of neutrons
+printf("\nThe average number of collsions for thermalization of neutrons = %2d", n);
+printf("\nThe number of collsions for half the initial energy of neutrons = %3.1f", n_half);
+// Result 
+// The average number of collsions for thermalization of neutrons = 88
+// The number of collsions for half the initial energy of neutrons = 3.4
\ No newline at end of file
-- 
cgit