1 /*---------------------------------------------------------------------------*\
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 -------------------------------------------------------------------------------
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/>.
25 Symmetric Gauss-Seidel smoother for coupled lduMatrices.
28 Hrvoje Jasak, Wikki Ltd. All rights reserved.
30 \*---------------------------------------------------------------------------*/
32 #include "coupledGaussSeidelSmoother.H"
33 #include "addToRunTimeSelectionTable.H"
35 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
39 defineTypeNameAndDebug(coupledGaussSeidelSmoother, 0);
41 addToRunTimeSelectionTable
44 coupledGaussSeidelSmoother,
49 // * * * * * * * * * * * * * * * * Constructors * * * * * * * * * * * * * * //
51 //- Construct from matrix
52 Foam::coupledGaussSeidelSmoother::coupledGaussSeidelSmoother
54 const coupledLduMatrix& matrix,
55 const PtrList<FieldField<Field, scalar> >& bouCoeffs,
56 const PtrList<FieldField<Field, scalar> >& intCoeffs,
57 const lduInterfaceFieldPtrsListList& interfaces
77 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
79 void Foam::coupledGaussSeidelSmoother::smooth
81 FieldField<Field, scalar>& x,
82 const FieldField<Field, scalar>& b,
87 for (label sweep = 0; sweep < nSweeps; sweep++)
89 gs_.precondition(x, b, cmpt);
94 // ************************************************************************* //