summaryrefslogtreecommitdiff
path: root/main.f90
diff options
context:
space:
mode:
authorConnor Moore <connor@hhmoore.ca>2026-04-10 03:21:57 -0400
committerConnor Moore <connor@hhmoore.ca>2026-04-10 03:21:57 -0400
commitef8165dc661d0fc6bf01f9d138fdcc8595eea272 (patch)
tree31f3eb6fabac91186f5da3d1ab5ec2f7595c7b25 /main.f90
parent3d9865a95064589a94285a1c77db36f4a38e0c13 (diff)
Added reference comparison with GNAT and script for extracing percent differences. Also plot them.HEADmaster
Diffstat (limited to 'main.f90')
-rw-r--r--main.f904
1 files changed, 2 insertions, 2 deletions
diff --git a/main.f90 b/main.f90
index cd61bc5..2575d9d 100644
--- a/main.f90
+++ b/main.f90
@@ -4,8 +4,8 @@ program monte_carlo
implicit none
!> Initialize some variables for neutrons
- integer(int64), parameter :: n = 1e7
- integer(int64), parameter :: bins = 800
+ integer(int64), parameter :: n = 4e8
+ integer(int64), parameter :: bins = 1001
real(real64), parameter :: eps = 1.0e-6_real64
real(real64), parameter :: pi = 4.0_real64 * atan(1.0_real64)