BUG: UListIO: byteSize overflowing on really big faceLists
[OpenFOAM-2.0.x.git] / applications / utilities / mesh / generation / extrude / extrudeModel / linearRadial / linearRadial.C
blob6477ed4a6d538dcea5449b88376d3eb459c5af03
1 /*---------------------------------------------------------------------------*\
2   =========                 |
3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
4    \\    /   O peration     |
5     \\  /    A nd           | Copyright (C) 2011 OpenFOAM Foundation
6      \\/     M anipulation  |
7 -------------------------------------------------------------------------------
8 License
9     This file is part of OpenFOAM.
11     OpenFOAM is free software: you can redistribute it and/or modify it
12     under the terms of the GNU General Public License as published by
13     the Free Software Foundation, either version 3 of the License, or
14     (at your option) any later version.
16     OpenFOAM is distributed in the hope that it will be useful, but WITHOUT
17     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
18     FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
19     for more details.
21     You should have received a copy of the GNU General Public License
22     along with OpenFOAM.  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"))),
47     Rsurface_(coeffDict_.lookupOrDefault<scalar>("Rsurface", -1))
51 // * * * * * * * * * * * * * * * * Destructor  * * * * * * * * * * * * * * * //
53 linearRadial::~linearRadial()
57 // * * * * * * * * * * * * * * * * Operators * * * * * * * * * * * * * * * * //
59 point linearRadial::operator()
61     const point& surfacePoint,
62     const vector& surfaceNormal,
63     const label layer
64 ) const
66     // radius of the surface
67     scalar rs = mag(surfacePoint);
68     vector rsHat = surfacePoint/rs;
69     if (Rsurface_ >= 0) rs = Rsurface_;
71     scalar r = rs + (R_ - rs)*sumThickness(layer);
72     return r*rsHat;
76 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
78 } // End namespace extrudeModels
79 } // End namespace Foam
81 // ************************************************************************* //