Index

Rundeck: P1SoM40

Created: Fri May 10 03:30:18 EDT 2024

aflux

Module: ATMDYN

File: ATMDYN.f

Summary: AFLUX Calculates horizontal/vertical air mass fluxes Input: NS = decrementing leap-frog time step counter MA,MASUM (kg/m^2), U,V (m/s) = step center values ME,MESUM (kg/m^2) = mass at beginning of time step Output: MU,MV (kg/s) = horizontal mass fluxes MW (kg/s) = MW(L-1) + (CONV-CONVs + MM-MMs)*MFRAC/MFRACs CONV (kg/s) = horizontal mass convergence SPA (.5 m/s) = filtered (U+U) defined on eastern cell edge
Author :
Version:

---

Declaration:

subroutine aflux (ns, u, v, ma, masum, me, mesum)

Variables:

im : used from resolution

jm : used from resolution

lm : used from resolution

ls1 : used from resolution

mfix : used from resolution

mfixs : used from resolution

mfrac : used from resolution

zatmo : used from atm_com

imaxj : used from geom

dxyp : used from geom

dyp : used from geom

dxv : used from geom

polwt : used from geom

dt : used from dynamics

mu : used from dynamics

mv : used from dynamics

mw : used from dynamics

conv : used from dynamics

spa : used from dynamics

do_polefix : used from dynamics

grid : used from domain_decomp_atm

getdomainbounds : used from domain_decomp_1d

south : used from domain_decomp_1d

north : used from domain_decomp_1d

halo_update : used from domain_decomp_1d

ns : integer, intent(in)

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)

ma : real*8, intent(inout), dimension(LM, IM, GRID%J_STRT_HALO:GRID%J_STOP_HALO)

masum : real*8, intent(inout), dimension(IM, GRID%J_STRT_HALO:GRID%J_STOP_HALO)

me : real*8, intent(in), dimension(LM, IM, GRID%J_STRT_HALO:GRID%J_STOP_HALO)

mesum : real*8, intent(in), dimension(IM, GRID%J_STRT_HALO:GRID%J_STOP_HALO)

twoby3 : real*8, parameter

Initial Value = 2/3d0

i : integer

j : integer

l : integer

ip1 : integer

im1 : integer

j1 : integer

j1xp : integer

j1h : integer

j1v : integer

jn : integer

jnxp : integer

jnh : integer

jnv : integer

qsp : logical

qnp : logical

dummys : real*8, dimension(IM)

mus : real*8

mvs : real*8

pbs : real*8

mvsa : real*8, dimension(LM)

znsxdt : real*8

dummyn : real*8, dimension(IM)

mun : real*8

mvn : real*8

pbn : real*8

mvna : real*8, dimension(LM)

usv0 : real*8, dimension(IM, 2, LM)

vsv0 : real*8, dimension(IM, 2, LM)

m : real*8

convs : real*8

mvars : real*8