axes_bound Subroutine

private subroutine axes_bound(self, center, radius)

The bounding sphere: the origin, radius the axis length.

Type Bound

CoordinateAxes

Arguments

Type IntentOptional Attributes Name
class(CoordinateAxes), intent(in) :: self
real(kind=wp), intent(out) :: center(3)

the bounding sphere, frame coordinates (scene units)
real(kind=wp), intent(out) :: radius

the bounding sphere, frame coordinates (scene units)

Source Code

    subroutine axes_bound(self, center, radius)
        class(CoordinateAxes), intent(in) :: self
        real(wp), intent(out) :: center(3), radius          !! the bounding sphere, frame coordinates (scene units)
        center = 0.0_wp
        radius = self%length_
    end subroutine axes_bound