compute_full_stencil_smoothness Subroutine

public pure subroutine compute_full_stencil_smoothness(f_stencil, beta_mat, beta)

Evaluate a quadratic smoothness form on the full stencil.

Used by WENO-CU6 for the sixth-order reference smoothness indicator β6.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	f_stencil(:,:)
real(kind=wp),	intent(in)			::	beta_mat(:,:)
real(kind=wp),	intent(out)			::	beta(:)