weno5_smoothness Subroutine

public pure subroutine weno5_smoothness(f_stencil, beta0, beta1, beta2)

Compute the Jiang-Shu smoothness indicators for a 5-point WENO5 stencil.

See Jiang & Shu (1996), Eq. (24)-(26).

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	f_stencil(:,:)
real(kind=wp),	intent(out)			::	beta0(:)
real(kind=wp),	intent(out)			::	beta1(:)
real(kind=wp),	intent(out)			::	beta2(:)