IndexRundeck: E6F40Created: Fri May 17 03:30:27 EDT 2024

epflux

Module:
File: STRAT_DIAG.f
Summary: EPFLUX calculates finite difference EP Flux on B-grid
Author : B. Suozzo/J. Lerner
Version:

Declaration:
Variables:
lm : used from resolution

getdomainbounds : used from domain_decomp_1d

halo_update : used from domain_decomp_1d

south : used from domain_decomp_1d

north : used from domain_decomp_1d

halo_updatej : used from domain_decomp_1d

grid : used from domain_decomp_atm

im : used from resolution

jm : used from resolution

dxv : used from geom

rapvn : used from geom

rapvs : used from geom

fcor : used from geom

dxyv : used from geom

cosv : used from geom

cosp : used from geom

sd : used from dynamics

byim : used from diag_com

pl : used from diag_com
Initial Value = >plm
agc : used from gc_com
Initial Value = >agc_loc
kagc : used from gc_com

kep : used from gc_com

pdsigl00 : used from atm_com

w : real*8, dimension(:, :, :), allocatable

u : real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lm)

v : real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lm)

t : real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lm)

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

uv : real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lm)

uw : real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lm)

fd : real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lm)

stb : real*8, dimension(grid%j_strt_halo:grid%j_stop_halo, lm)

ti : real*8, dimension(grid%j_strt_halo:grid%j_stop_halo, lm)

ax : real*8, dimension(grid%j_strt_halo:grid%j_stop_halo, lm)

vr : real*8, dimension(grid%j_strt_halo:grid%j_stop_halo, lm)

wr : real*8, dimension(grid%j_strt_halo:grid%j_stop_halo, lm)

rx : real*8, dimension(grid%j_strt_halo:grid%j_stop_halo, lm)

ui : real*8, dimension(grid%j_strt_halo:grid%j_stop_halo, lm)

vi : real*8, dimension(grid%j_strt_halo:grid%j_stop_halo, lm)

wi : real*8, dimension(grid%j_strt_halo:grid%j_stop_halo, lm)

rxcl : real*8, dimension(LM)

ucl : real*8, dimension(LM)

wxxs : real*8, dimension(IM)

wxxn : real*8, dimension(IM)

xep : real*8, dimension(GRID%J_STRT_HALO:GRID%J_STOP_HALO, LM, KEP)

i : integer

j : integer

l : integer

n : integer

im1 : integer

ip1 : integer

ucb : real*8

uct : real*8

ucm : real*8

alph : real*8

rxc : real*8

i_0 : integer

i_1 : integer

j_1 : integer

j_0 : integer

j_0h : integer

j_1h : integer

j_0s : integer

j_1s : integer

j_0stg : integer

j_1stg : integer

have_south_pole : logical

have_north_pole : logical

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

Contact GISS NASA Privacy PolicyAccessibility