FV3 Bundle
odas_define Module Reference

Data Types

type  odas_type
 

Functions/Subroutines

logical function, public associated_odas (ODAS, ANY_Test)
 
integer function, public destroy_odas (ODAS, No_Clear, RCS_Id, Message_Log)
 
integer function, public allocate_odas (n_Predictors, n_Absorbers, n_Channels, n_Alphas, n_Coeffs, ODAS, RCS_Id, Message_Log)
 
integer function, public assign_odas (ODAS_in, ODAS_out, RCS_Id, Message_Log)
 
integer function, public equal_odas (ODAS_LHS, ODAS_RHS, ULP_Scale, Check_All, RCS_Id, Message_Log)
 
integer function, public checkrelease_odas (ODAS, RCS_Id, Message_Log)
 
integer function, public checkalgorithm_odas (ODAS, RCS_Id, Message_Log)
 
subroutine, public info_odas (ODAS, Info, RCS_Id)
 
subroutine clear_odas (ODAS)
 

Variables

character(*), parameter module_rcs_id = '$Id: ODAS_Define.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'
 
integer, parameter ip_invalid = -1
 
real(double), parameter fp_invalid = -1.0_Double
 
integer, parameter set = 1
 
integer, parameter sl = 20
 
integer, parameter ml = 256
 
integer, parameter, public odas_release = 7
 
integer, parameter odas_version = 1
 
character(*), parameter odas_algorithm_name = 'ODAS'
 
integer, parameter carriage_return = 13
 
integer, parameter linefeed = 10
 
integer, parameter, public invalid_wmo_satellite_id = 1023
 
integer, parameter, public invalid_wmo_sensor_id = 2047
 
integer, parameter, public n_sensor_types = 4
 
integer, parameter, public invalid_sensor = 0
 
integer, parameter, public microwave_sensor = 1
 
integer, parameter, public infrared_sensor = 2
 
integer, parameter, public visible_sensor = 3
 
integer, parameter ultraviolet_sensor = 4
 
character(*), dimension(0:n_sensor_types), parameter, public sensor_type_name = (/ 'Invalid ', 'Microwave ', 'Infrared ', 'Visible ', 'Ultraviolet' /)
 

Function/Subroutine Documentation

◆ allocate_odas()

integer function, public odas_define::allocate_odas ( integer, intent(in)  n_Predictors,
integer, intent(in)  n_Absorbers,
integer, intent(in)  n_Channels,
integer, intent(in)  n_Alphas,
integer, intent(in)  n_Coeffs,
type(odas_type), intent(inout)  ODAS,
character(*), intent(out), optional  RCS_Id,
character(*), intent(in), optional  Message_Log 
)

Definition at line 528 of file ODAS_Define.f90.

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

◆ assign_odas()

integer function, public odas_define::assign_odas ( type(odas_type), intent(in)  ODAS_in,
type(odas_type), intent(inout)  ODAS_out,
character(*), intent(out), optional  RCS_Id,
character(*), intent(in), optional  Message_Log 
)

Definition at line 701 of file ODAS_Define.f90.

Here is the call graph for this function:

◆ associated_odas()

logical function, public odas_define::associated_odas ( type(odas_type), intent(in)  ODAS,
integer, intent(in), optional  ANY_Test 
)

Definition at line 227 of file ODAS_Define.f90.

Here is the caller graph for this function:

◆ checkalgorithm_odas()

integer function, public odas_define::checkalgorithm_odas ( type(odas_type), intent(in)  ODAS,
character(*), intent(out), optional  RCS_Id,
character(*), intent(in), optional  Message_Log 
)

Definition at line 1329 of file ODAS_Define.f90.

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

◆ checkrelease_odas()

integer function, public odas_define::checkrelease_odas ( type(odas_type), intent(in)  ODAS,
character(*), intent(out), optional  RCS_Id,
character(*), intent(in), optional  Message_Log 
)

Definition at line 1226 of file ODAS_Define.f90.

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

◆ clear_odas()

subroutine odas_define::clear_odas ( type(odas_type), intent(inout)  ODAS)
private

Definition at line 1471 of file ODAS_Define.f90.

Here is the caller graph for this function:

◆ destroy_odas()

integer function, public odas_define::destroy_odas ( type(odas_type), intent(inout)  ODAS,
integer, intent(in), optional  No_Clear,
character(*), intent(out), optional  RCS_Id,
character(*), intent(in), optional  Message_Log 
)

Definition at line 340 of file ODAS_Define.f90.

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

◆ equal_odas()

integer function, public odas_define::equal_odas ( type(odas_type), intent(in)  ODAS_LHS,
type(odas_type), intent(in)  ODAS_RHS,
integer, intent(in), optional  ULP_Scale,
integer, intent(in), optional  Check_All,
character(*), intent(out), optional  RCS_Id,
character(*), intent(in), optional  Message_Log 
)

Definition at line 872 of file ODAS_Define.f90.

Here is the call graph for this function:

◆ info_odas()

subroutine, public odas_define::info_odas ( type(odas_type), intent(in)  ODAS,
character(*), intent(out)  Info,
character(*), intent(out), optional  RCS_Id 
)

Definition at line 1401 of file ODAS_Define.f90.

Here is the caller graph for this function:

Variable Documentation

◆ carriage_return

integer, parameter odas_define::carriage_return = 13
private

Definition at line 87 of file ODAS_Define.f90.

◆ fp_invalid

real(double), parameter odas_define::fp_invalid = -1.0_Double
private

Definition at line 75 of file ODAS_Define.f90.

◆ infrared_sensor

integer, parameter, public odas_define::infrared_sensor = 2

Definition at line 96 of file ODAS_Define.f90.

◆ invalid_sensor

integer, parameter, public odas_define::invalid_sensor = 0

Definition at line 94 of file ODAS_Define.f90.

◆ invalid_wmo_satellite_id

integer, parameter, public odas_define::invalid_wmo_satellite_id = 1023

Definition at line 90 of file ODAS_Define.f90.

◆ invalid_wmo_sensor_id

integer, parameter, public odas_define::invalid_wmo_sensor_id = 2047

Definition at line 91 of file ODAS_Define.f90.

◆ ip_invalid

integer, parameter odas_define::ip_invalid = -1
private

Definition at line 74 of file ODAS_Define.f90.

◆ linefeed

integer, parameter odas_define::linefeed = 10
private

Definition at line 88 of file ODAS_Define.f90.

◆ microwave_sensor

integer, parameter, public odas_define::microwave_sensor = 1

Definition at line 95 of file ODAS_Define.f90.

◆ ml

integer, parameter odas_define::ml = 256
private

Definition at line 80 of file ODAS_Define.f90.

◆ module_rcs_id

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

Definition at line 71 of file ODAS_Define.f90.

◆ n_sensor_types

integer, parameter, public odas_define::n_sensor_types = 4

Definition at line 93 of file ODAS_Define.f90.

◆ odas_algorithm_name

character(*), parameter odas_define::odas_algorithm_name = 'ODAS'
private

Definition at line 85 of file ODAS_Define.f90.

◆ odas_release

integer, parameter, public odas_define::odas_release = 7

Definition at line 82 of file ODAS_Define.f90.

◆ odas_version

integer, parameter odas_define::odas_version = 1
private

Definition at line 83 of file ODAS_Define.f90.

◆ sensor_type_name

character(*), dimension( 0:n_sensor_types ), parameter, public odas_define::sensor_type_name = (/ 'Invalid ', 'Microwave ', 'Infrared ', 'Visible ', 'Ultraviolet' /)

Definition at line 99 of file ODAS_Define.f90.

◆ set

integer, parameter odas_define::set = 1
private

Definition at line 77 of file ODAS_Define.f90.

◆ sl

integer, parameter odas_define::sl = 20
private

Definition at line 79 of file ODAS_Define.f90.

◆ ultraviolet_sensor

integer, parameter odas_define::ultraviolet_sensor = 4
private

Definition at line 98 of file ODAS_Define.f90.

◆ visible_sensor

integer, parameter, public odas_define::visible_sensor = 3

Definition at line 97 of file ODAS_Define.f90.