find neighors of all blocks
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(tree_node_ptr) | :: | my_neighbor | ||||
| integer, | intent(out) | :: | my_neighbor_type | |||
| type(tree_node_ptr) | :: | tree | ||||
| integer, | intent(in) | :: | i1 | |||
| integer, | intent(in) | :: | i2 | |||
| integer, | intent(in) | :: | i3 | |||
| logical, | intent(out), | dimension(ndim) | :: | pole |
find neighors of level-one root blocks
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(tree_node_ptr) | :: | tree_neighbor | ||||
| type(tree_node_ptr) | :: | tree | ||||
| integer, | intent(in) | :: | i1 | |||
| integer, | intent(in) | :: | i2 | |||
| integer, | intent(in) | :: | i3 |