Skip to content

Commit

Permalink
Merge branch 'nikizadehgfdl-patch-1' into dev/gfdl
Browse files Browse the repository at this point in the history
  • Loading branch information
Hallberg-NOAA committed Nov 22, 2019
2 parents 547c0cd + 3072158 commit 702ff08
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/SIS_slow_thermo.F90
Original file line number Diff line number Diff line change
Expand Up @@ -1220,7 +1220,7 @@ subroutine SIS2_thermodynamics(IST, dt_slow, CS, OSS, FIA, IOF, G, IG)
qflx_lim_ice(i,j) = enth_to_melt * I_enth_units * Idt_slow
IOF%Enth_Mass_out_ocn(i,j) = IOF%Enth_Mass_out_ocn(i,j) - enth_ice_to_ocn
if (CS%ice_rel_salin > 0.0) then
salt_change(i,j) = salt_change(i,j) + IST%part_size(i,j,k) * salt_to_ice
salt_change(i,j) = salt_change(i,j) + salt_to_ice
endif
endif

Expand Down

0 comments on commit 702ff08

Please sign in to comment.