initial commit for version 1.6.x patch release
[OpenFOAM-1.6.x.git] / src / thermophysicalModels / chemistryModel / chemistrySolver / chemistrySolver / newChemistrySolver.C
blobb0baa00fbe9068c1c61e487296a66fe88871c45c
1 /*---------------------------------------------------------------------------*\
2   =========                 |
3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
4    \\    /   O peration     |
5     \\  /    A nd           | Copyright (C) 1991-2009 OpenCFD Ltd.
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 "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())
51     {
52         wordList models = dictionaryConstructorTablePtr_->toc();
53         forAll(models, i)
54         {
55             models[i] = models[i].replace
56             (
57                 '<' + compTypeName + ',' + thermoTypeName + '>',
58                 ""
59             );
60         }
62         FatalErrorIn
63         (
64             "chemistrySolver::New"
65             "("
66                 "const ODEChemistryModel&, "
67                 "const word&, "
68                 "const word&"
69             ")"
70         )   << "Unknown chemistrySolver type " << modelName
71             << nl << nl << "Valid chemistrySolver types are:" << nl
72             << models << nl << exit(FatalError);
73     }
75     return autoPtr<chemistrySolver<CompType, ThermoType> >
76         (cstrIter()(model, modelName));
80 // ************************************************************************* //