it's a process, not a thread
This commit is contained in:
parent
9c75674b20
commit
bb471cb923
|
@ -84,7 +84,7 @@ subroutine discretization_grid_init(restart)
|
|||
PETSC_COMM_WORLD, &
|
||||
z, & ! domain grid size along z
|
||||
z_offset) ! domain grid offset along z
|
||||
if(z==0_C_INTPTR_T) call IO_error(894, ext_msg='invalid number of threads')
|
||||
if(z==0_C_INTPTR_T) call IO_error(894, ext_msg='Cannot distribute MPI processes')
|
||||
|
||||
grid3 = int(z)
|
||||
grid3Offset = int(z_offset)
|
||||
|
|
|
@ -606,7 +606,6 @@ real(pReal) function utilities_divergenceRMS()
|
|||
if(ierr /=0) error stop 'MPI error'
|
||||
utilities_divergenceRMS = sqrt(utilities_divergenceRMS) * wgt ! RMS in real space calculated with Parsevals theorem from Fourier space
|
||||
|
||||
|
||||
end function utilities_divergenceRMS
|
||||
|
||||
|
||||
|
|
Loading…
Reference in New Issue