Skip to content

Commit

Permalink
line count
Browse files Browse the repository at this point in the history
  • Loading branch information
mcallic2 committed Aug 14, 2023
1 parent 95346e0 commit a8ea154
Showing 1 changed file with 6 additions and 4 deletions.
10 changes: 6 additions & 4 deletions diag_manager/fms_diag_axis_object.F90
Original file line number Diff line number Diff line change
Expand Up @@ -296,9 +296,10 @@ subroutine write_axis_metadata(this, fms2io_fileobj, edges_in_file, parent_axis)
class(FmsNetcdfFile_t), INTENT(INOUT) :: fms2io_fileobj !< Fms2_io fileobj to write the data to
logical, INTENT(IN) :: edges_in_file !< .True. if the edges to this axis are
!! already in the file
class(fmsDiagAxis_type), OPTIONAL, target, INTENT(IN) :: parent_axis !< If the axis is a subaxis, axis object
!! for the parent axis (this will be used
!! to get some of the metadata info)
class(fmsDiagAxis_type), OPTIONAL, target, INTENT(IN) :: parent_axis !< If the axis is a subaxis, axis
!! object for the parent axis
!! (this will be used to get some
!! of the metadata info)

character(len=:), ALLOCATABLE :: axis_edges_name !< Name of the edges, if it exist
character(len=:), pointer :: axis_name !< Name of the axis
Expand Down Expand Up @@ -743,7 +744,8 @@ subroutine fill_subaxis(this, starting_index, ending_index, axis_id, parent_id,
integer , intent(in) :: starting_index !< Starting index of the subRegion for the PE
integer , intent(in) :: ending_index !< Ending index of the subRegion for the PE
integer , intent(in) :: axis_id !< Axis id to assign to the subaxis
integer , intent(in) :: parent_id !< The id of the parent axis, the subaxis belongs to
integer , intent(in) :: parent_id !< The id of the parent axis,
!! the subaxis belongs to
character(len=*) , intent(in) :: parent_axis_name !< Name of the parent_axis
real(kind=r4_kind), optional, intent(in) :: zbounds(2) !< Bounds of the z-axis

Expand Down

0 comments on commit a8ea154

Please sign in to comment.