fixed writing out entries in advective bc
[OpenFOAM-1.6-ext.git] / src / lagrangian / molecularDynamics / potential / tetherPotential / basic / newTetherPotential.C
blob1decf41d84afa7a0594277ff1d70697f4156bcda
1 /*---------------------------------------------------------------------------*\
2   =========                 |
3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
4    \\    /   O peration     |
5     \\  /    A nd           | Copyright held by original author
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 the
13     Free Software Foundation; either version 2 of the License, or (at your
14     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, write to the Free Software Foundation,
23     Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
25 \*---------------------------------------------------------------------------*/
27 #include "tetherPotential.H"
29 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
31 namespace Foam
34 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
36 autoPtr<tetherPotential> tetherPotential::New
38     const word& name,
39     const dictionary& tetherPotentialProperties
42     word
43         tetherPotentialTypeName
44         (
45             tetherPotentialProperties.lookup("tetherPotential")
46         );
48     Info<< nl << "Selecting tether potential "
49         << tetherPotentialTypeName << " for "
50         << name << endl;
52     dictionaryConstructorTable::iterator cstrIter =
53         dictionaryConstructorTablePtr_->find(tetherPotentialTypeName);
55     if (cstrIter == dictionaryConstructorTablePtr_->end())
56     {
57         FatalErrorIn
58         (
59             "tetherPotential::New()"
60         )   << "Unknown tetherPotential type "
61             << tetherPotentialTypeName << nl << nl
62             << "Valid  tetherPotentials are: " << nl
63             << dictionaryConstructorTablePtr_->toc()
64             << exit(FatalError);
65     }
67     return autoPtr<tetherPotential>
68         (cstrIter()(name, tetherPotentialProperties));
72 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
74 } // End namespace Foam
76 // ************************************************************************* //