This function returns matrix entries for Linear polynomial for 1D stencil
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=rk), | intent(in) | :: | cxDir(3) |
pure function polyLinear_1D(cxDir) result (phi)
! --------------------------------------------------------------------------
real(kind=rk), intent(in) :: cxDir(3)
real(kind=rk) :: phi(2)
! --------------------------------------------------------------------------
phi(1) = 1.0_rk
phi(2) = cxDir(c_x)
end function polyLinear_1D