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 |