Small helping routine to keep track of leaf nodes.
HK: Originally this operation was inlined in create_children in a few places. Need to check for performance impact? Readability was not hurt too much by this, but it was changed into a flag and final decision, which in my opinion did not improve the readability as the reader has to track down the location where the final decision is taken, and introduces an additional if. It might be that the compiler is smart enough on both variants but anyway, I would prefer such a small routine if you think inlining is too burdensome. We should have an eye on the performance, though.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(sdr_protoTree_type), | intent(inout) | :: | me | Property bit mask to set the leaf bit in |
||
| integer, | intent(in) | :: | node_pos |