Index | Rundeck: P1SoM40 | Created: Fri May 10 03:30:18 EDT 2024 |
opfil2 | Module: | File: OCNDYN2.f |
Author :
Version:
Declaration:
subroutine opfil2(x, l, jmin, jmax)
- im : used from ocean
- jm : used from ocean
- grid : used from oceanr_dim
- Initial Value
= >ogrid
- x :
real*8, intent(inout), dimension(im, grid%j_strt_halo:grid%j_stop_halo)
- l :
integer*4, intent(in)
- jmin :
integer*4, intent(in)
- jmax :
integer*4, intent(in)
- i :
integer
- i1 :
integer
- i2 :
integer
- j :
integer
- k :
integer
- k1 :
integer
- k2 :
integer
- indx :
integer
- n :
integer
- nn :
integer
- an :
real*8, dimension(0:IMz2)
- bn :
real*8, dimension(0:IMz2)
- y :
real*8, dimension(IM*2)
- reduc :
real*8
- ifirst :
integer, save
- Initial Value
= 1
- j1 :
integer
- jn :
integer
- j1p :
integer
- jnp :
integer