All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
SymmetricSquareMatrix.C
Go to the documentation of this file.
1 /*---------------------------------------------------------------------------*\
2  ========= |
3  \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
4  \\ / O peration | Website: https://openfoam.org
5  \\ / A nd | Copyright (C) 2011-2018 OpenFOAM Foundation
6  \\/ M anipulation |
7 -------------------------------------------------------------------------------
8 License
9  This file is part of OpenFOAM.
10 
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.
15 
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.
20 
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/>.
23 
24 \*---------------------------------------------------------------------------*/
25 
26 #include "SymmetricSquareMatrix.H"
27 
28 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
29 
30 template<class Type>
32 (
33  const SymmetricSquareMatrix<Type>& matrix
34 )
35 {
36  const label n = matrix.n();
37 
38  SymmetricSquareMatrix<Type> inv(n, Zero);
39 
40  for (label i=0; i<n; i++)
41  {
42  inv(i, i) = 1.0/matrix(i, i);
43 
44  for (label j=0; j<i; j++)
45  {
46  Type sum = Zero;
47 
48  for (label k=j; k<i; k++)
49  {
50  sum -= matrix(i, k)*inv(k, j);
51  }
52 
53  inv(i, j) = sum/matrix(i, i);
54  }
55  }
56 
57  SymmetricSquareMatrix<Type> result(n, Zero);
58 
59  for (label k=0; k<n; k++)
60  {
61  for (label i=0; i <= k; i++)
62  {
63  for (label j=0; j <= k; j++)
64  {
65  result(i, j) += inv(k, i)*inv(k, j);
66  }
67  }
68  }
69 
70  return result;
71 }
72 
73 
74 template<class Type>
76 (
77  const SymmetricSquareMatrix<Type>& matrix
78 )
79 {
80  SymmetricSquareMatrix<Type> matrixTmp(matrix);
81  LUDecompose(matrixTmp);
82 
83  return invDecomposed(matrixTmp);
84 }
85 
86 
87 template<class Type>
89 {
90  Type diagProduct = pTraits<Type>::one;
91 
92  for (label i=0; i<matrix.m(); i++)
93  {
94  diagProduct *= matrix(i, i);
95  }
96 
97  return sqr(diagProduct);
98 }
99 
100 
101 template<class Type>
103 {
104  SymmetricSquareMatrix<Type> matrixTmp(matrix);
105  LUDecompose(matrixTmp);
106 
107  return detDecomposed(matrixTmp);
108 }
109 
110 
111 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
scalar detDecomposed(const SquareMatrix< Type > &, const label sign)
Return the LU decomposed SquareMatrix det.
intWM_LABEL_SIZE_t label
A label is an int32_t or int64_t as specified by the pre-processor macro WM_LABEL_SIZE.
Definition: label.H:59
void LUDecompose(scalarSquareMatrix &matrix, labelList &pivotIndices)
LU decompose the matrix with pivoting.
dimensionedSymmTensor sqr(const dimensionedVector &dv)
dimensionedSphericalTensor inv(const dimensionedSphericalTensor &dt)
Traits class for primitives.
Definition: pTraits.H:50
label k
Boltzmann constant.
dimensionedScalar det(const dimensionedSphericalTensor &dt)
SymmetricSquareMatrix< Type > invDecomposed(const SymmetricSquareMatrix< Type > &)
Return the LU decomposed SymmetricSquareMatrix inverse.
dimensioned< Type > sum(const DimensionedField< Type, GeoMesh > &df)
static const zero Zero
Definition: zero.H:97
A templated 2D square symmetric matrix of objects of <T>, where the n x n matrix dimension is known a...
label m() const
Return the number of rows.
Definition: MatrixI.H:57
label n