| Index | Rundeck: P1SoM40 | Created: Fri May 10 03:30:18 EDT 2024 |
advec_lin_1d_custom | Module: | File: OCNDYN.f |
Author : T. Clune, R. Ruedy
Version:
Declaration:
subroutine advec_lin_1d_custom(s, sx, sy, sz, f, fx, fy, fz, mass, dm, qlimit, ierr, err_loc)- im : used from ocean
- jm : used from ocean
- lmo : used from ocean
- lmm : used from ocean
- focean : used from ocean
- getdomainbounds : used from domain_decomp_1d
- grid : used from oceanr_dim
- Initial Value
= >ogrid
- north : used from domain_decomp_1d
- south : used from domain_decomp_1d
- halo_update : used from domain_decomp_1d
- halo_update_column : used from domain_decomp_1d
- checksum : used from domain_decomp_1d
- s :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- mean tracer amount (kg or J)
- sz :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- lin tracer moments (kg or J)
- sy :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- lin tracer moments (kg or J)
- sx :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- lin tracer moments (kg or J)
- f :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- tracer flux (diagnostic output) (kg or J)
- fz :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- tracer moment flux (diagnostic output) (kg or J)
- fy :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- tracer moment flux (diagnostic output) (kg or J)
- fx :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- tracer moment flux (diagnostic output) (kg or J)
- mass :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- mass field (kg)
- dm :
real*8, dimension(im, grid%j_strt_halo:grid%j_stop_halo, lmo)
- mass flux (kg)
- qlimit :
logical, intent(in)
- true if negative tracer is to be avoided
- nerr :
- error codes
- ierr :
integer, intent(out)
- error codes
- n :
integer
- np1 :
integer
- nm1 :
integer
- nn :
integer
- ns :
integer
- err_loc :
integer, intent(out), dimension(3)
- fracm :
real*8
- frac1 :
real*8
- mnew :
real*8
- i :
integer
- l :
integer
- j_0 :
integer
- j_1 :
integer
- j_0s :
integer
- j_1s :
integer
- have_south_pole :
logical