FV3 Bundle
crtm_aerosol_define Module Reference

Data Types

interface  crtm_aerosol_inspect
 
type  crtm_aerosol_type
 
interface  operator(+)
 
interface  operator(-)
 
interface  operator(==)
 

Functions/Subroutines

pure integer function, public crtm_aerosol_categoryid (aerosol)
 
pure character(len(aerosol_category_name(1))) function, public crtm_aerosol_categoryname (aerosol)
 
integer function, public crtm_aerosol_categorylist (list)
 
elemental logical function, public crtm_aerosol_associated (Aerosol)
 
elemental subroutine, public crtm_aerosol_destroy (Aerosol)
 
elemental subroutine, public crtm_aerosol_create (Aerosol, n_Layers)
 
elemental type(crtm_aerosol_type) function, public crtm_aerosol_addlayercopy (aer, n_Added_Layers)
 
elemental subroutine, public crtm_aerosol_zero (Aerosol)
 
logical function, public crtm_aerosol_isvalid (Aerosol)
 
subroutine scalar_inspect (Aerosol, Unit)
 
subroutine rank1_inspect (Aerosol, Unit)
 
subroutine rank2_inspect (Aerosol, Unit)
 
subroutine, public crtm_aerosol_defineversion (Id)
 
elemental logical function, public crtm_aerosol_compare (x, y, n_SigFig)
 
elemental subroutine, public crtm_aerosol_setlayers (Aerosol, n_Layers)
 
integer function, public crtm_aerosol_inquirefile (Filename, n_Aerosols)
 
integer function, public crtm_aerosol_readfile (Filename, Aerosol, Quiet, No_Close, n_Aerosols, Debug)
 
integer function, public crtm_aerosol_writefile (Filename, Aerosol, Quiet, No_Close, Debug)
 
elemental logical function crtm_aerosol_equal (x, y)
 
elemental type(crtm_aerosol_type) function crtm_aerosol_add (aer1, aer2)
 
elemental type(crtm_aerosol_type) function crtm_aerosol_subtract (aer1, aer2)
 
integer function read_record (fid, aerosol)
 
integer function write_record (fid, aerosol)
 

Variables

character(*), parameter module_version_id = '$Id: CRTM_Aerosol_Define.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'
 
integer, parameter, public n_valid_aerosol_categories = 8
 
integer, parameter, public invalid_aerosol = 0
 
integer, parameter, public dust_aerosol = 1
 
integer, parameter, public seasalt_ssam_aerosol = 2
 
integer, parameter, public seasalt_sscm1_aerosol = 3
 
integer, parameter, public seasalt_sscm2_aerosol = 4
 
integer, parameter, public seasalt_sscm3_aerosol = 5
 
integer, parameter, public organic_carbon_aerosol = 6
 
integer, parameter, public black_carbon_aerosol = 7
 
integer, parameter, public sulfate_aerosol = 8
 
integer, dimension(0:n_valid_aerosol_categories), parameter aerosol_category_list = [ INVALID_AEROSOL, DUST_AEROSOL, SEASALT_SSAM_AEROSOL, SEASALT_SSCM1_AEROSOL, SEASALT_SSCM2_AEROSOL, SEASALT_SSCM3_AEROSOL, ORGANIC_CARBON_AEROSOL, BLACK_CARBON_AEROSOL, SULFATE_AEROSOL ]
 
character(*), dimension(0:n_valid_aerosol_categories), parameter, public aerosol_category_name = [ 'Invalid ', 'Dust ', 'Sea salt (SSAM) ', 'Sea salt (SSCM1)', 'Sea salt (SSCM2)', 'Sea salt (SSCM3)', 'Organic carbon ', 'Black carbon ', 'Sulfate ' ]
 
real(fp), parameter zero = 0.0_fp
 
real(fp), parameter one = 1.0_fp
 
integer, parameter ml = 256
 
character(*), parameter write_error_status = 'DELETE'
 

Function/Subroutine Documentation

◆ crtm_aerosol_add()

elemental type(crtm_aerosol_type) function crtm_aerosol_define::crtm_aerosol_add ( type(crtm_aerosol_type), intent(in)  aer1,
type(crtm_aerosol_type), intent(in)  aer2 
)
private

Definition at line 1347 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:

◆ crtm_aerosol_addlayercopy()

elemental type(crtm_aerosol_type) function, public crtm_aerosol_define::crtm_aerosol_addlayercopy ( type(crtm_aerosol_type), intent(in)  aer,
integer, intent(in)  n_Added_Layers 
)

Definition at line 381 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ crtm_aerosol_associated()

elemental logical function, public crtm_aerosol_define::crtm_aerosol_associated ( type(crtm_aerosol_type), intent(in)  Aerosol)

Definition at line 244 of file CRTM_Aerosol_Define.f90.

Here is the caller graph for this function:

◆ crtm_aerosol_categoryid()

pure integer function, public crtm_aerosol_define::crtm_aerosol_categoryid ( type(crtm_aerosol_type), intent(in)  aerosol)

Definition at line 178 of file CRTM_Aerosol_Define.f90.

Here is the caller graph for this function:

◆ crtm_aerosol_categorylist()

integer function, public crtm_aerosol_define::crtm_aerosol_categorylist ( integer, dimension(:), intent(out), allocatable  list)

Definition at line 193 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:

◆ crtm_aerosol_categoryname()

pure character(len(aerosol_category_name(1))) function, public crtm_aerosol_define::crtm_aerosol_categoryname ( type(crtm_aerosol_type), intent(in)  aerosol)

Definition at line 185 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ crtm_aerosol_compare()

elemental logical function, public crtm_aerosol_define::crtm_aerosol_compare ( type(crtm_aerosol_type), intent(in)  x,
type(crtm_aerosol_type), intent(in)  y,
integer, intent(in), optional  n_SigFig 
)

Definition at line 689 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ crtm_aerosol_create()

elemental subroutine, public crtm_aerosol_define::crtm_aerosol_create ( type(crtm_aerosol_type), intent(out)  Aerosol,
integer, intent(in)  n_Layers 
)

Definition at line 309 of file CRTM_Aerosol_Define.f90.

Here is the caller graph for this function:

◆ crtm_aerosol_defineversion()

subroutine, public crtm_aerosol_define::crtm_aerosol_defineversion ( character(*), intent(out)  Id)

Definition at line 644 of file CRTM_Aerosol_Define.f90.

◆ crtm_aerosol_destroy()

elemental subroutine, public crtm_aerosol_define::crtm_aerosol_destroy ( type(crtm_aerosol_type), intent(out)  Aerosol)

Definition at line 273 of file CRTM_Aerosol_Define.f90.

Here is the caller graph for this function:

◆ crtm_aerosol_equal()

elemental logical function crtm_aerosol_define::crtm_aerosol_equal ( type(crtm_aerosol_type), intent(in)  x,
type(crtm_aerosol_type), intent(in)  y 
)
private

Definition at line 1290 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:

◆ crtm_aerosol_inquirefile()

integer function, public crtm_aerosol_define::crtm_aerosol_inquirefile ( character(*), intent(in)  Filename,
integer, intent(out), optional  n_Aerosols 
)

Definition at line 818 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:

◆ crtm_aerosol_isvalid()

logical function, public crtm_aerosol_define::crtm_aerosol_isvalid ( type(crtm_aerosol_type), intent(in)  Aerosol)

Definition at line 487 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ crtm_aerosol_readfile()

integer function, public crtm_aerosol_define::crtm_aerosol_readfile ( character(*), intent(in)  Filename,
type(crtm_aerosol_type), dimension(:), intent(out)  Aerosol,
logical, intent(in), optional  Quiet,
logical, intent(in), optional  No_Close,
integer, intent(out), optional  n_Aerosols,
logical, intent(in), optional  Debug 
)

Definition at line 956 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ crtm_aerosol_setlayers()

elemental subroutine, public crtm_aerosol_define::crtm_aerosol_setlayers ( type(crtm_aerosol_type), intent(inout)  Aerosol,
integer, intent(in)  n_Layers 
)

Definition at line 763 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ crtm_aerosol_subtract()

elemental type(crtm_aerosol_type) function crtm_aerosol_define::crtm_aerosol_subtract ( type(crtm_aerosol_type), intent(in)  aer1,
type(crtm_aerosol_type), intent(in)  aer2 
)
private

Definition at line 1405 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:

◆ crtm_aerosol_writefile()

integer function, public crtm_aerosol_define::crtm_aerosol_writefile ( character(*), intent(in)  Filename,
type(crtm_aerosol_type), dimension(:), intent(in)  Aerosol,
logical, intent(in), optional  Quiet,
logical, intent(in), optional  No_Close,
logical, intent(in), optional  Debug 
)

Definition at line 1142 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ crtm_aerosol_zero()

elemental subroutine, public crtm_aerosol_define::crtm_aerosol_zero ( type(crtm_aerosol_type), intent(inout)  Aerosol)

Definition at line 437 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ rank1_inspect()

subroutine crtm_aerosol_define::rank1_inspect ( type(crtm_aerosol_type), dimension(:), intent(in)  Aerosol,
integer, intent(in), optional  Unit 
)
private

Definition at line 588 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:

◆ rank2_inspect()

subroutine crtm_aerosol_define::rank2_inspect ( type(crtm_aerosol_type), dimension(:,:), intent(in)  Aerosol,
integer, intent(in), optional  Unit 
)
private

Definition at line 603 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:

◆ read_record()

integer function crtm_aerosol_define::read_record ( integer, intent(in)  fid,
type(crtm_aerosol_type), intent(out)  aerosol 
)
private

Definition at line 1445 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ scalar_inspect()

subroutine crtm_aerosol_define::scalar_inspect ( type(crtm_aerosol_type), intent(in)  Aerosol,
integer, intent(in), optional  Unit 
)
private

Definition at line 563 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ write_record()

integer function crtm_aerosol_define::write_record ( integer, intent(in)  fid,
type(crtm_aerosol_type), intent(in)  aerosol 
)
private

Definition at line 1514 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:

Variable Documentation

◆ aerosol_category_list

integer, dimension(0:n_valid_aerosol_categories), parameter crtm_aerosol_define::aerosol_category_list = [ INVALID_AEROSOL, DUST_AEROSOL, SEASALT_SSAM_AEROSOL, SEASALT_SSCM1_AEROSOL, SEASALT_SSCM2_AEROSOL, SEASALT_SSCM3_AEROSOL, ORGANIC_CARBON_AEROSOL, BLACK_CARBON_AEROSOL, SULFATE_AEROSOL ]
private

Definition at line 116 of file CRTM_Aerosol_Define.f90.

◆ aerosol_category_name

character(*), dimension(0:n_valid_aerosol_categories), parameter, public crtm_aerosol_define::aerosol_category_name = [ 'Invalid ', 'Dust ', 'Sea salt (SSAM) ', 'Sea salt (SSCM1)', 'Sea salt (SSCM2)', 'Sea salt (SSCM3)', 'Organic carbon ', 'Black carbon ', 'Sulfate ' ]

Definition at line 126 of file CRTM_Aerosol_Define.f90.

◆ black_carbon_aerosol

integer, parameter, public crtm_aerosol_define::black_carbon_aerosol = 7

Definition at line 114 of file CRTM_Aerosol_Define.f90.

◆ dust_aerosol

integer, parameter, public crtm_aerosol_define::dust_aerosol = 1

Definition at line 108 of file CRTM_Aerosol_Define.f90.

◆ invalid_aerosol

integer, parameter, public crtm_aerosol_define::invalid_aerosol = 0

Definition at line 107 of file CRTM_Aerosol_Define.f90.

◆ ml

integer, parameter crtm_aerosol_define::ml = 256
private

Definition at line 140 of file CRTM_Aerosol_Define.f90.

◆ module_version_id

character(*), parameter crtm_aerosol_define::module_version_id = '$Id: CRTM_Aerosol_Define.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'
private

Definition at line 103 of file CRTM_Aerosol_Define.f90.

◆ n_valid_aerosol_categories

integer, parameter, public crtm_aerosol_define::n_valid_aerosol_categories = 8

Definition at line 106 of file CRTM_Aerosol_Define.f90.

◆ one

real(fp), parameter crtm_aerosol_define::one = 1.0_fp
private

Definition at line 138 of file CRTM_Aerosol_Define.f90.

◆ organic_carbon_aerosol

integer, parameter, public crtm_aerosol_define::organic_carbon_aerosol = 6

Definition at line 113 of file CRTM_Aerosol_Define.f90.

◆ seasalt_ssam_aerosol

integer, parameter, public crtm_aerosol_define::seasalt_ssam_aerosol = 2

Definition at line 109 of file CRTM_Aerosol_Define.f90.

◆ seasalt_sscm1_aerosol

integer, parameter, public crtm_aerosol_define::seasalt_sscm1_aerosol = 3

Definition at line 110 of file CRTM_Aerosol_Define.f90.

◆ seasalt_sscm2_aerosol

integer, parameter, public crtm_aerosol_define::seasalt_sscm2_aerosol = 4

Definition at line 111 of file CRTM_Aerosol_Define.f90.

◆ seasalt_sscm3_aerosol

integer, parameter, public crtm_aerosol_define::seasalt_sscm3_aerosol = 5

Definition at line 112 of file CRTM_Aerosol_Define.f90.

◆ sulfate_aerosol

integer, parameter, public crtm_aerosol_define::sulfate_aerosol = 8

Definition at line 115 of file CRTM_Aerosol_Define.f90.

◆ write_error_status

character(*), parameter crtm_aerosol_define::write_error_status = 'DELETE'
private

Definition at line 142 of file CRTM_Aerosol_Define.f90.

◆ zero

real(fp), parameter crtm_aerosol_define::zero = 0.0_fp
private

Definition at line 137 of file CRTM_Aerosol_Define.f90.