| Index | Rundeck: P1SoM40 | Created: Thu May 9 03:30:17 EDT 2024 |
oadvtz2 | Module: | File: OCNDYN2.f |
Author :
Version:
Declaration:
subroutine oadvtz2(rm, rx, ry, rz, mo, mw, dt, qlimit, oijl)- im : used from ocean
- jm : used from ocean
- lmo : used from ocean
- lmm : used from ocean
- nbyzm : used from ocean
- i1yzm : used from ocean
- i2yzm : used from ocean
- getdomainbounds : used from domain_decomp_1d
- grid : used from oceanr_dim
- Initial Value
= >ogrid
- rm :
real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- rx :
real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- ry :
real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- rz :
real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- oijl :
real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- mo :
real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- mw :
real*8, intent(in), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- dt :
real*8, intent(in)
- qlimit :
logical, intent(in)
- cmup :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo)
- fmup :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo)
- fxup :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo)
- fyup :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo)
- fzup :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo)
- fmup_ctr :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo)
- cm :
real*8
- c :
real*8
- fm :
real*8
- fx :
real*8
- fy :
real*8
- fz :
real*8
- mnew :
real*8
- rzlim :
real*8
- no_rzlim :
real*8
- fm_ctr :
real*8
- r_edge :
real*8
- wtdn :
real*8
- rdn :
real*8
- rup :
real*8
- rm_lus :
real*8
- edgmax :
real*8, parameter
- Initial Value
= 1.5
- i :
integer
- j :
integer
- l :
integer
- n :
integer
- ldn :
integer
- j_0 :
integer
- j_1 :
integer