Merge branch 'master' of ssh://git.code.sf.net/p/foam-extend/foam-extend-3.2
[foam-extend-3.2.git] / src / foam / matrices / LUscalarMatrix / procLduMatrix.C
blobaddaa2ff957d18948c3ae4ab30b2a27d3affd378
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 "procLduMatrix.H"
27 #include "procLduInterface.H"
28 #include "lduMatrix.H"
30 // * * * * * * * * * * * * * * * * Constructors  * * * * * * * * * * * * * * //
32 Foam::procLduMatrix::procLduMatrix
34     const lduMatrix& ldum,
35     const FieldField<Field, scalar>& interfaceCoeffs,
36     const lduInterfaceFieldPtrsList& interfaces
39     upperAddr_(ldum.lduAddr().upperAddr()),
40     lowerAddr_(ldum.lduAddr().lowerAddr()),
41     diag_(ldum.diag()),
42     upper_(ldum.upper()),
43     lower_(ldum.lower())
45     label nInterfaces = 0;
47     forAll(interfaces, i)
48     {
49         if (interfaces.set(i))
50         {
51             nInterfaces++;
52         }
53     }
55     interfaces_.setSize(nInterfaces);
57     nInterfaces = 0;
59     forAll(interfaces, i)
60     {
61         if (interfaces.set(i))
62         {
63             interfaces_.set
64             (
65                 nInterfaces++,
66                 new procLduInterface
67                 (
68                     interfaces[i],
69                     interfaceCoeffs[i]
70                 )
71             );
72         }
73     }
78 Foam::procLduMatrix::procLduMatrix(Istream& is)
80     upperAddr_(is),
81     lowerAddr_(is),
82     diag_(is),
83     upper_(is),
84     lower_(is),
85     interfaces_(is)
89 // * * * * * * * * * * * * * * * IOstream Operators  * * * * * * * * * * * * //
91 Foam::Ostream& Foam::operator<<(Ostream& os, const procLduMatrix& cldum)
93     os  << cldum.upperAddr_
94         << cldum.lowerAddr_
95         << cldum.diag_
96         << cldum.upper_
97         << cldum.lower_
98         << cldum.interfaces_;
100     return os;
104 // ************************************************************************* //