FV3 Bundle
CRTM_Aerosol_Define.f90 File Reference

Go to the source code of this file.

Data Types

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

Modules

module  crtm_aerosol_define
 

Functions/Subroutines

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

Variables

character(*), parameter crtm_aerosol_define::module_version_id = '$Id: CRTM_Aerosol_Define.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'
 
integer, parameter, public crtm_aerosol_define::n_valid_aerosol_categories = 8
 
integer, parameter, public crtm_aerosol_define::invalid_aerosol = 0
 
integer, parameter, public crtm_aerosol_define::dust_aerosol = 1
 
integer, parameter, public crtm_aerosol_define::seasalt_ssam_aerosol = 2
 
integer, parameter, public crtm_aerosol_define::seasalt_sscm1_aerosol = 3
 
integer, parameter, public crtm_aerosol_define::seasalt_sscm2_aerosol = 4
 
integer, parameter, public crtm_aerosol_define::seasalt_sscm3_aerosol = 5
 
integer, parameter, public crtm_aerosol_define::organic_carbon_aerosol = 6
 
integer, parameter, public crtm_aerosol_define::black_carbon_aerosol = 7
 
integer, parameter, public crtm_aerosol_define::sulfate_aerosol = 8
 
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 ]
 
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 ' ]
 
real(fp), parameter crtm_aerosol_define::zero = 0.0_fp
 
real(fp), parameter crtm_aerosol_define::one = 1.0_fp
 
integer, parameter crtm_aerosol_define::ml = 256
 
character(*), parameter crtm_aerosol_define::write_error_status = 'DELETE'
 

Function/Subroutine Documentation

◆ inquire_cleanup()

subroutine crtm_aerosol_inquirefile::inquire_cleanup ( )
private

Definition at line 866 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:

◆ read_cleanup()

subroutine crtm_aerosol_readfile::read_cleanup ( )
private

Definition at line 1056 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:

◆ read_record_cleanup()

subroutine read_record::read_record_cleanup ( )
private

Definition at line 1491 of file CRTM_Aerosol_Define.f90.

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

◆ write_cleanup()

subroutine crtm_aerosol_writefile::write_cleanup ( )
private

Definition at line 1235 of file CRTM_Aerosol_Define.f90.

Here is the call graph for this function:

◆ write_record_cleanup()

subroutine write_record::write_record_cleanup ( )
private

Definition at line 1555 of file CRTM_Aerosol_Define.f90.

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