diff --git a/src/grid_mod.F90 b/src/grid_mod.F90 index 8f5be3dfa155bf88a363ed3100a3c52a28e18984..07f48202618583bc513e5640832a0fb247e934a0 100644 --- a/src/grid_mod.F90 +++ b/src/grid_mod.F90 @@ -94,8 +94,6 @@ CONTAINS ikrs = local_nkr_offset + 1 ikre = ikrs + local_nkr - 1 - IF (my_id .EQ. num_procs-1) ikre = Nkr - !WRITE(*,*) 'ID = ',my_id,' ikrs = ', ikrs, ' ikre = ', ikre ! Grid spacings IF (Lr .EQ. 0) THEN deltakr = 1._dp