dm_type Module

DMPACK derived type enumerators and utilities.


Used by

  • module~~dm_type~~UsedByGraph module~dm_type dm_type module~dm_geojson dm_geojson module~dm_geojson->module~dm_type module~dm_logger dm_logger module~dm_logger->module~dm_type module~dm_mqueue dm_mqueue module~dm_mqueue->module~dm_type module~dm_mqueue_util dm_mqueue_util module~dm_mqueue_util->module~dm_type module~dm_mqueue_util->module~dm_mqueue module~dmpack dmpack module~dmpack->module~dm_type module~dmpack->module~dm_geojson module~dmpack->module~dm_logger module~dmpack->module~dm_mqueue module~dmpack->module~dm_mqueue_util

Variables

Type Visibility Attributes Name Initial
integer, public, parameter :: TYPE_NONE = 0

Invalid type.
integer, public, parameter :: TYPE_NODE = 1

Node.
integer, public, parameter :: TYPE_SENSOR = 2

Sensor.
integer, public, parameter :: TYPE_TARGET = 3

Target.
integer, public, parameter :: TYPE_OBSERV = 4

Observation.
integer, public, parameter :: TYPE_REQUEST = 5

Request of observation.
integer, public, parameter :: TYPE_RESPONSE = 6

Response of request.
integer, public, parameter :: TYPE_LOG = 7

Log.
integer, public, parameter :: TYPE_BEAT = 8

Heartbeat.
integer, public, parameter :: TYPE_DP = 9

X/Y data point.
integer, public, parameter :: TYPE_LAST = 9

Never use this.
integer, public, parameter :: TYPE_NAME_LEN = 8

Max. type name length.
character(len=*), public, parameter :: TYPE_NAMES(TYPE_NONE:TYPE_LAST) = [character(len=TYPE_NAME_LEN)::'none', 'node', 'sensor', 'target', 'observ', 'request', 'response', 'log', 'beat', 'dp']

Type names array.

Functions

public function dm_type_from_name(name) result(type)

Returns type from given name. If name is longer than TYPE_NAME_LEN, only the characters from 1 to TYPE_NAME_LEN are compared.

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: name

Derived type name.

Return Value integer

public pure elemental function dm_type_valid(type) result(valid)

Returns .true. if given type enumerator is valid. TYPE_NONE is an invalid type.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: type

Type enumerator.

Return Value logical