f_bsplines_uniform__find_cell Function

private pure function f_bsplines_uniform__find_cell(self, x) result(icell)

results cell index

Type Bound

sll_t_bsplines_uniform

Arguments

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

uniform B-splines
real(kind=wp), intent(in) :: x

point of interest

Return Value integer


Source Code

  SLL_PURE function f_bsplines_uniform__find_cell( self, x ) result( icell )
    class(sll_t_bsplines_uniform), intent(in) :: self
    real(wp)                     , intent(in) :: x
    integer :: icell

    icell = -1
    !TODO: handle error within pure procedure
    !SLL_ERROR("sll_t_bsplines_uniform % find_cell","procedure not implemented")

  end function f_bsplines_uniform__find_cell