s_spline_interpolator_1d__get_interp_points Subroutine

private subroutine s_spline_interpolator_1d__get_interp_points(self, tau)

Type Bound

sll_t_spline_interpolator_1d

Arguments

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

1D spline interpolator
real(kind=wp), intent(out), allocatable :: tau(:)

Source Code

  subroutine s_spline_interpolator_1d__get_interp_points( self, tau )

    class(sll_t_spline_interpolator_1d), intent(in   ) :: self
    real(wp),               allocatable, intent(  out) :: tau(:)

    SLL_ASSERT( allocated( self%tau ) )
    allocate( tau(size(self%tau)), source=self%tau )

  end subroutine s_spline_interpolator_1d__get_interp_points