summaryrefslogtreecommitdiff
path: root/3535/CH10/EX10.3/Ex10_3.sce
blob: 468908422d4cf4ebe0252531b1fafd536f65b525 (plain)
1
2
3
4
5
6
7
8
9
//Chapter 10, Example 10.3, Page 282
clc
clear
// Find the probability
P = exp(-6.85*10**-4*368)
Pnl = 1/(1+(578*6.85*10**-4))
printf("Fast-neutron nonleakage probability = %f \n",P)
printf(" Thermal-neutron nonleakage probability = %f \n",Pnl)
// Answer may vary due to round off error