1 /*---------------------------------------------------------------------------*\
3 \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
5 \\ / A nd | Copyright (C) 1991-2009 OpenCFD Ltd.
7 -------------------------------------------------------------------------------
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
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 "chemistrySolver.H"
29 // * * * * * * * * * * * * * * * * Selectors * * * * * * * * * * * * * * * * //
31 template<class CompType, class ThermoType>
32 Foam::autoPtr<Foam::chemistrySolver<CompType, ThermoType> >
33 Foam::chemistrySolver<CompType, ThermoType>::New
35 ODEChemistryModel<CompType, ThermoType>& model,
36 const word& compTypeName,
37 const word& thermoTypeName
40 word modelName(model.lookup("chemistrySolver"));
42 word chemistrySolverType =
43 modelName + '<' + compTypeName + ',' + thermoTypeName + '>';
45 Info<< "Selecting chemistrySolver " << modelName << endl;
47 typename dictionaryConstructorTable::iterator cstrIter =
48 dictionaryConstructorTablePtr_->find(chemistrySolverType);
50 if (cstrIter == dictionaryConstructorTablePtr_->end())
52 wordList models = dictionaryConstructorTablePtr_->toc();
55 models[i] = models[i].replace
57 '<' + compTypeName + ',' + thermoTypeName + '>',
64 "chemistrySolver::New"
66 "const ODEChemistryModel&, "
70 ) << "Unknown chemistrySolver type " << modelName
71 << nl << nl << "Valid chemistrySolver types are:" << nl
72 << models << nl << exit(FatalError);
75 return autoPtr<chemistrySolver<CompType, ThermoType> >
76 (cstrIter()(model, modelName));
80 // ************************************************************************* //