Index | Rundeck: P1SoM40 | Created: Thu May 9 03:30:17 EDT 2024 |
STRAITS | File: OSTRAITS_COM.f |
Author :
Version:
Subroutines:
Global Variables:
- lmo : used from oceanres
- lmi : used from seaice
- nmst :
integer
- no. of ocean straits
Initial Value= 0
Used by: | :adjust_mean_salt | :basin_prep | :conserv_oce | :conserv_oms | :conserv_osl | :def_meta_ocdiag | :def_rsf_ocdiag | :gather_straits_pairs | :init_odiag | :init_straits | :new_io_ocdiag | :oijl_prep | :otj_straits | :scatter_straits_pairs | :stable | :stadv | :stadvt | :stbdra | :stconv | :stpgf | :strmij | :strmij_straits | :strmjl | :strmjl_straits | :strout | :write_meta_ocdiag | ODIAG |
- zst :
real*8, allocatable, dimension(:)
- width, nominal depth of strait (m)
Used by: | :init_straits |
- wist :
real*8, allocatable, dimension(:)
- width, nominal depth of strait (m)
Used by: | :adjust_mean_salt | :init_straits | :stadv | :stbdra | :stconv | :stpgf | :strout |
- yst :
real*8, allocatable, dimension(:, :)
- local coordinates [-1,1] for strait entry/exit points
Used by: | :init_straits | :stadvt |
- xst :
real*8, allocatable, dimension(:, :)
- local coordinates [-1,1] for strait entry/exit points
Used by: | :init_straits | :stadvt |
- jst :
integer, allocatable, dimension(:, :)
- i,j coordinates of ends of straits
Used by: | :conserv_oce | :conserv_oms | :conserv_osl | :init_straits | :otj_straits | :stadv | :stadvt | :stconv | :stpgf | :strmij_straits | :strmjl_straits |
- ist :
integer, allocatable, dimension(:, :)
- i,j coordinates of ends of straits
Used by: | :conserv_oce | :conserv_oms | :conserv_osl | :init_straits | :otj_straits | :stadv | :stadvt | :stpgf | :strmij_straits | :strmjl_straits |
- lmst :
integer, allocatable, dimension(:)
- no. of levels in strait
Used by: | :adjust_mean_salt | :conserv_oce | :conserv_oms | :conserv_osl | :init_odiag | :init_straits | :stadv | :stadvt | :stbdra | :stconv | :stpgf | :strmij | :strmij_straits | :strout |
- name_st :
character(len=20), allocatable, dimension(:)
- Names of straits
Used by: | :init_odiag | :strout |
- dist :
real*8, dimension(:), allocatable
- distance along strait (m)
Used by: | :adjust_mean_salt | :init_straits | :stbdra | :stconv | :strout |
- distpg :
real*8, dimension(:), allocatable
- distance between centre points of adjoining ocean boxes (m)
Used by: | :init_straits | :stadv | :stpgf |
- mmst :
real*8, dimension(:, :), allocatable
- mass of water in strait (kg)
Used by: | :adjust_mean_salt | :conserv_oms | :init_straits | :stadv | :stadvt | :stbdra | :stconv |
- must :
real*8, dimension(:, :), allocatable
- mass flux of water in strait (kg/s)
Used by: | :init_straits | :stadv | :stbdra | :stconv | :stpgf |
- gzmst :
real*8, dimension(:, :), allocatable
- pot. enthalpy of water in strait (+ moments) (J)
Used by: | :init_straits | :stadv | :stconv |
- gxmst :
real*8, dimension(:, :), allocatable
- pot. enthalpy of water in strait (+ moments) (J)
Used by: | :init_straits | :stadv | :stbdra | :stconv |
- g0mst :
real*8, dimension(:, :), allocatable
- pot. enthalpy of water in strait (+ moments) (J)
Used by: | :adjust_mean_salt | :conserv_oce | :init_straits | :stadv | :stconv |
- szmst :
real*8, dimension(:, :), allocatable
- salinity of water in strait (+ moments) (kg)
Used by: | :adjust_mean_salt | :init_straits | :stadv | :stconv |
- sxmst :
real*8, dimension(:, :), allocatable
- salinity of water in strait (+ moments) (kg)
Used by: | :adjust_mean_salt | :init_straits | :stadv | :stbdra | :stconv |
- s0mst :
real*8, dimension(:, :), allocatable
- salinity of water in strait (+ moments) (kg)
Used by: | :adjust_mean_salt | :conserv_osl | :init_straits | :stadv | :stconv |
- rsist :
real*8, dimension(:), allocatable
- Sea ice fraction in strait
Used by: | :init_straits |
- rsixst :
real*8, dimension(:), allocatable
- Center of sea ice in strait (m)
Used by: | :init_straits |
- msist :
real*8, dimension(:, :), allocatable
- Mass of ice within strait (kg)
Used by: | :init_straits |
- hsist :
real*8, dimension(:, :), allocatable
- Enthalpy of ice within strait (J)
Used by: | :init_straits |
- ssist :
real*8, dimension(:, :), allocatable
- Salinity of ice within strait (kg)
Used by: | :init_straits |
- usifac :
real*8
- ratio of strait sea ice velocity to current
Initial Value= .1d0
- tzmst :
- tracer amount in strait (+ moments) (kg)
- txmst :
- tracer amount in strait (+ moments) (kg)
- trmst :
- tracer amount in strait (+ moments) (kg)
- trsist :
- tracer amount in with strait (kg)
- qtye :
- workspace holding values of QTY at endpoints of straits
- lmme :
integer, dimension(:, :), allocatable
Used by: | :init_straits | :stpgf |
- oprese :
real*8, dimension(:, :), allocatable
Used by: | :stpgf |
- hoceane :
real*8, dimension(:, :), allocatable
Used by: | :init_straits | :stpgf |
- kn2 :
integer, dimension(:, :, :), allocatable
- : Where kn2>0, the index pair k,n [k=1,2;n=1,nmst] corresponds
Used by: | :init_straits | :stadv |
- moe :
real*8, dimension(:, :, :), allocatable
Used by: | :init_straits | :stadv | :stpgf |
- g0me :
real*8, dimension(:, :, :), allocatable
Used by: | :init_straits | :stadv | :stpgf |
- gxme :
real*8, dimension(:, :, :), allocatable
Used by: | :init_straits | :stadv |
- gyme :
real*8, dimension(:, :, :), allocatable
Used by: | :init_straits | :stadv |
- gzme :
real*8, dimension(:, :, :), allocatable
Used by: | :init_straits | :stadv | :stpgf |
- s0me :
real*8, dimension(:, :, :), allocatable
Used by: | :init_straits | :stadv | :stpgf |
- sxme :
real*8, dimension(:, :, :), allocatable
Used by: | :init_straits | :stadv |
- syme :
real*8, dimension(:, :, :), allocatable
Used by: | :init_straits | :stadv |
- szme :
real*8, dimension(:, :, :), allocatable
Used by: | :init_straits | :stadv | :stpgf |