Index | Rundeck: P1SoM40 | Created: Thu May 9 03:30:17 EDT 2024 |
oadvtz3 | Module: | File: OCNQUS.f |
Author :
Version:
Declaration:
subroutine oadvtz3(rm, rx, ry, rz, rxx, ryy, rzz, rxy, ryz, rzx, mo, mw, dt, oijl)
- by3 : used from constant
- by12 : used from constant
- 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
- halo_update : 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)
- rxx :
real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- ryy :
real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- rzz :
real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- rxy :
real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- ryz :
real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- rzx :
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)
- 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)
- fxxup :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo)
- fyyup :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo)
- fzzup :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo)
- fxyup :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo)
- fyzup :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo)
- fzxup :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo)
- cm :
real*8
- c :
real*8
- cm2 :
real*8
- fm :
real*8
- fx :
real*8
- fy :
real*8
- fz :
real*8
- fxx :
real*8
- fyy :
real*8
- fzz :
real*8
- fxy :
real*8
- fyz :
real*8
- fzx :
real*8
- mnew :
real*8
- bymnew :
real*8
- i :
integer
- j :
integer
- l :
integer
- n :
integer
- j_0 :
integer
- j_1 :
integer
- j_0s :
integer
- j_1s :
integer