modglobal Module


Used by

  • module~~modglobal~~UsedByGraph module~modglobal modglobal module~initfac initfac module~initfac->module~modglobal module~modchecksim modchecksim module~modchecksim->module~modglobal module~modeb modEB module~modeb->module~modglobal module~modfielddump modfielddump module~modfielddump->module~modglobal module~modstatistics modstatistics module~modstatistics->module~modglobal module~modstatsdump modstatsdump module~modstatsdump->module~modglobal proc~advecc2nd_corr_conservative advecc2nd_corr_conservative proc~advecc2nd_corr_conservative->module~modglobal proc~advecc2nd_corr_liberal advecc2nd_corr_liberal proc~advecc2nd_corr_liberal->module~modglobal proc~advecc_2nd advecc_2nd proc~advecc_2nd->module~modglobal proc~advecc_2nd->module~initfac proc~advecc_kappa advecc_kappa proc~advecc_kappa->module~modglobal proc~advecc_upw advecc_upw proc~advecc_upw->module~modglobal proc~advection advection proc~advection->module~modglobal proc~advecu_2nd advecu_2nd proc~advecu_2nd->module~modglobal proc~advecv_2nd advecv_2nd proc~advecv_2nd->module~modglobal proc~advecw_2nd advecw_2nd proc~advecw_2nd->module~modglobal proc~alignment alignment proc~alignment->module~modglobal proc~bcp bcp proc~bcp->module~modglobal proc~bcpup bcpup proc~bcpup->module~modglobal proc~blthickness blthickness proc~blthickness->module~modglobal proc~blthicknessmo blthicknessmo proc~blthicknessmo->module~modglobal proc~blthicknesst blthicknesst proc~blthicknesst->module~modglobal proc~bottom bottom proc~bottom->module~modglobal proc~boundary boundary proc~boundary->module~modglobal proc~calc_halflev calc_halflev proc~calc_halflev->module~modglobal proc~calccourant calccourant proc~calccourant->module~modglobal proc~calcdiffnr calcdiffnr proc~calcdiffnr->module~modglobal proc~calclw calclw proc~calclw->module~modglobal proc~calclw->module~initfac proc~calcreyn calcreyn proc~calcreyn->module~modglobal proc~calthv calthv proc~calthv->module~modglobal proc~checkinitvalues checkinitvalues proc~checkinitvalues->module~modglobal proc~checksim checksim proc~checksim->module~modglobal proc~chem chem proc~chem->module~modglobal proc~chkdiv chkdiv proc~chkdiv->module~modglobal proc~closure closure proc~closure->module~modglobal proc~closurebc closurebc proc~closurebc->module~modglobal proc~coriolis coriolis proc~coriolis->module~modglobal proc~createmasks createmasks proc~createmasks->module~modglobal proc~createpurifiers createpurifiers proc~createpurifiers->module~modglobal proc~createscals createscals proc~createscals->module~modglobal proc~createtrees createtrees proc~createtrees->module~modglobal proc~detfreestream detfreestream proc~detfreestream->module~modglobal proc~detfreestrtmp detfreestrtmp proc~detfreestrtmp->module~modglobal proc~diagfld diagfld proc~diagfld->module~modglobal proc~diffc diffc proc~diffc->module~modglobal proc~diffc_corr diffc_corr proc~diffc_corr->module~modglobal proc~diffe diffe proc~diffe->module~modglobal proc~diffu diffu proc~diffu->module~modglobal proc~diffu_corr diffu_corr proc~diffu_corr->module~modglobal proc~diffv diffv proc~diffv->module~modglobal proc~diffv_corr diffv_corr proc~diffv_corr->module~modglobal proc~diffw diffw proc~diffw->module~modglobal proc~diffw_corr diffw_corr proc~diffw_corr->module~modglobal proc~dispthickness dispthickness proc~dispthickness->module~modglobal proc~dispthicknessexp dispthicknessexp proc~dispthicknessexp->module~modglobal proc~dispthicknessmo dispthicknessmo proc~dispthicknessmo->module~modglobal proc~driverchunkread driverchunkread proc~driverchunkread->module~modglobal proc~drivergen drivergen proc~drivergen->module~modglobal proc~eb EB proc~eb->module~modglobal proc~eb->module~initfac proc~enthalpythickness enthalpythickness proc~enthalpythickness->module~modglobal proc~eval_corners eval_corners proc~eval_corners->module~modglobal proc~exitdriver exitdriver proc~exitdriver->module~modglobal proc~exitfielddump exitfielddump proc~exitfielddump->module~modglobal proc~exitinlet exitinlet proc~exitinlet->module~modglobal proc~exitmodules exitmodules proc~exitmodules->module~modglobal proc~exitstatsdump exitstatsdump proc~exitstatsdump->module~modglobal proc~fielddump fielddump proc~fielddump->module~modglobal proc~fixthetainf fixthetainf proc~fixthetainf->module~modglobal proc~fixuinf1 fixuinf1 proc~fixuinf1->module~modglobal proc~fixuinf2 fixuinf2 proc~fixuinf2->module~modglobal proc~fluidvolume fluidvolume proc~fluidvolume->module~modglobal proc~fluxtop fluxtop proc~fluxtop->module~modglobal proc~fluxtopscal fluxtopscal proc~fluxtopscal->module~modglobal proc~forces forces proc~forces->module~modglobal proc~fromztop fromztop proc~fromztop->module~modglobal proc~genstats genstats proc~genstats->module~modglobal proc~grwdamp grwdamp proc~grwdamp->module~modglobal proc~halos halos proc~halos->module~modglobal proc~heat_transfer_coef_flux heat_transfer_coef_flux proc~heat_transfer_coef_flux->module~modglobal proc~ibmnorm ibmnorm proc~ibmnorm->module~modglobal proc~ibmwallfun ibmwallfun proc~ibmwallfun->module~modglobal proc~init2decomp init2decomp proc~init2decomp->module~modglobal proc~initboundary initboundary proc~initboundary->module~modglobal proc~initchecksim initchecksim proc~initchecksim->module~modglobal proc~initdriver initdriver proc~initdriver->module~modglobal proc~initeb initEB proc~initeb->module~modglobal proc~initeb->module~initfac proc~initfielddump initfielddump proc~initfielddump->module~modglobal proc~initfields initfields proc~initfields->module~modglobal proc~initibm initibm proc~initibm->module~modglobal proc~initibmnorm initibmnorm proc~initibmnorm->module~modglobal proc~initibmwallfun initibmwallfun proc~initibmwallfun->module~modglobal proc~initibmwallfun->module~initfac proc~initinlet initinlet proc~initinlet->module~modglobal proc~initstat_nc initstat_nc proc~initstat_nc->module~modglobal proc~initstatsdump initstatsdump proc~initstatsdump->module~modglobal proc~initsubgrid initsubgrid proc~initsubgrid->module~modglobal proc~initthermodynamics initthermodynamics proc~initthermodynamics->module~modglobal proc~inittimedep inittimedep proc~inittimedep->module~modglobal proc~inletgen inletgen proc~inletgen->module~modglobal proc~inletgennotemp inletgennotemp proc~inletgennotemp->module~modglobal proc~intqh intqH proc~intqh->module~modglobal proc~intqh->module~initfac proc~is_equal is_equal proc~is_equal->module~modglobal proc~local_coords local_coords proc~local_coords->module~modglobal proc~lstend lstend proc~lstend->module~modglobal proc~masscorr masscorr proc~masscorr->module~modglobal proc~mom_transfer_coef_neutral mom_transfer_coef_neutral proc~mom_transfer_coef_neutral->module~modglobal proc~mom_transfer_coef_stability mom_transfer_coef_stability proc~mom_transfer_coef_stability->module~modglobal proc~momentumthickness momentumthickness proc~momentumthickness->module~modglobal proc~momentumthicknessexp momentumthicknessexp proc~momentumthicknessexp->module~modglobal proc~momentumthicknessmo momentumthicknessmo proc~momentumthicknessmo->module~modglobal proc~nudge nudge proc~nudge->module~modglobal proc~open_nc open_nc proc~open_nc->module~modglobal proc~periodicebcorr periodicEBcorr proc~periodicebcorr->module~modglobal proc~plane_line_intersection plane_line_intersection proc~plane_line_intersection->module~modglobal proc~purifiers purifiers proc~purifiers->module~modglobal proc~randomnize randomnize proc~randomnize->module~modglobal proc~readdriverfile readdriverfile proc~readdriverfile->module~modglobal proc~readdriverfile_chunk readdriverfile_chunk proc~readdriverfile_chunk->module~modglobal proc~readfacetfiles readfacetfiles proc~readfacetfiles->module~modglobal proc~readinitfiles readinitfiles proc~readinitfiles->module~modglobal proc~readinletfile readinletfile proc~readinletfile->module~modglobal proc~readnamelists readnamelists proc~readnamelists->module~modglobal proc~readrestartfiles readrestartfiles proc~readrestartfiles->module~modglobal proc~readzincoord readzincoord proc~readzincoord->module~modglobal proc~rlim rlim proc~rlim->module~modglobal proc~scalsource scalsource proc~scalsource->module~modglobal proc~shiftedpbcs shiftedPBCs proc~shiftedpbcs->module~modglobal proc~solid solid proc~solid->module~modglobal proc~sources sources proc~sources->module~modglobal proc~statsdump statsdump proc~statsdump->module~modglobal proc~statsdump->module~modstatistics proc~subgrid subgrid proc~subgrid->module~modglobal proc~subgridnamelist subgridnamelist proc~subgridnamelist->module~modglobal proc~thermo thermo proc~thermo->module~modglobal proc~thermodynamics thermodynamics proc~thermodynamics->module~modglobal proc~timedeplw timedeplw proc~timedeplw->module~modglobal proc~timedepnudge timedepnudge proc~timedepnudge->module~modglobal proc~timedepsurf timedepsurf proc~timedepsurf->module~modglobal proc~timedepsw timedepsw proc~timedepsw->module~modglobal proc~timedepsw->module~initfac proc~tkestats tkestats proc~tkestats->module~modglobal proc~tkestatsdump tkestatsdump proc~tkestatsdump->module~modglobal proc~tqaver tqaver proc~tqaver->module~modglobal proc~trees trees proc~trees->module~modglobal proc~trilinear_interp_var trilinear_interp_var proc~trilinear_interp_var->module~modglobal proc~tstep_integrate tstep_integrate proc~tstep_integrate->module~modglobal proc~tstep_update tstep_update proc~tstep_update->module~modglobal proc~unoh unoh proc~unoh->module~modglobal proc~unom unom proc~unom->module~modglobal proc~uoutletarea uoutletarea proc~uoutletarea->module~modglobal proc~updategr updateGR proc~updategr->module~modglobal proc~updategr->module~initfac proc~valuetop valuetop proc~valuetop->module~modglobal proc~valuetopscal valuetopscal proc~valuetopscal->module~modglobal proc~voutletarea voutletarea proc~voutletarea->module~modglobal proc~wallfunheat wallfunheat proc~wallfunheat->module~modglobal proc~wallfunheat->module~initfac proc~wallfunmom wallfunmom proc~wallfunmom->module~modglobal proc~wallfunmom->module~initfac proc~wfgr wfGR proc~wfgr->module~modglobal proc~wfgr->module~initfac proc~wfmneutral wfmneutral proc~wfmneutral->module~modglobal proc~wfmneutral->module~initfac proc~wfuno wfuno proc~wfuno->module~modglobal proc~wfuno->module~initfac proc~writedriverfile writedriverfile proc~writedriverfile->module~modglobal proc~writeinletfile writeinletfile proc~writeinletfile->module~modglobal proc~writerestartfiles writerestartfiles proc~writerestartfiles->module~modglobal proc~writerestartfiles->module~initfac proc~writestat_dims_nc writestat_dims_nc proc~writestat_dims_nc->module~modglobal proc~xm_periodic xm_periodic proc~xm_periodic->module~modglobal proc~xmi_driver xmi_driver proc~xmi_driver->module~modglobal proc~xmi_profile xmi_profile proc~xmi_profile->module~modglobal proc~xmo_convective xmo_convective proc~xmo_convective->module~modglobal proc~xmo_neumann xmo_Neumann proc~xmo_neumann->module~modglobal proc~xq_periodic xq_periodic proc~xq_periodic->module~modglobal proc~xqi_driver xqi_driver proc~xqi_driver->module~modglobal proc~xqi_profile xqi_profile proc~xqi_profile->module~modglobal proc~xqo_convective xqo_convective proc~xqo_convective->module~modglobal proc~xs_periodic xs_periodic proc~xs_periodic->module~modglobal proc~xsi_custom xsi_custom proc~xsi_custom->module~modglobal proc~xsi_driver xsi_driver proc~xsi_driver->module~modglobal proc~xsi_profile xsi_profile proc~xsi_profile->module~modglobal proc~xso_convective xso_convective proc~xso_convective->module~modglobal proc~xso_neumann xso_Neumann proc~xso_neumann->module~modglobal proc~xt_periodic xT_periodic proc~xt_periodic->module~modglobal proc~xti_driver xTi_driver proc~xti_driver->module~modglobal proc~xti_profile xTi_profile proc~xti_profile->module~modglobal proc~xto_convective xTo_convective proc~xto_convective->module~modglobal proc~xto_neumann xTo_Neumann proc~xto_neumann->module~modglobal proc~yinterpolate yinterpolate proc~yinterpolate->module~modglobal proc~yinterpolateh yinterpolateh proc~yinterpolateh->module~modglobal proc~ym_periodic ym_periodic proc~ym_periodic->module~modglobal proc~ymi_profile ymi_profile proc~ymi_profile->module~modglobal proc~ymo_convective ymo_convective proc~ymo_convective->module~modglobal proc~yq_periodic yq_periodic proc~yq_periodic->module~modglobal proc~yqi_profile yqi_profile proc~yqi_profile->module~modglobal proc~yqo_convective yqo_convective proc~yqo_convective->module~modglobal proc~ys_periodic ys_periodic proc~ys_periodic->module~modglobal proc~ysi_profile ysi_profile proc~ysi_profile->module~modglobal proc~yso_convective yso_convective proc~yso_convective->module~modglobal proc~yso_neumann yso_Neumann proc~yso_neumann->module~modglobal proc~yt_periodic yT_periodic proc~yt_periodic->module~modglobal proc~yti_profile yTi_profile proc~yti_profile->module~modglobal proc~yto_convective yTo_convective proc~yto_convective->module~modglobal proc~zinterpolate zinterpolate proc~zinterpolate->module~modglobal proc~zinterpolate1d zinterpolate1d proc~zinterpolate1d->module~modglobal proc~zinterpolate2d zinterpolate2d proc~zinterpolate2d->module~modglobal proc~zinterpolatet zinterpolatet proc~zinterpolatet->module~modglobal proc~zinterpolatet1d zinterpolatet1d proc~zinterpolatet1d->module~modglobal proc~zinterpolatew zinterpolatew proc~zinterpolatew->module~modglobal proc~zinterpolatew1d zinterpolatew1d proc~zinterpolatew1d->module~modglobal program~dalesurban DALESURBAN program~dalesurban->module~modglobal program~dalesurban->module~initfac program~dalesurban->module~modchecksim program~dalesurban->module~modeb program~dalesurban->module~modfielddump program~dalesurban->module~modstatsdump

Variables

Type Visibility Attributes Name Initial
integer, public :: poisrcheck = 0
integer, public :: itot = 96
integer, public :: jtot = 96
integer, public :: ktot = 96
integer, public :: imax
integer, public :: imax1
integer, public :: imax2
integer, public :: isen
integer, public :: jmax
integer, public :: jmax1
integer, public :: jmax2
integer, public :: jsen
integer, public :: kmax
integer, public :: kmax1
integer, public :: kmax2
integer, public :: ib
integer, public :: ie
integer, public :: jb
integer, public :: je
integer, public :: jgb
integer, public :: jge
integer, public :: offset
integer, public :: kb
integer, public :: ke
integer, public :: nsv = 0
integer, public :: nvar = 0
character(len=50), public :: fieldvars = ''
integer, public :: ih = 3
integer, public :: jh = 3
integer, public :: kh = 1
integer, public :: ihc = 2
integer, public :: jhc = 2
integer, public :: khc = 2
integer, public :: nblocks = 0
integer, public, allocatable :: block(:,:)
integer, public :: nfcts = -1
integer, public :: iplane
integer, public :: nstore = 1002
character(len=90), public :: fname_options = 'namoptions'
integer, public, parameter :: longint = 8
logical, public :: lwarmstart = .false.
logical, public :: lstratstart = .false.
logical, public :: lfielddump = .false.
logical, public :: lreadscal = .false.
integer, public, parameter :: BCxm_periodic = 1
integer, public, parameter :: BCxm_profile = 2
integer, public, parameter :: BCxm_driver = 3
integer, public, parameter :: BCxT_periodic = 1
integer, public, parameter :: BCxT_profile = 2
integer, public, parameter :: BCxT_driver = 3
integer, public, parameter :: BCxq_periodic = 1
integer, public, parameter :: BCxq_profile = 2
integer, public, parameter :: BCxq_driver = 3
integer, public, parameter :: BCxs_periodic = 1
integer, public, parameter :: BCxs_profile = 2
integer, public, parameter :: BCxs_driver = 3
integer, public, parameter :: BCxs_custom = 4
integer, public :: BCxm = BCxm_periodic
integer, public :: BCxT = BCxT_periodic
integer, public :: BCxq = BCxq_periodic
integer, public :: BCxs = BCxs_periodic
integer, public, parameter :: BCym_periodic = 1
integer, public, parameter :: BCym_profile = 2
integer, public, parameter :: BCyT_periodic = 1
integer, public, parameter :: BCyT_profile = 2
integer, public, parameter :: BCyq_periodic = 1
integer, public, parameter :: BCyq_profile = 2
integer, public, parameter :: BCys_periodic = 1
integer, public, parameter :: BCys_profile = 2
integer, public :: BCym = BCym_periodic
integer, public :: BCyT = BCyT_periodic
integer, public :: BCyq = BCyq_periodic
integer, public :: BCys = BCys_periodic
integer, public, parameter :: BCtopm_freeslip = 1
integer, public, parameter :: BCtopm_noslip = 2
integer, public, parameter :: BCtopm_pressure = 3
integer, public, parameter :: BCtopT_flux = 1
integer, public, parameter :: BCtopT_value = 2
integer, public, parameter :: BCtopq_flux = 1
integer, public, parameter :: BCtopq_value = 2
integer, public, parameter :: BCtops_flux = 1
integer, public, parameter :: BCtops_value = 2
integer, public :: BCtopm = BCtopm_freeslip
integer, public :: BCtopT = BCtopT_flux
integer, public :: BCtopq = BCtopq_flux
integer, public :: BCtops = BCtops_flux
integer, public, parameter :: BCbotm_freeslip = 1
integer, public, parameter :: BCbotm_wf = 2
integer, public, parameter :: BCbotm_wfneutral = 3
integer, public, parameter :: BCbotT_flux = 1
integer, public, parameter :: BCbotT_wf = 2
integer, public, parameter :: BCbotq_flux = 1
integer, public, parameter :: BCbots_flux = 1
integer, public :: BCbotm = BCbotm_wf
integer, public :: BCbotT = BCbotT_flux
integer, public :: BCbotq = BCbotq_flux
integer, public :: BCbots = BCbots_flux
integer, public :: BCzp = 1
real, public :: ds = 0
integer, public :: iinletgen = 0
integer, public :: idriver = 0
logical, public :: linoutflow = .false.
logical, public :: lzerogradtop = .false.
logical, public :: lzerogradtopscal = .false.
logical, public :: lbuoyancy = .false.
logical, public :: ltempeq = .false.
logical, public :: lscalrec = .false.
logical, public :: lSIRANEinout = .false.
logical, public :: ltempinout = .false.
logical, public :: lmoistinout = .false.
logical, public :: lper2inout = .false.
logical, public :: libm = .true.
logical, public :: lwalldist = .false.
logical, public :: lles = .true.
logical, public :: linletRA = .false.
logical, public :: lfixinlet = .false.
logical, public :: lfixutauin = .false.
logical, public :: lscasrc = .false.
logical, public :: lscasrcl = .false.
logical, public :: lydump = .false.
logical, public :: lytdump = .false.
logical, public :: lxydump = .false.
logical, public :: lxytdump = .false.
logical, public :: lscasrcr = .false.
logical, public :: ltkedump = .false.
logical, public :: lkslicedump = .false.
logical, public :: lislicedump = .false.
logical, public :: ljslicedump = .false.
integer, public :: kslice = 1
integer, public :: islice = 1
integer, public :: jslice = 1
integer, public :: isliceloc
logical, public :: islicerank
integer, public :: jsliceloc
logical, public :: jslicerank
logical, public :: ltdump = .false.
logical, public :: lmintdump = .false.
logical, public :: ltrees = .false.
logical, public :: lpurif = .false.
logical, public :: ltreedump = .false.
logical, public :: lreadminl = .false.
logical, public :: lwallfunc = .true.
logical, public :: luoutflowr = .false.
logical, public :: lvoutflowr = .false.
logical, public :: luvolflowr = .false.
logical, public :: lvvolflowr = .false.
logical, public :: lstoreplane = .false.
logical, public :: lstorexy = .false.
logical, public :: lreadmean = .false.
logical, public :: lstat = .false.
logical, public :: lEB = .false.
logical, public :: lwriteEBfiles = .false.
logical, public :: lwritefac = .false.
real, public :: dtfac = 10.
real, public :: tfac = 0.
real, public :: tnextfac = 0.
logical, public :: lperiodicEBcorr = .false.
integer, public :: sinkbase = 0
real, public :: fraction = 1
logical, public :: lvfsparse = .false.
integer, public :: nnz
logical, public :: lconstW = .false.
logical, public :: lfacTlyrs = .false.
integer, public :: ifixuinf = 0
logical, public :: lvinf = .false.
logical, public :: lrandomize = .true.
logical, public :: ibrank
logical, public :: ierank
logical, public :: jbrank
logical, public :: jerank
real, public :: freestreamav = 0.
real, public :: freestrtmpav = 0.
integer, public, parameter :: ifinput = 1
integer, public, parameter :: ifoutput = 2
integer, public, parameter :: ifnamopt = 3
real, public, parameter :: pi = 3.141592653589793116
real, public, parameter :: grav = 9.81
real, public, parameter :: rd = 287.04
real, public, parameter :: rv = 461.5
real, public, parameter :: cp = 1004.
real, public, parameter :: rlv = 2.26e6
real, public, parameter :: rlvi = 1/rlv
real, public, parameter :: ep = rd/rv
real, public, parameter :: ep2 = rv/rd-1.
real, public, parameter :: rcp = rd/cp
real, public, parameter :: cpr = cp/rd
real, public, parameter :: rlvocp = rlv/cp
real, public, parameter :: mair = 28.967
real, public, parameter :: rhoa = 1.2
real, public :: wfc = 313.
real, public :: wwilt = 171.
real, public :: wgrmax = 450.
real, public :: rsmin = 110.
real, public :: rsmax = 5000.
real, public :: GRLAI = 2.
real, public :: wsoil = 0.
real, public :: bldT = 0.
real, public :: flrT = 0.
real, public :: skyLW = 0.
real, public :: gres = 0.
real, public :: grqs = 0.
real, public :: grdqdt = 0.
real, public, parameter :: numol = 1.5e-5
real, public, parameter :: numoli = 1./numol
real, public, parameter :: prandtlmol = 0.71
real, public, parameter :: prandtlmoli = 1./prandtlmol
real, public :: prandtlturb = prandtlmol
integer, public :: iwallmom = 2
integer, public :: iwalltemp = 1
integer, public :: iwallmoist = 1
integer, public :: iwallscal = 1
real, public, parameter :: rhow = 0.998e3
real, public, parameter :: pref0 = 1.e5
real, public, parameter :: tmelt = 273.16
real, public, parameter :: es0 = 610.78
real, public, parameter :: at = 17.27
real, public, parameter :: bt = 35.86
real, public, parameter :: ekmin = 1.e-12
real, public, parameter :: e12min = 5.e-5
real, public :: fkar = 0.41
real, public, parameter :: eps1 = 1.e-10
real, public, parameter :: epscloud = 1.e-5
real, public, parameter :: boltz = 5.67e-8
real, public, parameter, dimension(3) :: xhat = (/1., 0., 0./)
real, public, parameter, dimension(3) :: yhat = (/0., 1., 0./)
real, public, parameter, dimension(3) :: zhat = (/0., 0., 1./)
real, public, parameter, dimension(3) :: vec0 = (/0., 0., 0./)
logical, public :: lprofforc = .false.
logical, public :: lcoriol = .false.
integer, public :: igrw_damp = 0
real, public :: geodamptime = 7200.
real, public :: uflowrate = 1.
real, public :: vflowrate = 1.
real, public :: Uinf = 0.
real, public :: Vinf = 0.
real, public :: inletav = 0.
real, public :: totinletav = 0.
real, public :: om22
real, public :: om23
real, public :: om22_gs
real, public :: om23_gs
real, public :: xlat = 52.
real, public :: xlon = 0.
real, public, allocatable :: xSa(:)
real, public, allocatable :: ySa(:)
real, public, allocatable :: zSa(:)
real, public :: xS = 0.
real, public :: yS = 0.
real, public :: zS = 0.
real, public :: xSb = 0.
real, public :: ySb = 0.
real, public :: zSb = 0.
real, public :: xSe = 0.
real, public :: ySe = 0.
real, public :: zSe = 0.
real, public :: SS = 0.
real, public :: sigS = 0.
integer, public :: nscasrc = 0
integer, public :: nscasrcl = 0
real, public, allocatable :: scasrcp(:,:,:)
real, public, allocatable :: scasrcl(:,:,:)
integer, public, allocatable :: tree(:,:)
integer, public :: ntree_max = 0
integer, public :: ntrees = 0
real, public :: cd = 0.
real, public :: ud = 0.
real, public :: Qstar = 0.
real, public :: dQdt = 0.
real, public :: dec = 0.
real, public :: lad = 0.
real, public :: lsize = 0.
real, public :: r_s = 0.
real, public :: tr_A = 0.
logical, public :: lnudge = .false.
logical, public :: lnudgevel = .true.
real, public :: tnudge = 60.
integer, public :: nnudge = 0
logical, public :: lchem = .false.
real, public :: k1 = 0.
real, public :: JNO2 = 0.
integer, public, allocatable :: purif(:,:)
integer, public :: npurif = 0
real, public :: Qpu = 0.
real, public :: epu = 0.
integer, public, parameter :: POISS_FFT2D = 0
integer, public, parameter :: POISS_CYC = 1
integer, public, parameter :: POISS_FFT3D = 2
integer, public, parameter :: POISS_FFT2D_2DECOMP = 3
integer, public :: ipoiss = POISS_CYC
integer, public, parameter :: iadv_upw = 1
integer, public, parameter :: iadv_cd2 = 2
integer, public, parameter :: iadv_kappa = 7
integer, public :: iadv_mom = 2
integer, public :: iadv_tke = -1
integer, public :: iadv_thl = -1
integer, public :: iadv_qt = -1
integer, public :: iadv_sv(100) = -1
logical, public :: lmoist = .false.
real, public :: xday = 1.
real, public :: xtime = 0.
real, public :: runtime = 300.
real, public :: dtmax = 20.
real, public :: trestart = 10000.
real, public :: tfielddump = 10000.
real, public :: tsample = 5.
real, public :: tstatsdump = 10000.
real, public :: tnextrestart
real, public :: tscale
real, public :: tnextfielddump
character(len=90), public :: startfile = ''
real, public :: totavtime = 0.
real, public :: dtEB = 10.
real, public :: tEB = 0.
real, public :: tnextEB = 0.
real, public :: totheatflux = 0.
real, public :: totqflux = 0.
real, public :: thres = 5.e-3
real, public :: dqt
real, public :: dtheta
real, public, allocatable :: dsv(:)
real, public :: dt
real, public :: timee
real, public :: btime
real, public :: runavtime
integer, public :: ntimee
integer, public :: ntrun
real, public :: timeleft
logical, public :: ladaptive = .false.
real, public :: tdriverstart = 0.
real, public :: tdriverstart_cold = 0.
real, public :: tdriverdump
real, public :: dtdriver = 0.1
integer, public :: driverstore
integer, public :: driverjobnr
character(len=3), public :: cdriverjobnr
logical, public :: lhdriver = .false.
logical, public :: lqdriver = .false.
logical, public :: lsdriver = .false.
logical, public :: iplanerank = .false.
integer, public :: driverid
character(len=3), public :: cdriverid
logical, public :: lchunkread = .false.
integer, public :: chunkread_size = 100
real, public :: courant = -1.
real, public :: diffnr = 0.25
real, public :: dt_lim
integer, public :: rk3step = 0
integer, public :: iexpnr = 0
character(len=3), public :: cexpnr
real, public :: thlsrc = 0.
real, public :: dx
real, public :: dx2
real, public :: dxi
real, public :: dxiq
real, public :: dxi5
real, public :: dx2i
real, public :: dy
real, public :: dy2
real, public :: dz
real, public :: dyi
real, public :: dyiq
real, public :: dyi5
real, public :: dy2i
integer, public :: nfaclyrs = 3
real, public, allocatable :: AM(:,:)
real, public, allocatable :: BM(:,:)
real, public, allocatable :: CM(:,:)
real, public, allocatable :: DM(:,:)
real, public, allocatable :: EM(:,:)
real, public, allocatable :: FM(:,:)
real, public, allocatable :: GM(:,:)
real, public, allocatable :: HM(:,:)
real, public, allocatable :: inAM(:,:)
real, public, allocatable :: IDM(:,:)
real, public, allocatable :: bb(:)
real, public, allocatable :: w(:)
real, public, allocatable :: dumv(:)
real, public, allocatable :: Tdash(:)
real, public :: rslabs
real, public, allocatable :: dzf(:)
real, public, allocatable :: dzfc(:)
real, public, allocatable :: dzfci(:)
real, public, allocatable :: dzf2(:)
real, public, allocatable :: dzh(:)
real, public, allocatable :: zh(:)
real, public, allocatable :: zf(:)
real, public, allocatable :: dzfi(:)
real, public, allocatable :: dzfiq(:)
real, public, allocatable :: dzfi5(:)
real, public, allocatable :: dzhi(:)
real, public, allocatable :: dzhci(:)
real, public, allocatable :: dzhiq(:)
real, public, allocatable :: dzh2i(:)
real, public, allocatable :: zhi(:)
real, public, allocatable :: zfi(:)
real, public, allocatable :: dxf(:)
real, public, allocatable :: dxfc(:)
real, public, allocatable :: dxfci(:)
real, public, allocatable :: dxf2(:)
real, public, allocatable :: dxfi(:)
real, public, allocatable :: dxfiq(:)
real, public, allocatable :: dxfi5(:)
real, public, allocatable :: dxh(:)
real, public, allocatable :: dxhi(:)
real, public, allocatable :: dxhci(:)
real, public, allocatable :: dxhiq(:)
real, public, allocatable :: dxh2i(:)
real, public, allocatable :: xh(:)
real, public, allocatable :: xf(:)
real, public, allocatable :: yh(:)
real, public, allocatable :: yf(:)
real, public :: xlen = -1.
real, public :: ylen = -1.
real, public, allocatable :: delta(:,:)
logical, public :: lmomsubs = .false.
character(len=80), public :: author = ''
character(len=80), public :: version = 'DALES U'

Subroutines

public subroutine initglobal()

Arguments

None

public subroutine exitglobal()

Arguments

None