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

dynsi

Module:
File: ICEDYN_DRV.f
Summary: DYNSI calculates ice velocites Note that the ice velocities are calculated on the ice grid
Author : M. Kelley (cubed sphere)
Version:

Declaration:
Variables:
rhoi : used from constant

grav : used from constant

omega : used from constant

rhows : used from constant

dts : used from model_com
Initial Value = >dtsrc
imicdyn : used from icedyn

jmicdyn : used from icedyn

nx1 : used from icedyn

ny1 : used from icedyn

ice_halo : used from domain_decomp_1d
Initial Value = >HALO_UPDATE
north : used from domain_decomp_1d

south : used from domain_decomp_1d

hassouthpole : used from domain_decomp_1d

hasnorthpole : used from domain_decomp_1d

getdomainbounds : used from domain_decomp_1d

dxyn : used from icedyn

dxys : used from icedyn

bydxyp : used from icedyn

dxyv : used from icedyn

dxp : used from icedyn

dyv : used from icedyn

grid_icdyn : used from icedyn

press : used from icedyn

heffm : used from icedyn

uvm : used from icedyn

dwatn : used from icedyn

cor : used from icedyn

sinwat : used from icedyn

coswat : used from icedyn

bydts : used from icedyn

sinen : used from icedyn

uice : used from icedyn

vice : used from icedyn

heff : used from icedyn

area : used from icedyn

gairx : used from icedyn

gairy : used from icedyn

gwatx : used from icedyn

gwaty : used from icedyn

pgfub : used from icedyn

pgfvb : used from icedyn

amass : used from icedyn

dmu : used from icedyn

dmv : used from icedyn

usi : used from icedyn

vsi : used from icedyn

ifocean : used from icedyn
Initial Value = >FOCEAN
icij : used from icedyn_com

ij_usi : used from icedyn_com

ij_vsi : used from icedyn_com

ij_dmui : used from icedyn_com

ij_dmvi : used from icedyn_com

ij_pice : used from icedyn_com

ij_rsi : used from icedyn_com

igice : used from icedyn_com

ace1i : used from seaice

band_pack : used from domain_decomp_1d

hassouthpole : used from domain_decomp_1d

hasnorthpole : used from domain_decomp_1d

pack_a2i : used from icedyn_com

pack_i2a : used from icedyn_com

starttimer : used from timerpackage_mod
Initial Value = > start
stoptimer : used from timerpackage_mod
Initial Value = > stop
atmice_xchng_vars : used from exchange_types

iceocn_xchng_vars : used from exchange_types

icestate : used from seaice_com

atmice : type(atmice_xchng_vars)

iceocn : type(iceocn_xchng_vars)

si_ocn : type(icestate)

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

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

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

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

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

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

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

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

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

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

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

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

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

rsi : real*8, dimension(:, :), pointer

msi : real*8, dimension(:, :), pointer

snowi : real*8, dimension(:, :), pointer

focean : real*8, dimension(:, :), pointer

rsisave : real*8, dimension(:, :), pointer

dmua : real*8, dimension(:, :), pointer

dmva : real*8, dimension(:, :), pointer

uosurf : real*8, dimension(:, :), pointer

vosurf : real*8, dimension(:, :), pointer

dmui : real*8, dimension(:, :), pointer

dmvi : real*8, dimension(:, :), pointer

byrhoi : real*8, parameter
Initial Value = 1D0/RHOI
hemi : real*8

i : integer

j : integer

ip1 : integer

im1 : integer

dmuinp : real*8

dua : real*8

dva : real*8

rsib : real*8

aim : integer

ajm : integer

ij_1 : integer

ij_0 : integer

ij_1s : integer

ij_0s : integer

ij_1h : integer

ij_0h : integer

ij_1stg : integer

ij_0stg : integer

ai_1 : integer

ai_0 : integer

aj_1 : integer

aj_0 : integer

ai_1h : integer

ai_0h : integer

aj_1h : integer

aj_0h : integer

aj_1s : integer

aj_0s : integer

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

Contact GISS NASA Privacy PolicyAccessibility