Index | Rundeck: P1SoM40 | Created: Thu May 9 03:30:17 EDT 2024 |
oadvtx | Module: | File: OCNDYN.f |
Author : Gary L. Russell
Version: 2009/01/14
Declaration:
subroutine oadvtx (rm, rx, ry, rz, mm, mu, dt, qlimit, oijl)
- im : used from ocean
- jm : used from ocean
- lmo : used from ocean
- lmom : used from ocean
- Initial Value
= >LMM
- zdxyp : used from ocean
- Initial Value
= >BYDXYPO
- focean : used from ocean
- ogrid : used from oceanr_dim
- qlimit :
logical*4, intent(in)
- dt :
real*8, intent(in)
- rm :
real*8, intent(inout), dimension(im, ogrid%j_strt_halo:ogrid%j_stop_halo, lmo)
- rx :
real*8, intent(inout), dimension(im, ogrid%j_strt_halo:ogrid%j_stop_halo, lmo)
- ry :
real*8, intent(inout), dimension(im, ogrid%j_strt_halo:ogrid%j_stop_halo, lmo)
- rz :
real*8, intent(inout), dimension(im, ogrid%j_strt_halo:ogrid%j_stop_halo, lmo)
- mm :
real*8, intent(inout), dimension(im, ogrid%j_strt_halo:ogrid%j_stop_halo, lmo)
- mu :
real*8, intent(inout), dimension(im, ogrid%j_strt_halo:ogrid%j_stop_halo, lmo)
- oijl :
real*8, intent(inout), dimension(im, ogrid%j_strt_halo:ogrid%j_stop_halo, lmo)
- i :
integer*4
- j :
integer*4
- l :
integer*4
- im1 :
integer*4
- ip1 :
integer*4
- j1p :
integer*4
- jnp :
integer*4
- n :
integer*4
- ncourant :
integer*4
- am :
real*8, dimension(IM)
- a :
real*8, dimension(IM)
- fm :
real*8, dimension(IM)
- fx :
real*8, dimension(IM)
- fy :
real*8, dimension(IM)
- fz :
real*8, dimension(IM)
- mmnew :
real*8
- zcourant :
real*8
- rxy :
real*8