getArow1D Module Function

pure function getArow1D(N, xi) result(row)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: N
real(kind=wp), intent(in) :: xi

Return Value real(kind=wp), dimension(N)


Calls

proc~~getarow1d~~CallsGraph proc~getarow1d getArow1D interface~pascal_row pascal_row proc~getarow1d->interface~pascal_row

Contents

Source Code


Source Code

  pure module function getArow1D(N, xi) result(row)
    integer, intent(in)     :: N
    real(wp), intent(in)    :: xi
    real(wp), dimension(N)  :: row

    row = pascal_row(N-1, xi)

    return
  end function getArow1D