linked cmfd_utils in main code and successfully printed from cmfd routine

This commit is contained in:
Bryan Herman 2011-10-28 19:23:42 -04:00
parent 85056be15e
commit 1fee45a858
2 changed files with 6 additions and 0 deletions

View file

@ -47,6 +47,8 @@ contains
subroutine print_cmfd()
write(7,*) 'hello world'
end subroutine print_cmfd
end module cmfd_utils

View file

@ -1,5 +1,6 @@
program main
use cmfd_utils, only: print_cmfd
use constants
use global
use initialize, only: initialize_run
@ -132,6 +133,9 @@ contains
! Calculate statistics for tallies
call tally_statistics()
! Call cmfd print routine
call print_cmfd()
if (master) call header("SIMULATION FINISHED", 1)
end subroutine run_problem