Skip to content

Commit

Permalink
cleanup no longer needed write statements
Browse files Browse the repository at this point in the history
  • Loading branch information
rfiorella committed Oct 1, 2024
1 parent aeb0bfe commit c78d8b1
Showing 1 changed file with 0 additions and 1 deletion.
1 change: 0 additions & 1 deletion components/elm/src/main/surfrdUtilsMod.F90
Original file line number Diff line number Diff line change
Expand Up @@ -72,7 +72,6 @@ subroutine check_sums_equal_1_3d(arr, lb, name, caller)
if (found) then
write(iulog,*) trim(caller), ' ERROR: sum of ', trim(name), ' not 1.0 at nl=', nindx, ' and t=', tindx
write(iulog,*) 'sum is: ', sum(arr(nindx,t,:))
write(iulog,*) arr(nindx,t,:)
call endrun(msg=errMsg(__FILE__, __LINE__))
end if

Expand Down

0 comments on commit c78d8b1

Please sign in to comment.