diff options
Diffstat (limited to 'main.f90')
| -rw-r--r-- | main.f90 | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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) |
