This routine extends the protoTree with max of minlevel or level of refinement object.
If it is a leaf, check for intersected objects, and keep on refining accordingly down to the maximum requested level. When the desired level is reached (no refinement object, or desired level of intersected refinement object reached, check all (26) direct neigbors. If there is a neighbor intersected by a boundary check its refinement level, if it is higher then the current one, do another refinement step.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(sdr_protoTree_type), | intent(inout) | :: | proto |
The proto tree description with all the data to refine further |
||
| type(sdr_geometry_type), | intent(in) | :: | geometry |
type which contains all geometry object infos |