module ATMOSPHERE / Variables More...

Data Types
type	atmosvars

Functions/Subroutines
subroutine, public	atmosvars_getlocalmeshprgvar (domid, mesh, prgvars_list, auxvars_list, varid, var, dens_hyd, pres_hyd, lcmesh3d)

subroutine, public	atmosvars_getlocalmeshprgvars (domid, mesh, prgvars_list, auxvars_list, ddens, momx, momy, momz, therm, dens_hyd, pres_hyd, rtot, cvtot, cptot, lcmesh3d)

subroutine, public	atmosvars_getlocalmeshsfcvar (domid, mesh, auxvars2d_list, prec, prec_engi, lcmesh2d)

subroutine, public	atmosvars_getlocalmeshqtrcvar (domid, mesh, trcvars_list, varid, var, lcmesh3d)

subroutine, public	atmosvars_getlocalmeshqtrc_qv (domid, mesh, trcvars_list, forcing_list, var, var_tp, lcmesh3d)

subroutine, public	atmosvars_getlocalmeshqtrcvarlist (domid, mesh, trcvars_list, varid_s, var_list, lcmesh3d)

subroutine, public	atmosvars_getlocalmeshphyauxvars (domid, mesh, phyauxvars_list, pres, pt, lcmesh3d)

subroutine, public	atmosvars_getlocalmeshphytends (domid, mesh, phytends_list, dens_tp, momx_tp, momy_tp, momz_tp, rhot_tp, rhoh_p, rhoq_tp, lcmesh3d)

subroutine, public	atmosvars_getlocalmeshqtrcphytend (domid, mesh, phytends_list, qtrcid, rhoq_tp)

Variables
real(rp), dimension(prgvar_num), parameter	progvars_check_min = (/ -1.0_RP, -100.0_RP, -200.0_RP, -200.0_RP, -200.0_RP /)

integer, parameter, public	atmos_auxvars2d_prec_id = 1

integer, parameter, public	atmos_auxvars2d_prec_engi_id = 2

integer, parameter, public	atmos_auxvars2d_num = 2

type(variableinfo), dimension(atmos_auxvars2d_num), public	atmos_auxvars2d_vinfo

integer, parameter, public	atmos_diagvars_dens_id = 1

integer, parameter, public	atmos_diagvars_u_id = 2

integer, parameter, public	atmos_diagvars_v_id = 3

integer, parameter, public	atmos_diagvars_w_id = 4

integer, parameter, public	atmos_diagvars_t_id = 5

integer, parameter, public	atmos_diagvars_umet_id = 6

integer, parameter, public	atmos_diagvars_vmet_id = 7

integer, parameter, public	atmos_diagvars_qdry_id = 8

integer, parameter, public	atmos_diagvars_rh_id = 9

integer, parameter, public	atmos_diagvars_engt_id = 10

integer, parameter, public	atmos_diagvars_engp_id = 11

integer, parameter, public	atmos_diagvars_engk_id = 12

integer, parameter, public	atmos_diagvars_engi_id = 13

integer, parameter, public	atmos_diagvars3d_num = 13

type(variableinfo), dimension(atmos_diagvars3d_num), public	atmos_diagvars3d_vinfo

integer, parameter, public	atmos_diagvars_rain_id = 1

integer, parameter, public	atmos_diagvars_snow_id = 2

integer, parameter, public	atmos_diagvars2d_num = 2

type(variableinfo), dimension(atmos_diagvars2d_num), public	atmos_diagvars2d_vinfo

Detailed Description

module ATMOSPHERE / Variables

Description: Container for atmospheric variables

Author: Yuta Kawai, Team SCALE

NAMELIST

PARAM_ATMOS_VARS

name type default value comment

CHECK_RANGE logical .false.

CHECK_TOTAL logical .false.

PARAM_ATMOS_VARS_RESTART

name	type	default value	comment
IN_BASENAME	character(len=H_LONG)	''	Basename of the input file
IN_POSTFIX_TIMELABEL	logical	.false.	Add timelabel to the basename of input file?
OUT_BASENAME	character(len=H_LONG)	''	Basename of the output file
OUT_POSTFIX_TIMELABEL	logical	.true.	Add timelabel to the basename of output file?
OUT_TITLE	character(len=H_MID)	''	Title of the output file
OUT_DTYPE	character(len=H_SHORT)	'DEFAULT'	REAL4 or REAL8

History Output

name	description	unit	variable
PREC	surface precipitaion flux	kg/m2/s	PREC
PREC_ENGI	internal energy of precipitation	J/m2	PREC_ENGI
RAIN	surface rain flux	kg/m2/s	RAIN
SNOW	surface snow flux	kg/m2/s	SNOW
DENS	density	kg/m3	DENS
U	velocity u	m/s	U
V	velocity v	m/s	V
W	velocity w	m/s	W
T	temperature	K	T
Umet	eastward velocity	m/s	Umet
Vmet	northward velocity	m/s	Vmet

Function/Subroutine Documentation

◆ atmosvars_getlocalmeshprgvar()

subroutine, public mod_atmos_vars::atmosvars_getlocalmeshprgvar	(	integer, intent(in)	domid,
		class(meshbase), intent(in)	mesh,
		class(modelvarmanager), intent(inout)	prgvars_list,
		class(modelvarmanager), intent(inout)	auxvars_list,
		integer, intent(in)	varid,
		class(localmeshfieldbase), intent(out), pointer	var,
		class(localmeshfieldbase), intent(out), optional, pointer	dens_hyd,
		class(localmeshfieldbase), intent(out), optional, pointer	pres_hyd,
		class(localmesh3d), intent(out), optional, pointer	lcmesh3d )

Definition at line 873 of file mod_atmos_vars.F90.

   
    implicit none
 
    integer, intent(in) :: domID
    class(MeshBase), intent(in) :: mesh
    class(ModelVarManager), intent(inout) :: prgvars_list
    class(ModelVarManager), intent(inout) :: auxvars_list
    integer, intent(in) :: varid
    class(LocalMeshFieldBase), pointer, intent(out) :: var
    class(LocalMeshFieldBase), pointer, intent(out), optional :: DENS_hyd, PRES_hyd
    class(LocalMesh3D), pointer, intent(out), optional :: lcmesh3D
 
    class(MeshFieldBase), pointer :: field
    class(LocalMeshBase), pointer :: lcmesh
    !-------------------------------------------------------
 
    !--
    call prgvars_list%Get(varid, field)
    call field%GetLocalMeshField(domid, var)
 
    if (present(dens_hyd)) then
      call auxvars_list%Get(auxvar_denshydro_id, field)
      call field%GetLocalMeshField(domid, dens_hyd)
    end if
    if (present(pres_hyd)) then
      call auxvars_list%Get(auxvar_preshydro_id, field)
      call field%GetLocalMeshField(domid, pres_hyd)
    end if
 
    if (present(lcmesh3d)) then
      call mesh%GetLocalMesh( domid, lcmesh )
      nullify( lcmesh3d )
 
      select type(lcmesh)
      type is (localmesh3d)
        if (present(lcmesh3d)) lcmesh3d => lcmesh
      end select
    end if
 
    return

Referenced by mod_atmos_phy_tb::atmosphytb_setup(), and mod_atmos_vars::atmosvars::regist_physvar_manager().

◆ atmosvars_getlocalmeshprgvars()

subroutine, public mod_atmos_vars::atmosvars_getlocalmeshprgvars	(	integer, intent(in)	domid,
		class(meshbase), intent(in)	mesh,
		class(modelvarmanager), intent(inout)	prgvars_list,
		class(modelvarmanager), intent(inout)	auxvars_list,
		class(localmeshfieldbase), intent(out), pointer	ddens,
		class(localmeshfieldbase), intent(out), pointer	momx,
		class(localmeshfieldbase), intent(out), pointer	momy,
		class(localmeshfieldbase), intent(out), pointer	momz,
		class(localmeshfieldbase), intent(out), pointer	therm,
		class(localmeshfieldbase), intent(out), pointer	dens_hyd,
		class(localmeshfieldbase), intent(out), pointer	pres_hyd,
		class(localmeshfieldbase), intent(out), pointer	rtot,
		class(localmeshfieldbase), intent(out), pointer	cvtot,
		class(localmeshfieldbase), intent(out), pointer	cptot,
		class(localmesh3d), intent(out), optional, pointer	lcmesh3d )

Definition at line 919 of file mod_atmos_vars.F90.

    implicit none
    integer, intent(in) :: domID
    class(MeshBase), intent(in) :: mesh
    class(ModelVarManager), intent(inout) :: prgvars_list
    class(ModelVarManager), intent(inout) :: auxvars_list
    class(LocalMeshFieldBase), pointer, intent(out) :: DDENS, MOMX, MOMY, MOMZ, THERM
    class(LocalMeshFieldBase), pointer, intent(out) :: DENS_hyd, PRES_hyd
    class(LocalMeshFieldBase), pointer, intent(out) :: Rtot, CVtot, CPtot
    class(LocalMesh3D), pointer, intent(out), optional :: lcmesh3D
 
    class(MeshFieldBase), pointer :: field
    class(LocalMeshBase), pointer :: lcmesh
    !-------------------------------------------------------
 
    !--
    call prgvars_list%Get(prgvar_ddens_id, field)
    call field%GetLocalMeshField(domid, ddens)
 
    call prgvars_list%Get(prgvar_momx_id, field)
    call field%GetLocalMeshField(domid, momx)
    
    call prgvars_list%Get(prgvar_momy_id, field)
    call field%GetLocalMeshField(domid, momy)
 
    call prgvars_list%Get(prgvar_momz_id, field)
    call field%GetLocalMeshField(domid, momz)
 
    call prgvars_list%Get(prgvar_therm_id, field)
    call field%GetLocalMeshField(domid, therm)
  
    !--
    call auxvars_list%Get(auxvar_denshydro_id, field)
    call field%GetLocalMeshField(domid, dens_hyd)
 
    call auxvars_list%Get(auxvar_preshydro_id, field)
    call field%GetLocalMeshField(domid, pres_hyd)
 
    call auxvars_list%Get(auxvar_rtot_id, field)
    call field%GetLocalMeshField(domid, rtot)
 
    call auxvars_list%Get(auxvar_cvtot_id, field)
    call field%GetLocalMeshField(domid, cvtot)
 
    call auxvars_list%Get(auxvar_cptot_id, field)
    call field%GetLocalMeshField(domid, cptot)
 
    !---
    
    if ( present(lcmesh3d) ) then
      call mesh%GetLocalMesh( domid, lcmesh )
      nullify( lcmesh3d )
 
      select type(lcmesh)
      type is (localmesh3d)
        if (present(lcmesh3d)) lcmesh3d => lcmesh
      end select
    end if
 
    return

Referenced by mod_atmos_phy_tb::atmosphytb_setup(), mod_dg_prep::dg_prep(), mod_experiment::exp_setinitcond_lc::exp_setinitcond_lc(), mod_mkinit::mkinit(), and mod_atmos_vars::atmosvars::regist_physvar_manager().

◆ atmosvars_getlocalmeshsfcvar()

subroutine, public mod_atmos_vars::atmosvars_getlocalmeshsfcvar	(	integer, intent(in)	domid,
		class(meshbase), intent(in)	mesh,
		class(modelvarmanager), intent(inout)	auxvars2d_list,
		class(localmeshfieldbase), intent(out), pointer	prec,
		class(localmeshfieldbase), intent(out), pointer	prec_engi,
		class(localmesh2d), intent(out), optional, pointer	lcmesh2d )

Definition at line 985 of file mod_atmos_vars.F90.

 
   implicit none
   integer, intent(in) :: domID
   class(MeshBase), intent(in) :: mesh
   class(ModelVarManager), intent(inout) :: auxvars2D_list
   class(LocalMeshFieldBase), pointer, intent(out) :: PREC, PREC_ENGI
   class(LocalMesh2D), pointer, intent(out), optional :: lcmesh2D
 
   class(MeshFieldBase), pointer :: field
   class(LocalMeshBase), pointer :: lcmesh
   !-------------------------------------------------------
 
   !--
   call auxvars2d_list%Get(atmos_auxvars2d_prec_id, field)
   call field%GetLocalMeshField(domid, prec)
 
   call auxvars2d_list%Get(atmos_auxvars2d_prec_engi_id, field)
   call field%GetLocalMeshField(domid, prec_engi)
 
   if (present(lcmesh2d)) then
     call mesh%GetLocalMesh( domid, lcmesh )
     nullify( lcmesh2d )
 
     select type(lcmesh)
     type is (localmesh2d)
       if (present(lcmesh2d)) lcmesh2d => lcmesh
     end select
   end if
 
   return

References atmos_auxvars2d_prec_engi_id, and atmos_auxvars2d_prec_id.

Referenced by mod_atmos_component::atmos_setup(), and mod_atmos_vars::atmosvars::regist_physvar_manager().

◆ atmosvars_getlocalmeshqtrcvar()

subroutine, public mod_atmos_vars::atmosvars_getlocalmeshqtrcvar	(	integer, intent(in)	domid,
		class(meshbase), intent(in)	mesh,
		class(modelvarmanager), intent(inout)	trcvars_list,
		integer, intent(in)	varid,
		class(localmeshfieldbase), intent(out), pointer	var,
		class(localmesh3d), intent(out), optional, pointer	lcmesh3d )

Definition at line 1020 of file mod_atmos_vars.F90.

 
   implicit none
   integer, intent(in) :: domID
   class(MeshBase), intent(in) :: mesh
   class(ModelVarManager), intent(inout) :: trcvars_list
   integer, intent(in) :: varid
   class(LocalMeshFieldBase), pointer, intent(out) :: var
   class(LocalMesh3D), pointer, intent(out), optional :: lcmesh3D
 
   class(MeshFieldBase), pointer :: field
   class(LocalMeshBase), pointer :: lcmesh
   !-------------------------------------------------------
 
   !--
   call trcvars_list%Get(varid, field)
   call field%GetLocalMeshField(domid, var)
 
   if (present(lcmesh3d)) then
     call mesh%GetLocalMesh( domid, lcmesh )
     nullify( lcmesh3d )
 
     select type(lcmesh)
     type is (localmesh3d)
       if (present(lcmesh3d)) lcmesh3d => lcmesh
     end select
   end if
 
   return

Referenced by mod_atmos_phy_tb::atmosphytb_setup(), mod_experiment::exp_setinitcond_lc::exp_setinitcond_lc(), and mod_atmos_vars::atmosvars::regist_physvar_manager().

◆ atmosvars_getlocalmeshqtrc_qv()

subroutine, public mod_atmos_vars::atmosvars_getlocalmeshqtrc_qv	(	integer, intent(in)	domid,
		class(meshbase), intent(in)	mesh,
		class(modelvarmanager), intent(inout)	trcvars_list,
		class(modelvarmanager), intent(inout)	forcing_list,
		class(localmeshfieldbase), intent(out), pointer	var,
		class(localmeshfieldbase), intent(out), pointer	var_tp,
		class(localmesh3d), intent(out), optional, pointer	lcmesh3d )

Definition at line 1054 of file mod_atmos_vars.F90.

 
    use scale_atmos_hydrometeor, only: &
      atmos_hydrometeor_dry, &
      i_qv    
   implicit none
   integer, intent(in) :: domID
   class(MeshBase), intent(in) :: mesh
   class(ModelVarManager), intent(inout) :: trcvars_list
   class(ModelVarManager), intent(inout) :: forcing_list
   class(LocalMeshFieldBase), pointer, intent(out) :: var
   class(LocalMeshFieldBase), pointer, intent(out) :: var_tp
   class(LocalMesh3D), pointer, intent(out), optional :: lcmesh3D
 
   class(MeshFieldBase), pointer :: field
   class(LocalMeshBase), pointer :: lcmesh
 
   integer :: iq, tend_iq
   !-------------------------------------------------------
 
   !--
   if ( atmos_hydrometeor_dry ) then
     iq =0; tend_iq = phytend_num1+1
   else
     iq = i_qv; tend_iq = phytend_num1 + i_qv
   end if
 
   call trcvars_list%Get(iq, field)
   call field%GetLocalMeshField(domid, var)
 
   call forcing_list%Get(tend_iq, field)
   call field%GetLocalMeshField(domid, var_tp)
 
   if (present(lcmesh3d)) then
     call mesh%GetLocalMesh( domid, lcmesh )
     nullify( lcmesh3d )
 
     select type(lcmesh)
     type is (localmesh3d)
       if (present(lcmesh3d)) lcmesh3d => lcmesh
     end select
   end if
 
   return

Referenced by mod_atmos_vars::atmosvars::regist_physvar_manager().

◆ atmosvars_getlocalmeshqtrcvarlist()

subroutine, public mod_atmos_vars::atmosvars_getlocalmeshqtrcvarlist	(	integer, intent(in)	domid,
		class(meshbase), intent(in)	mesh,
		class(modelvarmanager), intent(inout)	trcvars_list,
		integer, intent(in)	varid_s,
		type(localmeshfieldbaselist), dimension(:), intent(out)	var_list,
		class(localmesh3d), intent(out), optional, pointer	lcmesh3d )

Definition at line 1102 of file mod_atmos_vars.F90.

 
    implicit none
    integer, intent(in) :: domID
    class(MeshBase), intent(in) :: mesh
    class(ModelVarManager), intent(inout) :: trcvars_list
    integer, intent(in) :: varid_s
    type(LocalMeshFieldBaseList), intent(out) :: var_list(:)
    class(LocalMesh3D), pointer, intent(out), optional :: lcmesh3D
 
    class(MeshFieldBase), pointer :: field
    class(LocalMeshBase), pointer :: lcmesh
 
    integer :: iq
    !-------------------------------------------------------
 
    !--
    do iq = varid_s, varid_s + size(var_list) - 1
      call trcvars_list%Get(iq, field)
      call field%GetLocalMeshField(domid, var_list(iq-varid_s+1)%ptr)
    end do
    if (present(lcmesh3d)) then
      call mesh%GetLocalMesh( domid, lcmesh )
      nullify( lcmesh3d )
 
      select type(lcmesh)
      type is (localmesh3d)
        if (present(lcmesh3d)) lcmesh3d => lcmesh
      end select
    end if
 
    return

Referenced by atmosvars_getlocalmeshqtrcphytend(), and mod_atmos_vars::atmosvars::regist_physvar_manager().

◆ atmosvars_getlocalmeshphyauxvars()

subroutine, public mod_atmos_vars::atmosvars_getlocalmeshphyauxvars	(	integer, intent(in)	domid,
		class(meshbase), intent(in)	mesh,
		class(modelvarmanager), intent(inout)	phyauxvars_list,
		class(localmeshfieldbase), intent(out), pointer	pres,
		class(localmeshfieldbase), intent(out), pointer	pt,
		class(localmesh3d), intent(out), optional, pointer	lcmesh3d )

Definition at line 1139 of file mod_atmos_vars.F90.

 
    implicit none
    integer, intent(in) :: domID
    class(MeshBase), intent(in) :: mesh
    class(ModelVarManager), intent(inout) :: phyauxvars_list
    class(LocalMeshFieldBase), pointer, intent(out) :: PRES, PT
    class(LocalMesh3D), pointer, intent(out), optional :: lcmesh3D
 
    class(MeshFieldBase), pointer :: field
    class(LocalMeshBase), pointer :: lcmesh
    !-------------------------------------------------------
 
    !--    
    call phyauxvars_list%Get(auxvar_pres_id, field)
    call field%GetLocalMeshField(domid, pres)
 
    call phyauxvars_list%Get(auxvar_pt_id, field)
    call field%GetLocalMeshField(domid, pt)
 
    !---
    
    if (present(lcmesh3d)) then
      call mesh%GetLocalMesh( domid, lcmesh )
      nullify( lcmesh3d )
 
      select type(lcmesh)
      type is (localmesh3d)
        if (present(lcmesh3d)) lcmesh3d => lcmesh
      end select
    end if
 
    return

Referenced by mod_atmos_phy_tb::atmosphytb_setup(), and mod_atmos_vars::atmosvars::regist_physvar_manager().

◆ atmosvars_getlocalmeshphytends()

subroutine, public mod_atmos_vars::atmosvars_getlocalmeshphytends	(	integer, intent(in)	domid,
		class(meshbase), intent(in)	mesh,
		class(modelvarmanager), intent(inout)	phytends_list,
		class(localmeshfieldbase), intent(out), pointer	dens_tp,
		class(localmeshfieldbase), intent(out), pointer	momx_tp,
		class(localmeshfieldbase), intent(out), pointer	momy_tp,
		class(localmeshfieldbase), intent(out), pointer	momz_tp,
		class(localmeshfieldbase), intent(out), pointer	rhot_tp,
		class(localmeshfieldbase), intent(out), pointer	rhoh_p,
		type(localmeshfieldbaselist), dimension(qa), intent(inout), optional	rhoq_tp,
		class(localmesh3d), intent(out), optional, pointer	lcmesh3d )

Definition at line 1177 of file mod_atmos_vars.F90.

 
    implicit none
    integer, intent(in) :: domID
    class(MeshBase), intent(in) :: mesh
    class(ModelVarManager), intent(inout) :: phytends_list
    class(LocalMeshFieldBase), pointer, intent(out) :: DENS_tp, MOMX_tp, MOMY_tp, MOMZ_tp, RHOT_tp
    class(LocalMeshFieldBase), pointer, intent(out) :: RHOH_p
    type(LocalMeshFieldBaseList), intent(inout), optional :: RHOQ_tp(QA)
    class(LocalMesh3D), pointer, intent(out), optional :: lcmesh3D
 
    class(MeshFieldBase), pointer :: field
    class(LocalMeshBase), pointer :: lcmesh
 
    integer :: iq
    !-------------------------------------------------------
 
    !--
    call phytends_list%Get(phytend_dens_id, field)
    call field%GetLocalMeshField(domid, dens_tp)
 
    call phytends_list%Get(phytend_momx_id, field)
    call field%GetLocalMeshField(domid, momx_tp)
    
    call phytends_list%Get(phytend_momy_id, field)
    call field%GetLocalMeshField(domid, momy_tp)
 
    call phytends_list%Get(phytend_momz_id, field)
    call field%GetLocalMeshField(domid, momz_tp)
 
    call phytends_list%Get(phytend_rhot_id, field)
    call field%GetLocalMeshField(domid, rhot_tp)
 
    call phytends_list%Get(phytend_rhoh_id, field)
    call field%GetLocalMeshField(domid, rhoh_p)
 
    if ( present(rhoq_tp) ) then
      do iq = 1, qa
        call phytends_list%Get(phytend_num1+iq, field)
        call field%GetLocalMeshField(domid, rhoq_tp(iq)%ptr)  
      end do
    end if
 
    !---
    if ( present(lcmesh3d) ) then
      call mesh%GetLocalMesh( domid, lcmesh )
      nullify( lcmesh3d )
 
      select type(lcmesh)
      type is (localmesh3d)
        if ( present(lcmesh3d) ) lcmesh3d => lcmesh
      end select
    end if
 
    return

Referenced by mod_atmos_component::atmos_setup(), mod_atmos_phy_tb::atmosphytb_setup(), and mod_atmos_vars::atmosvars::regist_physvar_manager().

◆ atmosvars_getlocalmeshqtrcphytend()

subroutine, public mod_atmos_vars::atmosvars_getlocalmeshqtrcphytend	(	integer, intent(in)	domid,
		class(meshbase), intent(in)	mesh,
		class(modelvarmanager), intent(inout)	phytends_list,
		integer, intent(in)	qtrcid,
		class(localmeshfieldbase), intent(out), pointer	rhoq_tp )

Definition at line 1238 of file mod_atmos_vars.F90.

 
    implicit none
    integer, intent(in) :: domID
    class(MeshBase), intent(in) :: mesh
    class(ModelVarManager), intent(inout) :: phytends_list
    integer, intent(in) :: qtrcid
    class(LocalMeshFieldBase), pointer, intent(out) :: RHOQ_tp
 
    class(MeshFieldBase), pointer :: field
    class(LocalMeshBase), pointer :: lcmesh
    !-------------------------------------------------------
 
    call phytends_list%Get(phytend_num1 + qtrcid, field)
    call field%GetLocalMeshField(domid, rhoq_tp)
 
    return

References mod_atmos_phy_mp_vars::atmosphympvars_getlocalmeshfields_sfcflx(), and atmosvars_getlocalmeshqtrcvarlist().

Referenced by mod_atmos_vars::atmosvars::regist_physvar_manager().

Variable Documentation

◆ progvars_check_min

real(rp), dimension(prgvar_num), parameter mod_atmos_vars::progvars_check_min = (/ -1.0_RP, -100.0_RP, -200.0_RP, -200.0_RP, -200.0_RP /)

Definition at line 142 of file mod_atmos_vars.F90.

142 real(RP), parameter :: PROGVARS_check_min(PRGVAR_NUM) = (/ -1.0_rp, -100.0_rp, -200.0_rp, -200.0_rp, -200.0_rp /)

◆ atmos_auxvars2d_prec_id

integer, parameter, public mod_atmos_vars::atmos_auxvars2d_prec_id = 1

Definition at line 148 of file mod_atmos_vars.F90.

148 integer, public, parameter :: ATMOS_AUXVARS2D_PREC_ID = 1

Referenced by atmosvars_getlocalmeshsfcvar().

◆ atmos_auxvars2d_prec_engi_id

integer, parameter, public mod_atmos_vars::atmos_auxvars2d_prec_engi_id = 2

Definition at line 149 of file mod_atmos_vars.F90.

149 integer, public, parameter :: ATMOS_AUXVARS2D_PREC_ENGI_ID = 2

Referenced by atmosvars_getlocalmeshsfcvar().

◆ atmos_auxvars2d_num

integer, parameter, public mod_atmos_vars::atmos_auxvars2d_num = 2

Definition at line 150 of file mod_atmos_vars.F90.

150 integer, public, parameter :: ATMOS_AUXVARS2D_NUM = 2

◆ atmos_auxvars2d_vinfo

type(variableinfo), dimension(atmos_auxvars2d_num), public mod_atmos_vars::atmos_auxvars2d_vinfo

Definition at line 152 of file mod_atmos_vars.F90.

152 type(VariableInfo), public :: ATMOS_AUXVARS2D_VINFO(ATMOS_AUXVARS2D_NUM)

◆ atmos_diagvars_dens_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_dens_id = 1

Definition at line 161 of file mod_atmos_vars.F90.

161 integer, public, parameter :: ATMOS_DIAGVARS_DENS_ID = 1

◆ atmos_diagvars_u_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_u_id = 2

Definition at line 162 of file mod_atmos_vars.F90.

162 integer, public, parameter :: ATMOS_DIAGVARS_U_ID = 2

◆ atmos_diagvars_v_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_v_id = 3

Definition at line 163 of file mod_atmos_vars.F90.

163 integer, public, parameter :: ATMOS_DIAGVARS_V_ID = 3

◆ atmos_diagvars_w_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_w_id = 4

Definition at line 164 of file mod_atmos_vars.F90.

164 integer, public, parameter :: ATMOS_DIAGVARS_W_ID = 4

◆ atmos_diagvars_t_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_t_id = 5

Definition at line 165 of file mod_atmos_vars.F90.

165 integer, public, parameter :: ATMOS_DIAGVARS_T_ID = 5

◆ atmos_diagvars_umet_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_umet_id = 6

Definition at line 166 of file mod_atmos_vars.F90.

166 integer, public, parameter :: ATMOS_DIAGVARS_Umet_ID = 6

◆ atmos_diagvars_vmet_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_vmet_id = 7

Definition at line 167 of file mod_atmos_vars.F90.

167 integer, public, parameter :: ATMOS_DIAGVARS_Vmet_ID = 7

◆ atmos_diagvars_qdry_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_qdry_id = 8

Definition at line 168 of file mod_atmos_vars.F90.

168 integer, public, parameter :: ATMOS_DIAGVARS_QDRY_ID = 8

◆ atmos_diagvars_rh_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_rh_id = 9

Definition at line 169 of file mod_atmos_vars.F90.

169 integer, public, parameter :: ATMOS_DIAGVARS_RH_ID = 9

◆ atmos_diagvars_engt_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_engt_id = 10

Definition at line 170 of file mod_atmos_vars.F90.

170 integer, public, parameter :: ATMOS_DIAGVARS_ENGT_ID = 10

◆ atmos_diagvars_engp_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_engp_id = 11

Definition at line 171 of file mod_atmos_vars.F90.

171 integer, public, parameter :: ATMOS_DIAGVARS_ENGP_ID = 11

◆ atmos_diagvars_engk_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_engk_id = 12

Definition at line 172 of file mod_atmos_vars.F90.

172 integer, public, parameter :: ATMOS_DIAGVARS_ENGK_ID = 12

◆ atmos_diagvars_engi_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_engi_id = 13

Definition at line 173 of file mod_atmos_vars.F90.

173 integer, public, parameter :: ATMOS_DIAGVARS_ENGI_ID = 13

◆ atmos_diagvars3d_num

integer, parameter, public mod_atmos_vars::atmos_diagvars3d_num = 13

Definition at line 174 of file mod_atmos_vars.F90.

174 integer, public, parameter :: ATMOS_DIAGVARS3D_NUM = 13

◆ atmos_diagvars3d_vinfo

type(variableinfo), dimension(atmos_diagvars3d_num), public mod_atmos_vars::atmos_diagvars3d_vinfo

Definition at line 176 of file mod_atmos_vars.F90.

176 type(VariableInfo), public :: ATMOS_DIAGVARS3D_VINFO(ATMOS_DIAGVARS3D_NUM)

◆ atmos_diagvars_rain_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_rain_id = 1

Definition at line 193 of file mod_atmos_vars.F90.

193 integer, public, parameter :: ATMOS_DIAGVARS_RAIN_ID = 1

◆ atmos_diagvars_snow_id

integer, parameter, public mod_atmos_vars::atmos_diagvars_snow_id = 2

Definition at line 194 of file mod_atmos_vars.F90.

194 integer, public, parameter :: ATMOS_DIAGVARS_SNOW_ID = 2

◆ atmos_diagvars2d_num

integer, parameter, public mod_atmos_vars::atmos_diagvars2d_num = 2

Definition at line 195 of file mod_atmos_vars.F90.

195 integer, public, parameter :: ATMOS_DIAGVARS2D_NUM = 2

◆ atmos_diagvars2d_vinfo

type(variableinfo), dimension(atmos_diagvars2d_num), public mod_atmos_vars::atmos_diagvars2d_vinfo

Definition at line 197 of file mod_atmos_vars.F90.

197 type(VariableInfo), public :: ATMOS_DIAGVARS2D_VINFO(ATMOS_DIAGVARS2D_NUM)

Data Types

Functions/Subroutines

Variables