Skip to content

Commit

Permalink
Merge pull request mom-ocean#861 from nikizadehgfdl/patch-1
Browse files Browse the repository at this point in the history
Add missing logical condition for v_extensive
  • Loading branch information
Hallberg-NOAA authored Oct 19, 2018
2 parents ef9ecf2 + 4e9c9bd commit ad3bcc1
Showing 1 changed file with 2 additions and 0 deletions.
2 changes: 2 additions & 0 deletions src/framework/MOM_diag_mediator.F90
Original file line number Diff line number Diff line change
Expand Up @@ -1786,13 +1786,15 @@ subroutine attach_cell_methods(id, axes, ostring, cell_methods, &
ostring = trim(adjustl(ostring))//' '//trim(axis_name)//':'//trim(v_cell_method)
endif
elseif (present(v_extensive)) then
if(v_extensive) then
if (axes%rank==1) then
call get_diag_axis_name(axes%handles(1), axis_name)
elseif (axes%rank==3) then
call get_diag_axis_name(axes%handles(3), axis_name)
endif
call diag_field_add_attribute(id, 'cell_methods', trim(axis_name)//':sum')
ostring = trim(adjustl(ostring))//' '//trim(axis_name)//':sum'
endif
else
if (len(trim(axes%v_cell_method))>0) then
if (axes%rank==1) then
Expand Down

0 comments on commit ad3bcc1

Please sign in to comment.