Globals Library 1.0
|
Weighted version of Euclian norm. More...
Public Member Functions | |
procedure, public | init (this, lun_err, ndir, noddir) |
Constructor for type Norms::dir_norm | |
procedure, public | eval_norm (this, nvec, vec, scr) |
Evaluation of the weighted Euclidean norm. | |
Public Member Functions inherited from norms::abs_norm | |
procedure(compute_norm), deferred, public | eval_norm (this, nvec, vec, scr) |
Abstract procedure for the evaluation of the norm. | |
Public Attributes | |
integer | ndir |
Number of Dirichlet nodes. | |
integer, dimension(:), allocatable | noddir |
Indeces of the Dirichlet Nodes. | |
Weighted version of Euclian norm.
The entries on the Dirichlet node are set to zero \(G_{i,j} = \delta_{i,j} (1 - \delta_{i,k})\) for \(k\) in noddir
.
procedure, public norms::dir_norm::init | ( | class(dir_norm), intent(inout) | this, |
integer, intent(in) | lun_err, | ||
integer, intent(in) | ndir, | ||
integer, dimension(ndir), intent(in) | noddir ) |
Constructor for type Norms::dir_norm
procedure, public norms::dir_norm::eval_norm | ( | class(dir_norm), intent(inout) | this, |
integer, intent(in) | nvec, | ||
real(kind=double), dimension(nvec), intent(in) | vec, | ||
real(kind=double), dimension(nvec), intent(inout), optional | scr ) |
Evaluation of the weighted Euclidean norm.
integer norms::dir_norm::ndir |
Number of Dirichlet nodes.
integer, dimension(:), allocatable norms::dir_norm::noddir |
Indeces of the Dirichlet Nodes.