solidellipsoidCubeOverlap Function

private function solidellipsoidCubeOverlap(me, cube) result(overlap)

This function checks intesection of solid cube and solid ellipsoid

This algorithm is taken from http://tog.acm.org/resources/GraphicsGems/gems/Boxellipsoid.c

Arguments

TypeIntentOptionalAttributesName
type(tem_ellipsoid_type), intent(in) :: me

ellipsoid object

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

cube object

Return Value logical


Called by

proc~~solidellipsoidcubeoverlap~~CalledByGraph proc~solidellipsoidcubeoverlap solidellipsoidCubeOverlap proc~tem_ellipsoidcubeoverlap tem_ellipsoidCubeOverlap proc~tem_ellipsoidcubeoverlap->proc~solidellipsoidcubeoverlap proc~tem_shape_subtreefromgeominters tem_shape_subTreeFromGeomInters proc~tem_shape_subtreefromgeominters->proc~tem_ellipsoidcubeoverlap proc~tem_create_subtree_of tem_create_subTree_of proc~tem_create_subtree_of->proc~tem_shape_subtreefromgeominters program~tem_varsys_test tem_varSys_test program~tem_varsys_test->proc~tem_create_subtree_of proc~tem_init_tracker_subtree tem_init_tracker_subTree proc~tem_init_tracker_subtree->proc~tem_create_subtree_of proc~tem_create_subtree_of_st_funlist tem_create_subTree_of_st_funList proc~tem_create_subtree_of_st_funlist->proc~tem_create_subtree_of proc~tem_init_convergence tem_init_convergence proc~tem_init_convergence->proc~tem_create_subtree_of proc~tem_write_debugmesh tem_write_debugMesh proc~tem_write_debugmesh->proc~tem_create_subtree_of

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: i
real(kind=rk), private :: dmin