Appearance
test_flume_weno_interpolation_fnl_kernels
Unit test RV-1 (device half) of the WENO interpolation tables: the device WENO primitive on one packed stencil.
Module-level (not a contains-internal procedure): device routines must be module procedures.
Source: src/tests/flume/unit/test_flume_weno_interpolation_fnl.F90
Dependencies
Contents
Subroutines
interpolate
Interpolate one packed stencil with the device WENO primitive.
fortran
subroutine interpolate(S, a, p, d, zeps, sigma, v, vr)Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
S | integer(kind=I4P) | in | Number of stencils used. | |
a | real(kind=R8P) | in | Interpolation optimal weights. | |
p | real(kind=R8P) | in | Interpolation polynomials coefficients. | |
d | real(kind=R8P) | in | Smoothness indicators coefficients. | |
zeps | real(kind=R8P) | in | Parameter avoiding division by zero. | |
sigma | real(kind=R8P) | in | Descaler switch: 0 Jiang-Shu, 1 scale-invariant. | |
v | real(kind=R8P) | in | Packed stencil. | |
vr | real(kind=R8P) | out | Interface values. |
Call graph