Index | Rundeck: P1SoM40 | Created: Thu May 9 03:30:17 EDT 2024 |
basin_prep | Module: | File: ODIAG_PRT.f |
Author :
Version:
Declaration:
subroutine basin_prep
- undef : used from constant
- im : used from ocean
- jm : used from ocean
- lmo : used from ocean
- imaxj : used from ocean
- focean : used from ocean
- dxypo : used from ocean
- dts : used from ocean
- nmst : used from straits
- oijl : used from odiag
- Initial Value
= >oijl_loc
- kbasin : used from odiag
- ijl_mo : used from odiag
- ijl_g0m : used from odiag
- ijl_s0m : used from odiag
- ijl_mfu : used from odiag
- ijl_mfv : used from odiag
- ijl_mfvb : used from odiag
- ijl_gflx : used from odiag
- ijl_sflx : used from odiag
- ijl_ggmfl : used from odiag
- ijl_sgmfl : used from odiag
- ojl : used from odiag
- ojl_out : used from odiag
- nbas : used from odiag
- nqty : used from odiag
- jl_m : used from odiag
- jl_pt : used from odiag
- jl_s : used from odiag
- jl_sf : used from odiag
- jl_sfb : used from odiag
- otj : used from odiag
- otjcomp : used from odiag
- otj_out : used from odiag
- olnst : used from odiag
- ln_mflx : used from odiag
- ln_gflx : used from odiag
- ln_sflx : used from odiag
- sfm : used from odiag
- grid : used from oceanr_dim
- Initial Value
= >ogrid
- pack_dataj : used from domain_decomp_1d
- am_i_root : used from domain_decomp_1d
- i :
integer
- j :
integer
- l :
integer
- kb :
integer
- gos :
real*8
- sos :
real*8
- temgs :
real*8
- j_0 :
integer
- j_1 :
integer
- j_0h :
integer
- j_1h :
integer
- ojlx :
real*8, dimension(grid%j_strt_halo:grid%j_stop_halo, lmo, nbas, 4)
- k :
integer
- kq :
integer
- noijl :
integer
- noijlgm :
integer
- nolnst :
integer
- ns :
integer
- kk :
integer
- kc :
integer
- soijl :
real*8
- soijlgm :
real*8
- fac :
real*8
- facst :
real*8
- scalem :
real*8, dimension(3)
- scales :
real*8, dimension(3)
- solnst :
real*8, dimension(NMST)
- mv :
real*8, dimension(4)
- mt :
real*8, dimension(4)
- is :
integer, dimension(4)
- x :
real*8, dimension(grid%j_strt_halo:grid%j_stop_halo, 4, 3)
- xcomp :
real*8, dimension(grid%j_strt_halo:grid%j_stop_halo, 4, 3, 3)
- dumarr :
real*8, dimension(1, 1)