summaryrefslogtreecommitdiff
path: root/1970/CH13/EX13.2/CH13Exa2.sce
blob: ab3bc435bd725ab5b836b51bf756fb440354d13d (plain)
1
2
3
4
5
6
7
8
9
10
11
// Scilab code Exa13.2 : : Page-600 (2011)
clc; clear;
E = 200*1.6e-13;        // Energy released per fission, joules per neutron
t = 10^-3;            // Time, sec
P = E/t;              // Power produced by one free neutron, watt per neutron
P_l = 10^9;            // Power level, watt
N = P_l/P;            // Number of free neutrons in the reactor, neutrons
printf("\nThe number of free neutrons in the reactor = %5.3e neutrons", N);

// Result
// The number of free neutrons in the reactor = 3.125e+016 neutrons