ply_lagrange_mode_at Function

public function ply_lagrange_mode_at(me, mode, x) result(f)

Evaluate the given Lagrangian mode (which is 1 at coord(mode) and 0 in all other points) at a given point x.

Arguments

TypeIntentOptionalAttributesName
type(ply_lagrange_type), intent(in) :: me

The polynomial in Lagrange basis.

integer, intent(in) :: mode

Mode to evaluate at x.

Here mode identifies the polynomial that is 1 in me%coord(mode) and 0 in all other nodes.

real(kind=rk), intent(in) :: x

Coordinate at which the mode is to be evaluated.

Return Value real(kind=rk)

Value of the polynomial at coordinate x.


Called by

proc~~ply_lagrange_mode_at~~CalledByGraph proc~ply_lagrange_mode_at ply_lagrange_mode_at proc~ply_lagrange_1d ply_lagrange_1D proc~ply_lagrange_1d->proc~ply_lagrange_mode_at proc~ply_lagrange_eval ply_lagrange_eval proc~ply_lagrange_eval->proc~ply_lagrange_mode_at proc~ply_init_l2p ply_init_l2p proc~ply_init_l2p->proc~ply_lagrange_1d proc~ply_poly_project_fillbody ply_poly_project_fillbody proc~ply_poly_project_fillbody->proc~ply_init_l2p proc~sdr_proto2treelm sdr_proto2treelm proc~sdr_proto2treelm->proc~ply_poly_project_fillbody proc~ply_fill_project_list ply_fill_project_list proc~ply_fill_project_list->proc~ply_poly_project_fillbody

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iPoint
real(kind=rk), private :: x_m