summaryrefslogtreecommitdiff
path: root/3535/CH10/EX10.3/Ex10_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '3535/CH10/EX10.3/Ex10_3.sce')
-rw-r--r--3535/CH10/EX10.3/Ex10_3.sce9
1 files changed, 9 insertions, 0 deletions
diff --git a/3535/CH10/EX10.3/Ex10_3.sce b/3535/CH10/EX10.3/Ex10_3.sce
new file mode 100644
index 000000000..468908422
--- /dev/null
+++ b/3535/CH10/EX10.3/Ex10_3.sce
@@ -0,0 +1,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