Skip to content

Commit

Permalink
Resolved a line truncation issue
Browse files Browse the repository at this point in the history
  • Loading branch information
yichengt900 committed Jan 2, 2025
1 parent 9f3b445 commit 9ac2e5a
Showing 1 changed file with 4 additions and 2 deletions.
6 changes: 4 additions & 2 deletions src/tracer/MOM_generic_tracer.F90
Original file line number Diff line number Diff line change
Expand Up @@ -771,9 +771,11 @@ subroutine MOM_generic_tracer_column_physics(h_old, h_new, ea, eb, fluxes, Hml,
mld_pha(:,:) = CS%mld_pha_val
else
if (CS%mld_pha_use_delta_rho) then
call diagnoseMLDbyDensityDifference(-1, h_old, tv, CS%mld_pha_drho, G, GV, US, CS%diag, CS%mld_pha_href, id_ref_z=-1, id_ref_rho=-1, MLD_out=mld_pha)
call diagnoseMLDbyDensityDifference(-1, h_old, tv, CS%mld_pha_drho, G, GV, US, CS%diag, &
CS%mld_pha_href, id_ref_z=-1, id_ref_rho=-1, MLD_out=mld_pha)
elseif (CS%mld_pha_use_delta_eng) then
call diagnoseMLDbyEnergy((/-1, -1, -1/), h_old, tv, G, GV, US, (/CS%mld_pha_deng, CS%mld_pha_deng, CS%mld_pha_deng/), CS%diag, MLD_out=mld_pha)
call diagnoseMLDbyEnergy((/-1, -1, -1/), h_old, tv, G, GV, US, (/CS%mld_pha_deng, &
CS%mld_pha_deng, CS%mld_pha_deng/), CS%diag, MLD_out=mld_pha)
endif
endif

Expand Down

0 comments on commit 9ac2e5a

Please sign in to comment.