Skip to content

Commit

Permalink
dOxyGenized MOM_obsolete_diagnostics.F90
Browse files Browse the repository at this point in the history
  Added dOxyGen comments for all remaining routines and arguments in
MOM_obsolete_diagnostics.F90.  All answers are bitwise identical.
  • Loading branch information
Hallberg-NOAA committed May 8, 2018
1 parent 3c95708 commit f5fa06c
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions src/diagnostics/MOM_obsolete_diagnostics.F90
Original file line number Diff line number Diff line change
Expand Up @@ -64,9 +64,9 @@ end subroutine register_obsolete_diagnostics
!> Fakes a register of a diagnostic to find out if an obsolete
!! parameter appears in the diag_table.
logical function found_in_diagtable(diag, varName, newVarName)
type(diag_ctrl), intent(in) :: diag
character(len=*), intent(in) :: varName
character(len=*), optional, intent(in) :: newVarName
type(diag_ctrl), intent(in) :: diag !< A structure used to control diagnostics.
character(len=*), intent(in) :: varName !< The obsolete diagnostic name
character(len=*), optional, intent(in) :: newVarName !< The valid name of this diagnostic
! Local
integer :: handle ! Integer handle returned from diag_manager

Expand Down

0 comments on commit f5fa06c

Please sign in to comment.