Skip to content

Commit

Permalink
Removes trailing space
Browse files Browse the repository at this point in the history
  • Loading branch information
gustavo-marques committed Jun 3, 2019
1 parent 4dd50c1 commit 1388ce7
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/parameterizations/lateral/MOM_MEKE.F90
Original file line number Diff line number Diff line change
Expand Up @@ -1195,7 +1195,7 @@ subroutine MEKE_alloc_register_restart(HI, param_file, MEKE, restart_CS)
call register_restart_field(MEKE%MEKE, vd, .false., restart_CS)
if (MEKE_GMcoeff>=0.) then
allocate(MEKE%GM_src(isd:ied,jsd:jed)) ; MEKE%GM_src(:,:) = 0.0
endif
endif
if (MEKE_FrCoeff>=0. .or. MEKE_GMECoeff>=0.) then
allocate(MEKE%mom_src(isd:ied,jsd:jed)) ; MEKE%mom_src(:,:) = 0.0
endif
Expand Down

0 comments on commit 1388ce7

Please sign in to comment.