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 2014-08-09 09:32:31 -03:00
commit 9ff1fd879b
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/driver.F90
View File

@ -286,6 +286,14 @@ program amun
! !
call get_parameter_integer("ndat" , ndat) call get_parameter_integer("ndat" , ndat)
! initialize MPI module and print info
!
if (master) then
write (*,*)
write (*,"(1x,a)" ) "Parallelization:"
write (*,"(4x,a,1x,i6 )" ) "MPI processes =", nprocs
end if
! set up the MPI geometry ! set up the MPI geometry
! !
call setup_mpi(div(:), per(:), .false.) call setup_mpi(div(:), per(:), .false.)