ribbon_points Function

private function ribbon_points(self) result(n)

Number of trajectory points to draw the surface through (none if all sources are zero).

Type Bound

RibbonArtist

Arguments

Type IntentOptional Attributes Name
class(RibbonArtist), intent(in) :: self

Return Value integer


Calls

proc~~ribbon_points~~CallsGraph proc~ribbon_points RibbonArtist%ribbon_points proc~source_points source_points proc~ribbon_points->proc~source_points proc~num_points Trajectory%num_points proc~source_points->proc~num_points proc~verify_data Trajectory%verify_data proc~source_points->proc~verify_data

Source Code

    integer function ribbon_points(self) result(n)
        class(RibbonArtist), intent(in) :: self
        n = 0
        if (all(self%start_%src == SOURCE_ZERO) .and. all(self%end_%src == SOURCE_ZERO)) return
        n = min(source_points(self%traj, self%start_), source_points(self%traj, self%end_))
    end function ribbon_points