Skip to content

Commit

Permalink
Updates needed for fms2_io (#15)
Browse files Browse the repository at this point in the history
* Updates needed for fms2_io

* Updating variable naming
  • Loading branch information
laurenchilutti authored Feb 13, 2020
1 parent e8a55d3 commit 72bbfcc
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions tools/fv_diagnostics.F90
Original file line number Diff line number Diff line change
Expand Up @@ -25,7 +25,7 @@ module fv_diagnostics_mod
use fms_mod, only: write_version_number
use fms_io_mod, only: set_domain, nullify_domain, write_version_number
use time_manager_mod, only: time_type, get_date, get_time
use mpp_domains_mod, only: domain2d, mpp_update_domains, DGRID_NE
use mpp_domains_mod, only: domain2d, mpp_update_domains, DGRID_NE, NORTH, EAST
use diag_manager_mod, only: diag_axis_init, register_diag_field, &
register_static_field, send_data, diag_grid_init, &
diag_field_add_attribute
Expand Down Expand Up @@ -212,9 +212,9 @@ subroutine fv_diag_init(Atm, axes, Time, npx, npy, npz, p_ref)
! set_name=trim(field), Domain2=Domain, tile_count=n)

id_x = diag_axis_init('grid_x',grid_x,'degrees_E','x','cell corner longitude', &
set_name=trim(field),Domain2=Atm(n)%Domain, tile_count=n)
set_name=trim(field),Domain2=Atm(n)%Domain, tile_count=n, domain_position=EAST)
id_y = diag_axis_init('grid_y',grid_y,'degrees_N','y','cell corner latitude', &
set_name=trim(field), Domain2=Atm(n)%Domain, tile_count=n)
set_name=trim(field), Domain2=Atm(n)%Domain, tile_count=n, domain_position=NORTH)

! end do
! deallocate(grid_xt, grid_yt, grid_xe, grid_ye, grid_xn, grid_yn)
Expand Down

0 comments on commit 72bbfcc

Please sign in to comment.