Abstract interpolator object.
Do not implement any actual interpolator: provide the interface for the different interpolators implemented.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
class(smoothness_indicators), | public, | allocatable | :: | is | Smoothness indicators. |
||
class(alpha_coefficients), | public, | allocatable | :: | alpha | Alpha coefficients. |
||
class(optimal_weights), | public, | allocatable | :: | weights | Optimal weights. |
||
class(polynomials), | public, | allocatable | :: | polynom | Polynomilas. |
Return interpolator string-description.
Return interpolator string-description.
String-description.
Interpolate values.
Interpolate values.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(interpolator), | intent(inout) | :: | self | Interpolator. |
||
integer(kind=I_P), | intent(in) | :: | S | Number of stencils actually used. |
||
real(kind=R_P), | intent(in) | :: | stencil(1:,1-S:) | Stencil of the interpolation [1:2, 1-S:-1+S]. |
||
character(len=*), | intent(in) | :: | location | Location of interpolation: left, right, both. |
||
real(kind=R_P), | intent(out) | :: | interpolation(1:) | Result of the interpolation, [1:2]. |
Create interpolator.
Create interpolator.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(interpolator), | intent(inout) | :: | self | Interpolator. |
||
class(base_object_constructor), | intent(in) | :: | constructor | Constructor. |
Destroy interpolator.
Destroy interpolator
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(interpolator), | intent(inout) | :: | self | Interpolator. |
type, extends(base_object) :: interpolator
!< Abstract interpolator object.
!<
!< @note Do not implement any actual interpolator: provide the interface for the different interpolators implemented.
class(smoothness_indicators), allocatable :: is !< Smoothness indicators.
class(alpha_coefficients), allocatable :: alpha !< Alpha coefficients.
class(optimal_weights), allocatable :: weights !< Optimal weights.
class(polynomials), allocatable :: polynom !< Polynomilas.
contains
! public deferred methods
procedure, nopass :: description !< Return interpolator string-description.
procedure, pass(self) :: interpolate !< Interpolate values.
! public methods
procedure, pass(self) :: create !< Create interpolator.
procedure, pass(self) :: destroy !< Destroy interpolator.
endtype interpolator