Report patch name instead of index in debug
[foam-extend-3.2.git] / src / foam / matrices / DiagonalMatrix / DiagonalMatrix.C
blob188fe6acf731fc5bd45efcdacebaf0f13ca1de93
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 "DiagonalMatrix.H"
28 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
30 template<class Type>
31 template<class Form>
32 Foam::DiagonalMatrix<Type>::DiagonalMatrix(const Matrix<Form, Type>& a)
34     List<Type>(min(a.n(), a.m()))
36     forAll(*this, i)
37     {
38         this->operator[](i) = a[i][i];
39     }
43 template<class Type>
44 Foam::DiagonalMatrix<Type>::DiagonalMatrix(const label size)
46     List<Type>(size)
50 template<class Type>
51 Foam::DiagonalMatrix<Type>::DiagonalMatrix(const label size, const Type& val)
53     List<Type>(size, val)
57 template<class Type>
58 Foam::DiagonalMatrix<Type>& Foam::DiagonalMatrix<Type>::invert()
60     forAll(*this, i)
61     {
62         Type x = this->operator[](i);
63         if (mag(x) < VSMALL)
64         {
65             this->operator[](i) = Type(0);
66         }
67         else
68         {
69             this->operator[](i) = Type(1)/x;
70         }
71     }
73     return this;
77 template<class Type>
78 Foam::DiagonalMatrix<Type> Foam::inv(const DiagonalMatrix<Type>& A)
80     DiagonalMatrix<Type> Ainv = A;
82     forAll(A, i)
83     {
84         Type x = A[i];
85         if (mag(x) < VSMALL)
86         {
87             Ainv[i] = Type(0);
88         }
89         else
90         {
91             Ainv[i] = Type(1)/x;
92         }
93     }
95     return Ainv;
99 // ************************************************************************* //