mirror of
https://github.com/openmc-dev/openmc.git
synced 2026-07-28 22:26:08 -04:00
remove calls to no-existent subroutine
This commit is contained in:
parent
2eeb002a6d
commit
5cbaffbcc2
1 changed files with 1 additions and 3 deletions
|
|
@ -6,7 +6,7 @@ module fixed_source
|
|||
|
||||
use constants, only: ZERO, MAX_LINE_LEN
|
||||
use global
|
||||
use output, only: write_message, header, print_batch_leakage
|
||||
use output, only: write_message, header
|
||||
use particle_header, only: Particle
|
||||
use random_lcg, only: set_particle_seed
|
||||
use source, only: sample_external_source, copy_source_attributes
|
||||
|
|
@ -133,8 +133,6 @@ contains
|
|||
call synchronize_tallies()
|
||||
call time_tallies % stop()
|
||||
|
||||
if (master) call print_batch_leakage()
|
||||
|
||||
! Check_triggers
|
||||
if (master) call check_triggers()
|
||||
#ifdef MPI
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue