IndexRundeck: P1SoM40Created: Thu May 9 03:30:17 EDT 2024

oadvty2

Module:
File: OCNDYN2.f
Summary: OADVTY advects tracer in Y direction via Linear Upstream Scheme
Author :
Version:

Declaration:
Variables:
im : used from ocean

jm : used from ocean

lmo : used from ocean

lmom : used from ocean
Initial Value = >LMM
lmov : used from ocean
Initial Value = >LMV
nbyzm : used from ocean

i1yzm : used from ocean

i2yzm : used from ocean

nbyzv : used from ocean

i1yzv : used from ocean

i2yzv : used from ocean

grid : used from oceanr_dim
Initial Value = >oGRID
halo_update : used from domain_decomp_1d

hassouthpole : used from domain_decomp_1d

hasnorthpole : used from domain_decomp_1d

qlimit : logical, intent(in)

dt : real*8, intent(in)

mv : real*8, intent(in), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)

rm : real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)

rx : real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)

ry : real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)

rz : real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)

mo : real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)

oijl : real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)

qnp : logical

i : integer

j : integer

l : integer

j1h : integer

j1p : integer

jnp : integer

jn : integer

n : integer

imin : integer

imax : integer

bm : real*8

b : real*8

fm : real*8

fx : real*8

fy : real*8

fz : real*8

mnew : real*8

rylimit : real*8

bmjm1 : real*8, dimension(im)

fmjm1 : real*8, dimension(im)

fxjm1 : real*8, dimension(im)

fyjm1 : real*8, dimension(im)

fzjm1 : real*8, dimension(im)

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

Contact GISS NASA Privacy PolicyAccessibility