HASTY Morton (Z-order) key class.
Morton (Z-order) key class to identify a node.
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer(kind=I8P), | public | :: | key | = | 0_I8P | The key. |
| procedure, public, pass(self) :: hash | Hash the key. |
| procedure, public, pass(self) :: id | Return the id. |
| procedure, public, nopass :: is_key_allowed | Typeguard for used key. |
| procedure, public, pass(self) :: set | Set the key. |
| generic, public :: operator(==) => is_equal | Overloading |
| procedure, public, pass(self) :: destroy | Destroy the key. |
| procedure, public, pass(self) :: stringify | Return a string representation of the key. |
| procedure, private, pass(lhs) :: is_equal | Implement |
Return a string representation of the key.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(key_morton), | intent(in) | :: | self | The key. |
The key stringified.
Implement == operator.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(key_morton), | intent(in) | :: | lhs | Left hand side. |
||
| class(*), | intent(in) | :: | rhs | Rigth hand side. |
Destroy the key.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(key_morton), | intent(inout) | :: | self | The key. |