module atmosphere / aerosol More...

Functions/Subroutines
subroutine, public	atmos_aerosol_setup
	Setup. More...

Variables
integer, parameter, public	n_ae = 7

integer, parameter, public	i_a01 = 1

integer, parameter, public	i_a02 = 2

integer, parameter, public	i_a03 = 3

integer, parameter, public	i_a04 = 4

integer, parameter, public	i_a05 = 5

integer, parameter, public	i_a06 = 6

integer, parameter, public	i_a07 = 7

character(len=h_short), dimension(n_ae), parameter, public	ae_name = (/ "A01", "A02", "A03", "A04", "A05", "A06", "A07" /)

character(len=h_mid), dimension(n_ae), parameter, public	ae_desc = (/ "Soil dust ", "Carbonacerous (BC/OC=0.3) ", "Carbonacerous (BC/OC=0.15)", "Carbonacerous (BC/OC=0.) ", "Black carbon ", "Sulfate ", "Sea salt " /)

real(rp), dimension(n_ae), parameter, public	ae_dens = (/ 2.50E+3_RP, 1.43E+3_RP, 1.46E+3_RP, 1.50E+3_RP, 1.25E+3_RP, 1.77E+3_RP, 2.20E+3_RP /)

Detailed Description

module atmosphere / aerosol

Description: Aerosol module

Author: Team SCALE

Function/Subroutine Documentation

◆ atmos_aerosol_setup()

subroutine, public scale_atmos_aerosol::atmos_aerosol_setup

Setup.

Definition at line 75 of file scale_atmos_aerosol.F90.

     implicit none
     !---------------------------------------------------------------------------
  
     log_newline
     log_info("ATMOS_AEROSOL_setup",*) 'Setup'
  
     return

Variable Documentation

◆ n_ae

integer, parameter, public scale_atmos_aerosol::n_ae = 7

Definition at line 33 of file scale_atmos_aerosol.F90.

33 integer, public, parameter :: N_AE = 7

Referenced by scale_atmos_phy_ae_kajino13::atmos_phy_ae_kajino13_effective_radius(), scale_atmos_phy_ae_offline::atmos_phy_ae_offline_effective_radius(), mod_atmos_phy_ae_vars::atmos_phy_ae_vars_get_diagnostic(), mod_atmos_phy_ae_vars::atmos_phy_ae_vars_history(), mod_atmos_phy_ae_vars::atmos_phy_ae_vars_setup(), mod_atmos_phy_rd_driver::atmos_phy_rd_driver_calc_tendency(), scale_atmos_phy_rd_mstrnx::atmos_phy_rd_mstrnx_flux(), and scale_atmos_phy_rd_mstrnx::atmos_phy_rd_mstrnx_setup().

◆ i_a01

integer, parameter, public scale_atmos_aerosol::i_a01 = 1

Definition at line 34 of file scale_atmos_aerosol.F90.

34 integer, public, parameter :: I_A01 = 1 ! Soil dust

◆ i_a02

integer, parameter, public scale_atmos_aerosol::i_a02 = 2

Definition at line 35 of file scale_atmos_aerosol.F90.

35 integer, public, parameter :: I_A02 = 2 ! Carbonacerous (BC/OC=0.3)

◆ i_a03

integer, parameter, public scale_atmos_aerosol::i_a03 = 3

Definition at line 36 of file scale_atmos_aerosol.F90.

36 integer, public, parameter :: I_A03 = 3 ! Carbonacerous (BC/OC=0.15)

◆ i_a04

integer, parameter, public scale_atmos_aerosol::i_a04 = 4

Definition at line 37 of file scale_atmos_aerosol.F90.

37 integer, public, parameter :: I_A04 = 4 ! Carbonacerous (BC/OC=0.)

◆ i_a05

integer, parameter, public scale_atmos_aerosol::i_a05 = 5

Definition at line 38 of file scale_atmos_aerosol.F90.

38 integer, public, parameter :: I_A05 = 5 ! Black carbon

◆ i_a06

integer, parameter, public scale_atmos_aerosol::i_a06 = 6

Definition at line 39 of file scale_atmos_aerosol.F90.

39 integer, public, parameter :: I_A06 = 6 ! Sulfate

◆ i_a07

integer, parameter, public scale_atmos_aerosol::i_a07 = 7

Definition at line 40 of file scale_atmos_aerosol.F90.

40 integer, public, parameter :: I_A07 = 7 ! Sea salt

◆ ae_name

character(len=h_short), dimension(n_ae), parameter, public scale_atmos_aerosol::ae_name = (/ "A01", "A02", "A03", "A04", "A05", "A06", "A07" /)

Definition at line 42 of file scale_atmos_aerosol.F90.

42 character(len=H_SHORT), public, parameter :: AE_NAME(N_AE) = &

43 (/ "A01", "A02", "A03", "A04", "A05", "A06", "A07" /)

Referenced by mod_atmos_phy_ae_vars::atmos_phy_ae_vars_setup().

◆ ae_desc

character(len=h_mid), dimension(n_ae), parameter, public scale_atmos_aerosol::ae_desc = (/ "Soil dust ", "Carbonacerous (BC/OC=0.3) ", "Carbonacerous (BC/OC=0.15)", "Carbonacerous (BC/OC=0.) ", "Black carbon ", "Sulfate ", "Sea salt " /)

Definition at line 44 of file scale_atmos_aerosol.F90.

   character(len=H_MID),   public, parameter :: AE_DESC(N_AE) = &
        (/ "Soil dust                 ", &  ! Soil dust
           "Carbonacerous (BC/OC=0.3) ", &  ! Carbonacerous (BC/OC=0.3)
           "Carbonacerous (BC/OC=0.15)", &  ! Carbonacerous (BC/OC=0.15)
           "Carbonacerous (BC/OC=0.)  ", &  ! Carbonacerous (BC/OC=0.)
           "Black carbon              ", &  ! Black carbon
           "Sulfate                   ", &  ! Sulfate
           "Sea salt                  "  /) ! Sea salt