Skip to content

Commit

Permalink
Merge branch 'liho745/river/bug-fix-7261273' into next (PR #6110)
Browse files Browse the repository at this point in the history
In commit 7261273, an integer variable, numSubSteps, was mistakenly defined as a real variable. This PR fixes this bug.

Fixes #5908
[BFB]
  • Loading branch information
bishtgautam committed Jan 4, 2024
2 parents 394fd90 + 4416b05 commit ab7c7e0
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion components/mosart/src/riverroute/MOSART_physics_mod.F90
Original file line number Diff line number Diff line change
Expand Up @@ -64,7 +64,8 @@ subroutine Euler
integer :: iunit, idam, m, k, unitUp, cnt, ier, dd, nSubStep !local index
real(r8) :: temp_erout, localDeltaT, temp_haout, temp_Tt, temp_Tr, temp_T, temp_ha
real(r8) :: mud_erout, san_erout, temp_ehexch, temp_etexch, temp_erexch
real(r8) :: negchan, numSubSteps
real(r8) :: negchan
integer :: numSubSteps
integer :: yr,mon,day,tod
real(r8) :: myTINYVALUE
character(len=*),parameter :: subname = '(Euler)'
Expand Down

0 comments on commit ab7c7e0

Please sign in to comment.