summaryrefslogtreecommitdiff
path: root/1004/CH9/EX9.4/Ch09Ex4.sci
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1004/CH9/EX9.4/Ch09Ex4.sci
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1004/CH9/EX9.4/Ch09Ex4.sci')
-rwxr-xr-x1004/CH9/EX9.4/Ch09Ex4.sci13
1 files changed, 13 insertions, 0 deletions
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