Optimal weights object.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=R_P), | public, | allocatable | :: | opt(:,:) | Optimal weights [1:2,0:S-1]. |
Compute weights.
Compute weights.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(optimal_weights), | intent(inout) | :: | self | Optimal weights. |
||
integer(kind=I_P), | intent(in) | :: | S | Number of stencils used. |
Return weights string-description.
Return weights string-description.
String-description.
Createte weights.
Create weights.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(optimal_weights), | intent(inout) | :: | self | Optimal weights. |
||
class(base_object_constructor), | intent(in) | :: | constructor | Optimal weights constructor. |
Destroy weights.
Destroy weights.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(optimal_weights), | intent(inout) | :: | self | Optimial weights. |
type, extends(base_object) :: optimal_weights
!< Optimal weights object.
real(R_P), allocatable :: opt(:,:) !< Optimal weights [1:2,0:S-1].
contains
! deferred public methods
procedure, pass(self) :: compute !< Compute weights.
procedure, nopass :: description !< Return weights string-description.
! public methods
procedure, pass(self) :: create !< Createte weights.
procedure, pass(self) :: destroy !< Destroy weights.
endtype optimal_weights