gkowal/amun-code
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge branch 'master' into reconnection

Browse Source
This commit is contained in:
Grzegorz Kowal 2019-02-18 12:07:52 -03:00
commit 9eb3293245
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
sources/driver.F90
View File

@ -348,6 +348,12 @@ program amun
! !
call get_parameter("ndat", ndat) call get_parameter("ndat", ndat)
! print the problem name here, so in initialize_user_problem() we can print
! parameters
!
call print_section(master, "Problem")
call print_parameter(master, "problem name", trim(problem))
! initialize the remaining modules ! initialize the remaining modules
! !
call initialize_random(1, 0) call initialize_random(1, 0)
@ -492,8 +498,6 @@ program amun
! print module information ! print module information
! !
call print_section(master, "Problem")
call print_parameter(master, "problem name", trim(problem))
call print_equations(master) call print_equations(master)
call print_sources(master) call print_sources(master)
call print_coordinates(master) call print_coordinates(master)