Index | Rundeck: P1SoM40 | Created: Thu May 9 03:30:17 EDT 2024 |
init_lakes | Module: | File: LAKES.f |
Author : Gary Russell/Gavin Schmidt
Version:
Declaration:
subroutine init_lakes(inilake, istart)
- rhow : used from constant
- shw : used from constant
- tf : used from constant
- pi : used from constant
- grav : used from constant
- im : used from resolution
- jm : used from resolution
- dtsrc : used from model_com
- zatmo : used from atm_com
- traditional_coldstart_aic : used from atm_com
- grid : used from domain_decomp_atm
- write_parallel : used from domain_decomp_atm
- getdomainbounds : used from domain_decomp_atm
- halo_update : used from domain_decomp_atm
- am_i_root : used from domain_decomp_atm
- axyp : used from geom
- imaxj : used from geom
- lonlat_to_ij : used from geom
- lon2d_dg : used from geom
- lat2d_dg : used from geom
- atmocn : used from fluxes
- atmsrf : used from fluxes
- flice : used from fluxes
- focean : used from fluxes
- fearth0 : used from fluxes
- flake0 : used from fluxes
- fland : used from fluxes
- fearth : used from ghy_com
- npts : used from diag_com
- conpt0 : used from diag_com
- icon_lkm : used from diag_com
- icon_lke : used from diag_com
- par_open : used from pario
- par_close : used from pario
- read_dist_data : used from pario
- j_0 :
integer
- j_1 :
integer
- j_0h :
integer
- j_1h :
integer
- j_0s :
integer
- j_1s :
integer
- i_0 :
integer
- i_1 :
integer
- i_0h :
integer
- i_1h :
integer
- have_north_pole :
logical
- have_south_pole :
logical
- jmin_fill :
integer
- jmax_fill :
integer
- iu_warn :
integer
- inilake :
logical, intent(inout)
- jd :
integer
- loop variables
- id :
integer
- loop variables
- ju :
integer
- loop variables
- iu :
integer
- loop variables
- j :
integer
- loop variables
- i :
integer
- loop variables
- istart :
integer, intent(in)
- inm :
integer
- fid :
integer
- ios :
integer
- iu_rvr :
integer
- unit number for river direction file
- fmtstr :
character(len=80)
- titlei :
character
- spmin :
real*8
- spmax :
real*8
- speed0 :
real*8
- speed :
real*8
- dzdh :
real*8
- dzdh1 :
real*8
- mlk1 :
real*8
- fac :
real*8
- fac1 :
real*8
- out_line :
character(len=300)
- local variable to hold mixed-type output for parallel I/O
- qcon :
logical, dimension(NPTS)
- t :
logical
- Initial Value
= .TRUE.
- f :
logical
- Initial Value
= .FALSE.
- iloop_min :
integer
- iloop_max :
integer
- jloop_min :
integer
- jloop_max :
integer
- horzdist_2pts :
real*8
- down_lat_loc :
real*8, allocatable, dimension(:, :)
- down_lon_loc :
real*8, allocatable, dimension(:, :)
- down_lat_911_loc :
real*8, allocatable, dimension(:, :)
- down_lon_911_loc :
real*8, allocatable, dimension(:, :)
- ij :
integer, dimension(2)
- ll :
real*8, dimension(2)
- lat_rvr :
real*4, dimension(nrvrmx)
- lon_rvr :
real*4, dimension(nrvrmx)
- get_dir :
integer
- gtemp :
real*8, dimension(:, :), pointer
- gtemp2 :
real*8, dimension(:, :), pointer
- gtempr :
real*8, dimension(:, :), pointer