Skip to content

Commit

Permalink
dOxyGenized subroutines in combined_ice_ocean_driver.F90
Browse files Browse the repository at this point in the history
  Added dOxyGenized comments for all of the subroutines, functions and arguments
in combined_ice_ocean_driver.F90.  All answers are bitwise identical.
  • Loading branch information
Hallberg-NOAA committed Jul 2, 2018
1 parent b1d2aec commit 5193fd7
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion src/combined_ice_ocean_driver.F90
Original file line number Diff line number Diff line change
Expand Up @@ -193,7 +193,8 @@ end subroutine update_slow_ice_and_ocean
!> same_domain returns true if two domains use the same list of PEs and have
!! the same size computational domains.
function same_domain(a, b)
type(domain2D), intent(in) :: a, b
type(domain2D), intent(in) :: a !< The first domain in the comparison
type(domain2D), intent(in) :: b !< The second domain in the comparison
integer :: isize_a, jsize_a, isize_b, jsize_b
integer :: layout_a(2), layout_b(2)
logical :: same_domain
Expand Down

0 comments on commit 5193fd7

Please sign in to comment.