CoDiPack  2.2.0
A Code Differentiation Package
SciComp TU Kaiserslautern
Loading...
Searching...
No Matches
duplicateJacobianRemover.hpp
1/*
2 * CoDiPack, a Code Differentiation Package
3 *
4 * Copyright (C) 2015-2024 Chair for Scientific Computing (SciComp), University of Kaiserslautern-Landau
5 * Homepage: http://www.scicomp.uni-kl.de
6 * Contact: Prof. Nicolas R. Gauger (codi@scicomp.uni-kl.de)
7 *
8 * Lead developers: Max Sagebaum, Johannes Blühdorn (SciComp, University of Kaiserslautern-Landau)
9 *
10 * This file is part of CoDiPack (http://www.scicomp.uni-kl.de/software/codi).
11 *
12 * CoDiPack is free software: you can redistribute it and/or
13 * modify it under the terms of the GNU General Public License
14 * as published by the Free Software Foundation, either version 3 of the
15 * License, or (at your option) any later version.
16 *
17 * CoDiPack is distributed in the hope that it will be useful,
18 * but WITHOUT ANY WARRANTY; without even the implied warranty
19 * of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
20 *
21 * See the GNU General Public License for more details.
22 * You should have received a copy of the GNU
23 * General Public License along with CoDiPack.
24 * If not, see <http://www.gnu.org/licenses/>.
25 *
26 * For other licensing options please contact us.
27 *
28 * Authors:
29 * - SciComp, University of Kaiserslautern-Landau:
30 * - Max Sagebaum
31 * - Johannes Blühdorn
32 * - Former members:
33 * - Tim Albring
34 */
35#pragma once
36
37#include <array>
38
39#include "../../config.h"
40#include "../../misc/macros.hpp"
41
43namespace codi {
44
57 template<typename T_Real, typename T_Identifier>
59 public:
60
61 using Real = CODI_DD(T_Real, double);
62 using Identifier = CODI_DD(T_Identifier, int);
64
65 private:
66 std::array<Identifier, Config::MaxArgumentSize> indices;
67 std::array<Real, Config::MaxArgumentSize> jacobians;
68 ArgumentSize size;
69
70 public:
71
74
76 CODI_INLINE void pushData(Real const& jacobian, Identifier const& index) {
77 bool found = false;
78 ArgumentSize pos;
79 for (pos = 0; pos < size; pos += 1) {
80 if (indices[pos] == index) {
81 found = true;
82 break;
83 }
84 }
85
86 if (!found) {
87 size += 1;
88 indices[pos] = index;
89 jacobians[pos] = jacobian;
90 } else {
91 jacobians[pos] += jacobian;
92 }
93 }
94
97 template<typename Vec>
98 CODI_INLINE void storeData(Vec& vec) {
99 for (ArgumentSize pos = 0; pos < size; pos += 1) {
100 vec.pushData(jacobians[pos], indices[pos]);
101 }
102
103 // Reset the data for the next statement.
104 size = 0;
105 }
106 };
107}
#define CODI_INLINE
See codi::Config::ForcedInlines.
Definition: config.h:457
#define CODI_DD(Type, Default)
Abbreviation for CODI_DECLARE_DEFAULT.
Definition: macros.hpp:94
uint8_t ArgumentSize
Type for the number of arguments in statements.
Definition: config.h:117
CoDiPack - Code Differentiation Package.
Definition: codi.hpp:90
Combines entries of Jacobians with the same identifier.
Definition: duplicateJacobianRemover.hpp:58
T_Real Real
See DuplicateJacobianRemover.
Definition: duplicateJacobianRemover.hpp:61
T_Identifier Identifier
See DuplicateJacobianRemover.
Definition: duplicateJacobianRemover.hpp:62
void storeData(Vec &vec)
Definition: duplicateJacobianRemover.hpp:98
DuplicateJacobianRemover()=default
Constructor.
Config::ArgumentSize ArgumentSize
Definition of ArgumentSize type.
Definition: duplicateJacobianRemover.hpp:63
void pushData(Real const &jacobian, Identifier const &index)
For all added items, check if one matches the identifier. If yes combine, if no append.
Definition: duplicateJacobianRemover.hpp:76