sdr_spacerInterwovenCubeOverlap Function

public function sdr_spacerInterwovenCubeOverlap(spacerInterwoven, cube) result(overlap)

Arguments

TypeIntentOptionalAttributesName
type(sdr_spacerInterwoven_type), intent(in) :: spacerInterwoven

spacer geometry data

type(tem_cube_type), intent(in) :: cube

Return Value logical


Calls

proc~~sdr_spacerinterwovencubeoverlap~~CallsGraph proc~sdr_spacerinterwovencubeoverlap sdr_spacerInterwovenCubeOverlap proc~tem_spherecubeoverlap tem_sphereCubeOverlap proc~sdr_spacerinterwovencubeoverlap->proc~tem_spherecubeoverlap

Called by

proc~~sdr_spacerinterwovencubeoverlap~~CalledByGraph proc~sdr_spacerinterwovencubeoverlap sdr_spacerInterwovenCubeOverlap proc~is_intersecting is_intersecting proc~is_intersecting->proc~sdr_spacerinterwovencubeoverlap proc~create_children~2 create_children proc~create_children~2->proc~is_intersecting proc~inherit_intersectedobject inHerit_intersectedObject proc~inherit_intersectedobject->proc~is_intersecting proc~sdr_inherit_distancerefineobject sdr_inHerit_distanceRefineObject proc~sdr_inherit_distancerefineobject->proc~inherit_intersectedobject proc~sdr_build_prototree sdr_build_protoTree proc~sdr_build_prototree->proc~create_children~2 proc~sdr_refine_leaf sdr_refine_leaf proc~sdr_refine_leaf->proc~inherit_intersectedobject program~seeder seeder program~seeder->proc~sdr_inherit_distancerefineobject program~seeder->proc~sdr_build_prototree program~seeder->proc~sdr_refine_leaf

Contents


Variables

TypeVisibilityAttributesNameInitial
real(kind=rk), private :: proj
integer, private :: iVer
type(tem_sphere_type), private :: sphere
real(kind=rk), private :: cubeVer(15,3)