Skip to content

Commit

Permalink
Split excessively long lines in MOM_file_parser
Browse files Browse the repository at this point in the history
  Split several recently introduced excessively long lines in
MOM_file_parser.F90.  All answers are bitwise identical.
  • Loading branch information
Hallberg-NOAA committed May 8, 2018
1 parent 668f13a commit 3bc5d09
Showing 1 changed file with 6 additions and 3 deletions.
9 changes: 6 additions & 3 deletions src/framework/MOM_file_parser.F90
Original file line number Diff line number Diff line change
Expand Up @@ -618,7 +618,8 @@ end subroutine read_param_int

!> This subroutine reads the values of an array of integer model parameters from a parameter file.
subroutine read_param_int_array(CS, varname, value, fail_if_missing)
type(param_file_type), intent(in) :: CS !< The control structure for this parameter, which is also a structure to parse for run-time parameters
type(param_file_type), intent(in) :: CS !< The control structure for the file_parser module,
!! it is also a structure to parse for run-time parameters
character(len=*), intent(in) :: varname !< The case-sensitive name of the parameter to read
integer, dimension(:), intent(inout) :: value !< The value of the parameter that may be
!! read from the parameter file
Expand Down Expand Up @@ -1349,7 +1350,8 @@ subroutine log_param_int_array(CS, modulename, varname, value, desc, &
!! present, this paramter is not written to a doc file
character(len=*), optional, intent(in) :: units !< The units of this parameter
integer, optional, intent(in) :: default !< The default value of the parameter
logical, optional, intent(in) :: layoutParam !< If present and true, this paramter is logged in the layout parameter file
logical, optional, intent(in) :: layoutParam !< If present and true, this paramter is
!! logged in the layout parameter file
logical, optional, intent(in) :: debuggingParam !< If present and true, this paramter is
!! logged in the debugging parameter file
! This subroutine writes the value of an integer parameter to a log file,
Expand Down Expand Up @@ -1682,7 +1684,8 @@ subroutine get_param_int_array(CS, modulename, varname, value, desc, units, &
!! it is also a structure to parse for run-time parameters
character(len=*), intent(in) :: modulename !< The name of the calling module
character(len=*), intent(in) :: varname !< The case-sensitive name of the parameter to read
integer, dimension(:), intent(inout) :: value !< The value of the parameter that may be reset from the parameter file
integer, dimension(:), intent(inout) :: value !< The value of the parameter that may be reset
!! from the parameter file
character(len=*), optional, intent(in) :: desc !< A description of this variable; if not
!! present, this paramter is not written to a doc file
character(len=*), optional, intent(in) :: units !< The units of this parameter
Expand Down

0 comments on commit 3bc5d09

Please sign in to comment.