ENH: autoLayerDriver: better layering information message
[OpenFOAM-2.0.x.git] / applications / test / router / Gather / GatherBase.C
blob50d2143ab75452a8bd396897a77921ba6c1eb31b
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 "GatherBase.H"
28 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
30 namespace Foam
33 // * * * * * * * * * * * * * * * Member Functions  * * * * * * * * * * * * * //
35 template <class Type>
36 Type GatherBase::flatten(const List<Type> lst)
38     label sum = 0;
40     forAll(lst, lstI)
41     {
42         sum += lst[lstI].size();
43     }
45     Type result(sum);
47     label index = 0;
49     forAll(lst, lstI)
50     {
51         const Type& sub = lst[lstI];
53         forAll(sub, subI)
54         {
55             result[index++] = sub[subI];
56         }
57     }
59     return result;
63 template <class DataType, class IndexType, class AddOp>
64 IndexType GatherBase::offset
66     const List<DataType>& values,
67     const List<IndexType>& indices,
68     AddOp aop
71     if (values.size() != indices.size())
72     {
73         FatalErrorIn
74         (
75             "GatherBase::offset(const List<DataType>&, "
76             "const List<IndexType>&, AddOp)"
77         )   << "Input data and indices lists not equal size." << endl
78             << "data size:" << values.size()
79             << "  indices:" << indices.size()
80             << abort(FatalError);
81     }
82     
84     label sum = 0;
86     forAll(indices, lstI)
87     {
88         sum += indices[lstI].size();
89     }
91     IndexType result(sum);
93     label index = 0;
95     label offset = 0;
97     forAll(indices, lstI)
98     {
99         const IndexType& sub = indices[lstI];
101         forAll(sub, subI)
102         {
103             result[index++] = aop(sub[subI], offset);
104         }
105         offset += values[lstI].size();
106     }
108     return result;
112 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
114 } // End namespace Foam
116 // ************************************************************************* //