Index | Rundeck: P1SoM40 | Created: Fri May 10 03:30:18 EDT 2024 |
advsi_diag_ocnml | Module: | File: SEAICE_DRV.f |
Author : Gavin Schmidt
Version:
Declaration:
subroutine advsi_diag_ocnml(z1o, z12o, atmocn, atmice)
- shw : used from constant
- rhows : used from constant
- kocean : used from model_com
- itime : used from model_com
- ace1i : used from seaice
- lmi : used from seaice
- si_ocn : used from seaice_com
- grid : used from seaice_com
- Initial Value
= >sigrid
- modeleclock : used from model_com
- atmocn_xchng_vars : used from exchange_types
- atmice_xchng_vars : used from exchange_types
- z1o :
real*8, dimension(grid%i_strt_halo:grid%i_stop_halo, grid%j_strt_halo:grid%j_stop_halo)
- z12o :
real*8, dimension(grid%i_strt_halo:grid%i_stop_halo, grid%j_strt_halo:grid%j_stop_halo)
- atmocn :
type(atmocn_xchng_vars)
- atmice :
type(atmice_xchng_vars)
- i :
integer
- j :
integer
- jr :
integer
- n :
integer
- run4 :
real*8
- erun4 :
real*8
- tgw :
real*8
- poice :
real*8
- pocean :
real*8
- z1omin :
real*8
- msinew :
real*8
- j_0 :
integer
- j_1 :
integer
- i_0 :
integer
- i_1 :
integer
- rsi :
real*8, dimension(:, :), pointer
- msi :
real*8, dimension(:, :), pointer
- snowi :
real*8, dimension(:, :), pointer
- fwsim :
real*8, dimension(:, :), pointer
- focean :
real*8, dimension(:, :), pointer
- hsi :
real*8, dimension(:, :, :), pointer
- ssi :
real*8, dimension(:, :, :), pointer
- aij :
real*8, dimension(:, :, :), pointer
- ij_fwio :
integer
- j_imelt :
integer
- j_hmelt :
integer
- j_smelt :
integer
- jmon :
integer
- itocean :
integer
- itoice :
integer
- j_implm :
integer
- j_implh :
integer