Skip to content

Commit

Permalink
Fix indenting of fluxes@seaice_melt association check
Browse files Browse the repository at this point in the history
  • Loading branch information
Henri Drake committed Feb 4, 2025
1 parent 791521c commit 5fd1689
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/core/MOM_forcing_type.F90
Original file line number Diff line number Diff line change
Expand Up @@ -552,7 +552,7 @@ subroutine extractFluxes1d(G, GV, US, fluxes, optics, nsw, j, dt, &
(.not.associated(fluxes%fprec))) call MOM_error(FATAL, &
"MOM_forcing_type extractFluxes1d: fluxes%lprec or fluxes%fprec not associated.")

if (.not.associated(fluxes%seaice_melt)) call MOM_error(FATAL, &
if (.not.associated(fluxes%seaice_melt)) call MOM_error(FATAL, &
"MOM_forcing_type extractFluxes1d: fluxes%seaice_melt is not associated.")

do i=is,ie ; htot(i) = h(i,1) ; enddo
Expand Down

0 comments on commit 5fd1689

Please sign in to comment.