Test the intersection between the given cube and the object specified by obj_pos.
This test obviously depends on the kind of object to intersect, thus a select case has to be used. Alternatively we might think of deploying function pointers.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(tem_cube_type), | intent(in) | :: | cube | |||
| type(sdr_geometry_type), | intent(in) | :: | geometry | |||
| integer, | intent(in) | :: | obj_pos |
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | public | :: | prim_pos | ||||
| integer, | public | :: | prim_kind |