Merge branch 'master' of ssh://git.code.sf.net/p/foam-extend/foam-extend-3.2
[foam-extend-3.2.git] / src / mesh / extrudeModel / linearRadial / linearRadial.C
blob5222645940e1ed06704a6fa4d704686c2377d1ef
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.
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.
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.
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/>.
24 \*---------------------------------------------------------------------------*/
26 #include "linearRadial.H"
27 #include "addToRunTimeSelectionTable.H"
29 namespace Foam
31 namespace extrudeModels
34 // * * * * * * * * * * * * * * Static Data Members * * * * * * * * * * * * * //
36 defineTypeNameAndDebug(linearRadial, 0);
38 addToRunTimeSelectionTable(extrudeModel, linearRadial, dictionary);
41 // * * * * * * * * * * * * * * * * Constructors  * * * * * * * * * * * * * * //
43 linearRadial::linearRadial(const dictionary& dict)
45     extrudeModel(typeName, dict),
46     R_(readScalar(coeffDict_.lookup("R")))
50 // * * * * * * * * * * * * * * * * Destructor  * * * * * * * * * * * * * * * //
52 linearRadial::~linearRadial()
56 // * * * * * * * * * * * * * * * * Operators * * * * * * * * * * * * * * * * //
58 point linearRadial::operator()
60     const point& surfacePoint,
61     const vector& surfaceNormal,
62     const label layer
63 ) const
65     // radius of the surface
66     scalar rs = mag(surfacePoint);
67     vector rsHat = surfacePoint/rs;
69     scalar delta = (R_ - rs)/nLayers_;
70     scalar r = rs + layer*delta;
71     return r*rsHat;
75 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
77 } // End namespace extrudeModels
78 } // End namespace Foam
80 // ************************************************************************* //