Module defining MPI communication tags for clarity and maintainability
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer(kind=default_int), | public, | parameter | :: | TAG_NODE_FINISH | = | 302 |
Global coordinator signals node coordinator to finish |
| integer(kind=default_int), | public, | parameter | :: | TAG_NODE_FRAGMENT | = | 301 |
Global coordinator sends fragment data to node coordinator |
| integer(kind=default_int), | public, | parameter | :: | TAG_NODE_MATRIX_RESULT | = | 304 |
Node coordinator sends matrix results to global coordinator |
| integer(kind=default_int), | public, | parameter | :: | TAG_NODE_REQUEST | = | 300 |
Node coordinator requests work from global coordinator |
| integer(kind=default_int), | public, | parameter | :: | TAG_NODE_SCALAR_RESULT | = | 303 |
Node coordinator sends results (fragment_idx + scalar) to global coordinator |
| integer(kind=default_int), | public, | parameter | :: | TAG_WORKER_FINISH | = | 202 |
Coordinator signals worker to finish |
| integer(kind=default_int), | public, | parameter | :: | TAG_WORKER_FRAGMENT | = | 201 |
Coordinator sends fragment data to worker |
| integer(kind=default_int), | public, | parameter | :: | TAG_WORKER_MATRIX_RESULT | = | 204 |
Worker sends matrix results back to coordinator |
| integer(kind=default_int), | public, | parameter | :: | TAG_WORKER_REQUEST | = | 200 |
Worker requests work from node coordinator |
| integer(kind=default_int), | public, | parameter | :: | TAG_WORKER_SCALAR_RESULT | = | 203 |
Worker sends scalar results back to coordinator |