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

ICEDYN

File: ICEDYN.f
Summary: ICEDYN holds local variables for dynamic sea ice
Author : Gavin Schmidt (based on code from Jinlun Zhang)
Version:

Subroutines:
form
FORM calculates ice dynamics input parameters for relaxation
geomicdyn

icdyn_masks

plast
PLAST Calculates strain rates and viscosity for dynamic ice
relax
RELAX calculates ice dynamics relaxation method

Global Variables:
radian : used from constant

radius : used from constant

twopi : used from constant

dist_grid : used from domain_decomp_1d

osurf_tilt : used from seaice

Used by: | :init_icedyn |
nx1 : integer
number of grid points in the longitudinal direction
Used by: | :alloc_icedyn | :dynsi | :init_icedyn | :vpicedyn |
ny1 : integer
number of grid points in the latitudinal direction
Used by: | :alloc_icedyn | :dynsi | :vpicedyn |
imicdyn : integer

Used by: | :alloc_icedyn | :dynsi | :get_uisurf | :init_icedyn |
jmicdyn : integer

Used by: | :alloc_icedyn | :dynsi | :get_uisurf | :init_icedyn |
nypole : integer

Used by: | :alloc_icedyn |
nxlcyc : integer

Used by: | :alloc_icedyn |
npol : integer
Initial Value = 1
lcyc : integer
Initial Value = 1
grid_nxy : type(dist_grid)

Used by: | :alloc_icedyn | :init_icedyn |
focean : real*8, dimension(:, :), allocatable
land/ocean mask on ice dynamic grid
Used by: | :alloc_icedyn | :init_icedyn |
grid_icdyn : type(dist_grid), target

Used by: | :alloc_icedyn | :alloc_icedyn_com | :def_meta_icdiag | :def_rsf_icdiag | :def_rsf_icedyn | :dynsi | :get_uisurf | :init_icedyn | :new_io_icdiag | :new_io_icedyn | :write_meta_icdiag |
heffm : real*8, dimension(:, :), allocatable
ice mass mask (1/0)
Used by: | :alloc_icedyn | :dynsi |
uvm : real*8, dimension(:, :), allocatable
ice velocity mask (1/0)
Used by: | :alloc_icedyn | :dynsi | :vpicedyn |
cor : real*8, dimension(:, :), allocatable
coriolis term for ice dynamic equation
Used by: | :alloc_icedyn | :dynsi |
gairy : real*8, dimension(:, :), allocatable
atmosphere-ice stress (B grid)
Used by: | :alloc_icedyn | :dynsi |
gairx : real*8, dimension(:, :), allocatable
atmosphere-ice stress (B grid)
Used by: | :alloc_icedyn | :dynsi |
gwaty : real*8, dimension(:, :), allocatable
ocean velocities (B grid) (m/s)
Used by: | :alloc_icedyn | :dynsi |
gwatx : real*8, dimension(:, :), allocatable
ocean velocities (B grid) (m/s)
Used by: | :alloc_icedyn | :dynsi |
pgfvb : real*8, dimension(:, :), allocatable
pressure accelaration force
Used by: | :alloc_icedyn | :dynsi |
pgfub : real*8, dimension(:, :), allocatable
pressure accelaration force
Used by: | :alloc_icedyn | :dynsi |
amass : real*8, dimension(:, :), allocatable
ice mass (kg/m^2)
Used by: | :alloc_icedyn | :dynsi | :vpicedyn |
vicec : real*8, dimension(:, :), allocatable
velocity arrays (m/s)
Used by: | :alloc_icedyn | :vpicedyn |
uicec : real*8, dimension(:, :), allocatable
velocity arrays (m/s)
Used by: | :alloc_icedyn | :vpicedyn |
vice : real*8, dimension(:, :, :), allocatable
velocity arrays (m/s)
Used by: | :alloc_icedyn | :dynsi | :init_icedyn | :vpicedyn |
uice : real*8, dimension(:, :, :), allocatable
velocity arrays (m/s)
Used by: | :alloc_icedyn | :dynsi | :init_icedyn | :vpicedyn |
heff : real*8, dimension(:, :), allocatable
ice thickness (mean over box) (m)
Used by: | :alloc_icedyn | :dynsi |
area : real*8, dimension(:, :), allocatable
ice area (frac)
Used by: | :alloc_icedyn | :dynsi |
press : real*8, dimension(:, :), allocatable
ice internal pressure (Pa)
Used by: | :alloc_icedyn | :dynsi |
forcey : real*8, dimension(:, :), allocatable
external force
Used by: | :alloc_icedyn |
forcex : real*8, dimension(:, :), allocatable
external force
Used by: | :alloc_icedyn |
draga : real*8, dimension(:, :), allocatable
symmetric/anti-symmetric drag terms
Used by: | :alloc_icedyn |
drags : real*8, dimension(:, :), allocatable
symmetric/anti-symmetric drag terms
Used by: | :alloc_icedyn |
zmin : real*8, dimension(:, :), allocatable
max,min values of ZETA
Used by: | :alloc_icedyn |
zmax : real*8, dimension(:, :), allocatable
max,min values of ZETA
Used by: | :alloc_icedyn |
zeta : real*8, dimension(:, :), allocatable
viscosities
Used by: | :alloc_icedyn |
eta : real*8, dimension(:, :), allocatable
viscosities
Used by: | :alloc_icedyn |
dwatn : real*8, dimension(:, :), allocatable
non-linear water drag term
Used by: | :alloc_icedyn | :dynsi |
dmv : real*8, dimension(:, :), allocatable
ice-ocean stress
Used by: | :alloc_icedyn | :dynsi |
dmu : real*8, dimension(:, :), allocatable
ice-ocean stress
Used by: | :alloc_icedyn | :dynsi |
usi : real*8, dimension(:, :), allocatable

Used by: | :alloc_icedyn | :def_rsf_icedyn | :dynsi | :init_icedyn | :new_io_icedyn |
vsi : real*8, dimension(:, :), allocatable

Used by: | :alloc_icedyn | :def_rsf_icedyn | :dynsi | :init_icedyn | :new_io_icedyn |
sinen : real*8, dimension(:, :), allocatable
sin(phi)
Used by: | :alloc_icedyn | :dynsi |
bydxdy : real*8, dimension(:, :), allocatable

Used by: | :alloc_icedyn |
dxu : real*8, dimension(:), allocatable
x-direction distances on tracer and velocity grid
Used by: | :alloc_icedyn | :vpicedyn |
dxt : real*8, dimension(:), allocatable
x-direction distances on tracer and velocity grid
Used by: | :alloc_icedyn |
dyu : real*8, dimension(:), allocatable
y-direction distances on tracer and velocity grid
Used by: | :alloc_icedyn | :vpicedyn |
dyt : real*8, dimension(:), allocatable
y-direction distances on tracer and velocity grid
Used by: | :alloc_icedyn |
oiphi : real*8, parameter
ice-ocean turning angle (25 degrees)
Initial Value = 25d0*radian
eccen : real*8, parameter
value of eccentricity for yield curve ellipse
Initial Value = 2.0
bydx2 : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn |
bydxr : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn |
bydy2 : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn |
bydyr : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn |
cst : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn |
csu : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn |
tngt : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn |
tng : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn |
bycsu : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn |
coswat : real*8
sin and cos of ice-ocean turning angle
Used by: | :dynsi |
sinwat : real*8
sin and cos of ice-ocean turning angle
Used by: | :dynsi |
lat : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn |
latb : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn |
lon : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn |
lonb : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn |
dxyp : real*8, dimension(:), allocatable

Used by: | :advsi | :alloc_icedyn |
bydxyp : real*8, dimension(:), allocatable

Used by: | :advsi | :alloc_icedyn | :dynsi |
dxyv : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn | :dynsi |
dxp : real*8, dimension(:), allocatable

Used by: | :advsi | :alloc_icedyn | :dynsi |
dyp : real*8, dimension(:), allocatable

Used by: | :advsi | :alloc_icedyn |
dxv : real*8, dimension(:), allocatable

Used by: | :advsi | :alloc_icedyn |
dyv : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn | :dynsi |
dxys : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn | :dynsi |
dxyn : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn | :dynsi |
siniu : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn | :get_uisurf |
cosiu : real*8, dimension(:), allocatable

Used by: | :alloc_icedyn | :get_uisurf |
dlon : real*8
grid spacing in longitude (deg)
dlatm : real*8
grid spacing in latitude (rad,deg,minutes)
Used by: | :init_icedyn |
dlat_dg : real*8
grid spacing in latitude (rad,deg,minutes)
dlat : real*8
grid spacing in latitude (rad,deg,minutes)
lon_dg : real*8, dimension(:, :), allocatable

Used by: | :alloc_icedyn | :init_icedyn |
lat_dg : real*8, dimension(:, :), allocatable

Used by: | :alloc_icedyn | :init_icedyn |
pstar : real*8, parameter
maximum sea ice pressure per unit thickness (Pa/m)
Initial Value = 2.75d4
dlon_dg : real*8

bydts : real*8
reciprocal of timestep in ice dynamics code
Used by: | :dynsi | :init_icedyn |

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

Contact GISS NASA Privacy PolicyAccessibility