src/foam/interpolations/RBFInterpolation/RBFFunctions/Gauss/Gauss.C

   1 /*---------------------------------------------------------------------------*\
   2   =========                 |
   3   \\      /  F ield         | foam-extend: Open Source CFD
   4    \\    /   O peration     | Version:     3.2
   5     \\  /    A nd           | Web:         http://www.foam-extend.org
   6      \\/     M anipulation  | For copyright notice see file Copyright
   7 -------------------------------------------------------------------------------
   8 License
   9     This file is part of foam-extend.
  10
  11     foam-extend is free software: you can redistribute it and/or modify it
  12     under the terms of the GNU General Public License as published by the
  13     Free Software Foundation, either version 3 of the License, or (at your
  14     option) any later version.
  15
  16     foam-extend is distributed in the hope that it will be useful, but
  17     WITHOUT ANY WARRANTY; without even the implied warranty of
  18     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  19     General Public License for more details.
  20
  21     You should have received a copy of the GNU General Public License
  22     along with foam-extend.  If not, see <http://www.gnu.org/licenses/>.
  23
  24 \*---------------------------------------------------------------------------*/
  25
  26 #include "Gauss.H"
  27 #include "addToRunTimeSelectionTable.H"
  28
  29 // * * * * * * * * * * * * * * Static Data Members * * * * * * * * * * * * * //
  30
  31 namespace Foam
  32 {
  33     defineTypeNameAndDebug(Gauss, 0);
  34     addToRunTimeSelectionTable(RBFFunction, Gauss, dictionary);
  35 }
  36
  37
  38 // * * * * * * * * * * * * * * * * Constructors  * * * * * * * * * * * * * * //
  39
  40 Foam::Gauss::Gauss(const scalar radius)
  41 :
  42     RBFFunction(),
  43     radius_(radius)
  44 {}
  45
  46
  47 Foam::Gauss::Gauss(const dictionary& dict)
  48 :
  49     RBFFunction(),
  50     radius_(readScalar(dict.lookup("radius")))
  51 {}
  52
  53
  54 // * * * * * * * * * * * * * * * * Destructor  * * * * * * * * * * * * * * * //
  55
  56 Foam::Gauss::~Gauss()
  57 {}
  58
  59
  60 // * * * * * * * * * * * * * * * Member Functions  * * * * * * * * * * * * * //
  61
  62 Foam::tmp<Foam::scalarField> Foam::Gauss::weights
  63 (
  64     const vectorField& controlPoints,
  65     const vector& dataPoint
  66 ) const
  67 {
  68     // Algorithmic improvement, Matteo Lombardi.  21/Mar/2011
  69     scalarField sqrDist = magSqr(controlPoints - dataPoint);
  70
  71     return Foam::exp(-sqr(radius_)*sqrDist);
  72 }
  73
  74
  75 // ************************************************************************* //