IndexRundeck: P1SoM40Created: Thu May 9 03:30:17 EDT 2024

basin_prep

Module:
File: ODIAG_PRT.f
Summary:
Author :
Version:

Declaration:
Variables:
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)

Simplex Website Curator: Igor Aleinov — NASA Official: Gavin A. Schmidt

Contact GISS NASA Privacy PolicyAccessibility