Forward compatibility: flex
[foam-extend-3.2.git] / src / coupledMatrix / coupledLduSmoother / iluSmoother / coupledIluSmoother.C
blobf357f76af8348faaef97d51863aab5ed79fea2d1
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 Description
25     Symmetric Gauss-Seidel smoother for coupled lduMatrices.
27 Author
28     Hrvoje Jasak, Wikki Ltd.  All rights reserved.
30 \*---------------------------------------------------------------------------*/
32 #include "coupledIluSmoother.H"
33 #include "addToRunTimeSelectionTable.H"
35 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
37 namespace Foam
39     defineTypeNameAndDebug(coupledIluSmoother, 0);
41     addToRunTimeSelectionTable
42     (
43         coupledLduSmoother,
44         coupledIluSmoother,
45         word
46     );
49 // * * * * * * * * * * * * * * * * Constructors  * * * * * * * * * * * * * * //
51 //- Construct from matrix
52 Foam::coupledIluSmoother::coupledIluSmoother
54     const coupledLduMatrix& matrix,
55     const PtrList<FieldField<Field, scalar> >& bouCoeffs,
56     const PtrList<FieldField<Field, scalar> >& intCoeffs,
57     const lduInterfaceFieldPtrsListList& interfaces
60     coupledLduSmoother
61     (
62         matrix,
63         bouCoeffs,
64         intCoeffs,
65         interfaces
66     ),
67     precon_
68     (
69         matrix,
70         bouCoeffs,
71         intCoeffs,
72         interfaces
73     ),
74     xCorr_(matrix.size()),
75     residual_(matrix.size())
77     forAll (xCorr_, rowI)
78     {
79         xCorr_.set(rowI, new scalarField(matrix[rowI].lduAddr().size(), 0));
80         residual_.set(rowI, new scalarField(matrix[rowI].lduAddr().size(), 0));
81     }
85 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
87 void Foam::coupledIluSmoother::smooth
89     FieldField<Field, scalar>& x,
90     const FieldField<Field, scalar>& b,
91     const direction cmpt,
92     const label nSweeps
93 ) const
95     for (label sweep = 0; sweep < nSweeps; sweep++)
96     {
97         // Calculate residual
98         matrix_.Amul
99         (
100             residual_,
101             x,
102             bouCoeffs_,
103             interfaces_,
104             cmpt
105         );
107         // residual = b - Ax
108         forAll (b, i)
109         {
110             residual_[i] = b[i] - residual_[i];
111         }
113         precon_.precondition(xCorr_, residual_, cmpt);
115         // Add correction to x
116         x += xCorr_;
117     }
121 // ************************************************************************* //