Skip to content

Commit cf4c5b9

Browse files
authored
Removed trailing white spaces
1 parent 7b8f824 commit cf4c5b9

1 file changed

Lines changed: 2 additions & 2 deletions

File tree

src/shared/cvmix_kpp.F90

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1244,11 +1244,11 @@ subroutine cvmix_coeffs_kpp_low(Mdiff_out, Tdiff_out, Sdiff_out, zw, zt, &
12441244
sigma_max = (F_inter_func * E_h) / ( 1.7908*(F_inter_func * E_h) + 0.6904)
12451245
!!! capping sigma_max between 0.1 and 0.7
12461246
sigma_max = min( max(sigma_max, 0.1), 0.7)
1247-
endif
1247+
endif
12481248
do kw=2,kwup
12491249
! (3b) Evaluate G(sigma) at each cell interface
12501250

1251-
if (CVmix_kpp_params_in%ML_diffusivity) then ! ML_diffusivity
1251+
if (CVmix_kpp_params_in%ML_diffusivity) then ! ML_diffusivity
12521252

12531253
! ML-diffusivity modification:
12541254
if (sigma(kw) .le. sigma_max ) then ! ML based shape function

0 commit comments

Comments
 (0)