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

compute_gz

Module:
File: ATM_UTILS.f
Summary: COMPUTE_GZ calculates geopotential on model levels.
Author : Original development team
Version:

Declaration:
Variables:
ls1 : used from resolution

ptop : used from resolution

psfmpt : used from resolution

im : used from resolution

jm : used from resolution

lm : used from resolution

zatmo : used from atm_com

dsig : used from dynamics

sige : used from dynamics

sig : used from dynamics

grid : used from domain_decomp_atm

getdomainbounds : used from domain_decomp_atm

grav : used from constant

rgas : used from constant

kapa : used from constant

bykapa : used from constant

bykapap1 : used from constant

bykapap2 : used from constant

imaxj : used from geom

i : integer

j : integer

l : integer

p : real*8, dimension(grid%i_strt_halo:grid%i_stop_halo, grid%j_strt_halo:grid%j_stop_halo)

t : real*8, dimension(grid%i_strt_halo:grid%i_stop_halo, grid%j_strt_halo:grid%j_stop_halo, lm)

tz : real*8, dimension(grid%i_strt_halo:grid%i_stop_halo, grid%j_strt_halo:grid%j_stop_halo, lm)

gz : real*8, dimension(grid%i_strt_halo:grid%i_stop_halo, grid%j_strt_halo:grid%j_stop_halo, lm)

phidn : real*8, dimension(grid%i_strt_halo:grid%i_stop_halo, grid%j_strt_halo:grid%j_stop_halo)

pkdn : real*8, dimension(grid%i_strt_halo:grid%i_stop_halo, grid%j_strt_halo:grid%j_stop_halo)

pke : real*8, dimension(LS1:LM+1)

pdn : real*8

pkpdn : real*8

pkppdn : real*8

pup : real*8

pkup : real*8

pkpup : real*8

pkppup : real*8

dp : real*8

p0 : real*8

bydp : real*8

pkdnl : real*8

tzbydp : real*8

dpk : real*8

dpkp : real*8

dpkpp : real*8

dphidt : real*8

dphidtz : real*8

dphimdt : real*8

dphimdtz : real*8

i_0 : integer

i_1 : integer

j_0 : integer

j_1 : integer

have_south_pole : logical

have_north_pole : logical

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

Contact GISS NASA Privacy PolicyAccessibility