polyLinear_3D Function

private pure function polyLinear_3D(cxDir) result(phi)

This function returns matrix entries for Linear polynomial for 3D stencil

Arguments

Type IntentOptional Attributes Name
real(kind=rk), intent(in) :: cxDir(3)

Return Value real(kind=rk), (4)


Called by

proc~~polylinear_3d~~CalledByGraph proc~polylinear_3d polyLinear_3D proc~build_matrixlsf_linearintp build_matrixLSF_linearIntp proc~build_matrixlsf_linearintp->proc~polylinear_3d proc~append_intpmatrixlsf append_intpMatrixLSF proc~append_intpmatrixlsf->proc~build_matrixlsf_linearintp interface~append~44 append interface~append~44->proc~append_intpmatrixlsf

Contents

Source Code

polyLinear_3D

Source Code

  pure function polyLinear_3D(cxDir) result (phi)
    ! --------------------------------------------------------------------------
    real(kind=rk), intent(in) :: cxDir(3)
    real(kind=rk) :: phi(4)
    ! --------------------------------------------------------------------------
    phi( 1) = 1.0_rk
    phi( 2) = cxDir(c_x)
    phi( 3) = cxDir(c_y)
    phi( 4) = cxDir(c_z)

  end function polyLinear_3D