Get rid of defaults for current_batch and current_gen

This commit is contained in:
Paul Romano 2017-07-30 08:28:05 -05:00
parent 894e95d901
commit 1066489c66
2 changed files with 5 additions and 7 deletions

View file

@ -131,8 +131,6 @@ contains
check_overlaps = .false.
confidence_intervals = .false.
create_fission_neutrons = .true.
current_batch = 0
current_gen = 0
energy_cutoff = ZERO
energy_max_neutron = INFINITY
energy_min_neutron = ZERO
@ -144,12 +142,12 @@ contains
legendre_to_tabular = .true.
legendre_to_tabular_points = 33
n_batch_interval = 1
n_filters = 0
n_meshes = 0
n_filters = 0
n_meshes = 0
n_particles = 0
n_source_points = 0
n_state_points = 0
n_tallies = 0
n_tallies = 0
n_user_filters = 0
n_user_meshes = 0
n_user_tallies = 0

View file

@ -222,8 +222,8 @@ module global
integer :: n_inactive ! # of inactive batches
integer :: n_active ! # of active batches
integer :: gen_per_batch = 1 ! # of generations per batch
integer :: current_batch = 0 ! current batch
integer :: current_gen = 0 ! current generation within a batch
integer :: current_batch ! current batch
integer :: current_gen ! current generation within a batch
integer :: total_gen = 0 ! total number of generations simulated
! ============================================================================