Index

Rundeck: P1SoM40

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

plast

Module: ICEDYN

File: ICEDYN.f

Summary: PLAST Calculates strain rates and viscosity for dynamic ice
Author : Jiping Liu/Gavin Schmidt (based on code from J. Zhang)
Version:

---

Declaration:

subroutine plast

Variables:

getdomainbounds : used from domain_decomp_1d

north : used from domain_decomp_1d

south : used from domain_decomp_1d

halo_update : used from domain_decomp_1d

hassouthpole : used from domain_decomp_1d

hasnorthpole : used from domain_decomp_1d

e11 : real*8, dimension(nx1, grid_icdyn%j_strt_halo:grid_icdyn%j_stop_halo)

e22 : real*8, dimension(nx1, grid_icdyn%j_strt_halo:grid_icdyn%j_stop_halo)

e12 : real*8, dimension(nx1, grid_icdyn%j_strt_halo:grid_icdyn%j_stop_halo)

ecm2 : real*8, parameter

Initial Value = 1.0/(ECCEN**2)

gmin : real*8, parameter

Initial Value = 1d-20

delt : real*8

delt1 : real*8

aaa : real*8

i : integer

j : integer

j_0 : integer

j_1 : integer

j_0s : integer

j_1s : integer