Index | Rundeck: P1SoM40 | Created: Thu May 9 03:30:17 EDT 2024 |
ICEDYN | File: ICEDYN.f |
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 |