The observation response data derived type declaration.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public, | parameter | :: | RESPONSE_NAME_LEN | = | 8 |
Max. response name length. |
integer, | public, | parameter | :: | RESPONSE_UNIT_LEN | = | 8 |
Max. response unit length. |
integer, | public, | parameter | :: | RESPONSE_TYPE_REAL64 | = | 0 |
8-byte signed real. |
integer, | public, | parameter | :: | RESPONSE_TYPE_REAL32 | = | 1 |
4-byte signed real. |
integer, | public, | parameter | :: | RESPONSE_TYPE_INT64 | = | 2 |
8-byte signed integer. |
integer, | public, | parameter | :: | RESPONSE_TYPE_INT32 | = | 3 |
4-byte signed integer. |
integer, | public, | parameter | :: | RESPONSE_TYPE_LOGICAL | = | 4 |
Boolean. |
integer, | public, | parameter | :: | RESPONSE_TYPE_BYTE | = | 5 |
Byte. |
integer, | public, | parameter | :: | RESPONSE_TYPE_STRING | = | 6 |
Byte string. |
integer, | public, | parameter | :: | RESPONSE_TYPE_LAST | = | 6 |
Never use this. |
integer, | public, | parameter | :: | RESPONSE_TYPE_DEFAULT | = | RESPONSE_TYPE_REAL64 |
Default response type. |
integer, | public, | parameter | :: | RESPONSE_TYPE_NAME_LEN | = | 7 |
Max. response type name length. |
character(len=*), | public, | parameter | :: | RESPONSE_TYPE_NAMES(RESPONSE_TYPE_REAL64:RESPONSE_TYPE_LAST) | = | [character(len=RESPONSE_TYPE_NAME_LEN)::'real64', 'real32', 'int64', 'int32', 'logical', 'byte', 'string'] |
Response value type names. |
integer, | public, | parameter | :: | RESPONSE_SIZE | = | storage_size(response_type())/8 |
Size of |
Returns whether requests are equal.
Returns .true.
if given responses are equal.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(response_type), | intent(in) | :: | response1 |
The first response. |
||
type(response_type), | intent(in) | :: | response2 |
The second response. |
Response of a sensor.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character(len=RESPONSE_NAME_LEN), | public | :: | name | = | ' ' |
Response name ( |
|
character(len=RESPONSE_UNIT_LEN), | public | :: | unit | = | ' ' |
Response unit. |
|
integer, | public | :: | type | = | RESPONSE_TYPE_DEFAULT |
Response value type. |
|
integer, | public | :: | error | = | E_NONE |
Response error. |
|
real(kind=r8), | public | :: | value | = | 0.0_r8 |
Response value. |
Returns .true.
if given responses are equal.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(response_type), | intent(in) | :: | response1 |
The first response. |
||
type(response_type), | intent(in) | :: | response2 |
The second response. |
Returns .true.
if given response is valid. A response is valid if
attribute name is a valid id, attribute type is a valid response
value type, and attribute error is a valid error code.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(response_type), | intent(in) | :: | response |
Response type. |
Returns .true.
if the given response value type is valid.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | type |
Response value type. |
Returns allocatable string of response value type name, or invalid
if the type is invalid.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | type |
Response value type. |
Response value type name.
Prints response to standard output or given file unit.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(response_type), | intent(inout) | :: | response | |||
integer, | intent(in), | optional | :: | unit |