Forward compatibility: flex
[foam-extend-3.2.git] / src / solidModels / constitutiveModel / cohesiveLaws / cohesiveLaw / newCohesiveLaw.C
blob24957aa63e0fea2919577e45f4ef732bd45f87b0
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 "cohesiveLaw.H"
27 #include "volFields.H"
28 #include "surfaceFields.H"
30 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
32 namespace Foam
35 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
37 autoPtr<cohesiveLaw> cohesiveLaw::New
39     const word& name,
40     const volSymmTensorField& sigma,
41     const dictionary& dict
44     word cohTypeName = dict.lookup("type");
46     Info<< "Selecting cohesive model " << cohTypeName << endl;
48     dictionaryConstructorTable::iterator cstrIter =
49         dictionaryConstructorTablePtr_->find(cohTypeName);
51     if (cstrIter == dictionaryConstructorTablePtr_->end())
52     {
53         FatalIOErrorIn
54         (
55             "cohesiveLaw::New(\n"
56             "    const word& name,\n"
57             "    const volSymmTensorField& sigma,\n"
58             "    const dictionary& dict\n"
59             ")",
60             dict
61         )   << "Unknown cohesiveLaw type "
62             << cohTypeName << endl << endl
63             << "Valid  cohesiveLaws are : " << endl
64             << dictionaryConstructorTablePtr_->sortedToc()
65             << exit(FatalIOError);
66     }
68     return autoPtr<cohesiveLaw>(cstrIter()(name, sigma, dict));
72 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
74 } // End namespace Foam
76 // ************************************************************************* //