Index | Rundeck: E6F40 | Created: Fri May 17 03:30:27 EDT 2024 |
init_gwdrag | Module: STRAT | File: STRATDYN.f |
Author : Jean Lerner
Version:
Declaration:
subroutine init_gwdrag
- twopi : used from constant
- kapa : used from constant
- im : used from resolution
- jm : used from resolution
- lm : used from resolution
- pednl00 : used from atm_com
- pmidl00 : used from atm_com
- do_gwdrag : used from dynamics
- grid : used from domain_decomp_atm
- getdomainbounds : used from domain_decomp_atm
- am_i_root : used from domain_decomp_atm
- areag : used from geom
- halo_update : used from domain_decomp_1d
- south : used from domain_decomp_1d
- pack_data : used from domain_decomp_1d
- dxyv : used from geom
- dlat_dg : used from geom
- xcdnst : used from strat
- qgwmtn : used from strat
- qgwshr : used from strat
- qgwdef : used from strat
- qgwcnv : used from strat
- lbreak : used from strat
- ld2 : used from strat
- lshr : used from strat
- ldef : used from strat
- zvarx : used from strat
- zvary : used from strat
- zvart : used from strat
- zwt : used from strat
- nm : used from strat
- ekofj : used from strat
- cmtn : used from strat
- cshear : used from strat
- cdef : used from strat
- cmc : used from strat
- pbreak : used from strat
- pbreaktop : used from strat
- defthresh : used from strat
- pconpen : used from strat
- ang_gwd : used from strat
- lpcnv : used from strat
- scvmu : used from strat
- par_open : used from pario
- par_close : used from pario
- read_dist_data : used from pario
- plev :
real*8
- pleve :
real*8
- eks :
real*8
- ek1 :
real*8
- ek2 :
real*8
- ekx :
real*8
- ek_glob :
real*8, dimension(JM)
- i :
integer
- j :
integer
- l :
integer
- fid :
integer
- i_0 :
integer
- i_1 :
integer
- j_0 :
integer
- j_1 :
integer
- i_0h :
integer
- i_1h :
integer
- j_0h :
integer
- j_1h :
integer
- j_0s :
integer
- j_1s :
integer
- j_0stg :
integer
- j_1stg :
integer
- have_south_pole :
logical
- have_north_pole :
logical