From ef8165dc661d0fc6bf01f9d138fdcc8595eea272 Mon Sep 17 00:00:00 2001 From: Connor Moore Date: Fri, 10 Apr 2026 03:21:57 -0400 Subject: Added reference comparison with GNAT and script for extracing percent differences. Also plot them. --- main.f90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'main.f90') 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) -- cgit v1.2.3