crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-27 21:55:41 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Turn tallies on for fixed source.

Browse source
This commit is contained in:
Paul Romano 2012-07-30 14:10:00 -04:00
parent 3d2283d6df
commit 78224fdb64
2 changed files with 7 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/fixed_source.F90
View file

@ -21,13 +21,14 @@ contains
if (master) call header("BEGIN SIMULATION", level=1)
tallies_on = .true.
call timer_start(time_inactive)
! Allocate particle and dummy source site
allocate(p)
allocate(source_site)
! Turn timer and tallier on
tallies_on = .true.
call timer_start(time_active)
! ==========================================================================
! LOOP OVER BATCHES
BATCH_LOOP: do current_batch = 1, n_batches

5
src/input_xml.F90
View file

@ -142,8 +142,9 @@ contains
if (n_particles == 0) n_particles = str_to_int(fixed_source_ % particles)
! Copy batch information
n_batches = fixed_source_ % batches
n_active = fixed_source_ % batches
n_batches = fixed_source_ % batches
n_active = fixed_source_ % batches
gen_per_batch = 1
end if
! Check number of active batches