Rundeck: P1SoM40

Created: Thu May 9 03:30:17 EDT 2024

Summary: Applies limiter to GM flux divergence to prevent tracer quantities from becoming negative.
Author :
Version:

Declaration:

subroutine wrapadjustfluxes(trm, flux_x, flux_y, flux_z, gijl)

Variables:

trm : real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo), intent(inout)
flux_x : real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo), intent(inout)
flux_y : real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo), intent(inout)
flux_z : real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo), intent(inout)
gijl : real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo, 3), intent(inout)
conv : real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
convadj_j : real*8, dimension(grid%j_strt_halo:grid%j_stop_halo)
convpos_j : real*8, dimension(grid%j_strt_halo:grid%j_stop_halo)
sumadj : real*8
sumpos : real*8
posadj : real*8
i : integer
j : integer
l : integer
j_0s : integer
j_1s : integer
j_0 : integer
j_1 : integer
have_north_pole : logical
have_south_pole : logical

Simplex Website Curator: Igor Aleinov — NASA Official: Gavin A. Schmidt

National Aeronautics and Space Administration

Goddard Institute for Space Studies