ESPResSo
Extensible Simulation Package for Research on Soft Matter Systems
Loading...
Searching...
No Matches
ReactionKernelBulk_4_double_precision.cpp
Go to the documentation of this file.
1//======================================================================================================================
2//
3// This file is part of waLBerla. waLBerla is free software: you can
4// redistribute it and/or modify it under the terms of the GNU General Public
5// License as published by the Free Software Foundation, either version 3 of
6// the License, or (at your option) any later version.
7//
8// waLBerla is distributed in the hope that it will be useful, but WITHOUT
9// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
10// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
11// for more details.
12//
13// You should have received a copy of the GNU General Public License along
14// with waLBerla (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
15//
16//! \\file ReactionKernelBulk_4_double_precision.cpp
17//! \\author pystencils
18//======================================================================================================================
19
20// kernel generated with pystencils v1.4+1.ge851f4e, lbmpy v1.4+1.ge9efe34, sympy v1.12.1, lbmpy_walberla/pystencils_walberla from waLBerla commit 3247aa7395049ca5bfb69d34d55e45db19fa439c
21
22#include <cmath>
23
24#include "ReactionKernelBulk_4_double_precision.h"
25#include "core/DataTypes.h"
26#include "core/Macros.h"
27
28#define FUNC_PREFIX
29
30#if (defined WALBERLA_CXX_COMPILER_IS_GNU) || (defined WALBERLA_CXX_COMPILER_IS_CLANG)
31#pragma GCC diagnostic push
32#pragma GCC diagnostic ignored "-Wfloat-equal"
33#pragma GCC diagnostic ignored "-Wshadow"
34#pragma GCC diagnostic ignored "-Wconversion"
35#pragma GCC diagnostic ignored "-Wunused-variable"
36#endif
37
38#if (defined WALBERLA_CXX_COMPILER_IS_INTEL)
39#pragma warning push
40#pragma warning(disable : 1599)
41#endif
42
43using namespace std;
44
45namespace walberla {
46namespace pystencils {
47
48namespace internal_49f1aaa6789b7fa16fb103a21ce6fe12 {
49static FUNC_PREFIX void reactionkernelbulk_4_double_precision_reactionkernelbulk_4_double_precision(double *RESTRICT _data_rho_0, double *RESTRICT _data_rho_1, double *RESTRICT _data_rho_2, double *RESTRICT _data_rho_3, int64_t const _size_rho_0_0, int64_t const _size_rho_0_1, int64_t const _size_rho_0_2, int64_t const _stride_rho_0_0, int64_t const _stride_rho_0_1, int64_t const _stride_rho_0_2, int64_t const _stride_rho_1_0, int64_t const _stride_rho_1_1, int64_t const _stride_rho_1_2, int64_t const _stride_rho_2_0, int64_t const _stride_rho_2_1, int64_t const _stride_rho_2_2, int64_t const _stride_rho_3_0, int64_t const _stride_rho_3_1, int64_t const _stride_rho_3_2, double order_0, double order_1, double order_2, double order_3, double rate_coefficient, double stoech_0, double stoech_1, double stoech_2, double stoech_3) {
50#pragma omp parallel
51 {
52#pragma omp for schedule(static)
53 for (int64_t ctr_2 = 0; ctr_2 < _size_rho_0_2; ctr_2 += 1) {
54 for (int64_t ctr_1 = 0; ctr_1 < _size_rho_0_1; ctr_1 += 1) {
55 for (int64_t ctr_0 = 0; ctr_0 < _size_rho_0_0; ctr_0 += 1) {
56 const double local_rho_0 = _data_rho_0[_stride_rho_0_0 * ctr_0 + _stride_rho_0_1 * ctr_1 + _stride_rho_0_2 * ctr_2];
57 const double local_rho_1 = _data_rho_1[_stride_rho_1_0 * ctr_0 + _stride_rho_1_1 * ctr_1 + _stride_rho_1_2 * ctr_2];
58 const double local_rho_2 = _data_rho_2[_stride_rho_2_0 * ctr_0 + _stride_rho_2_1 * ctr_1 + _stride_rho_2_2 * ctr_2];
59 const double local_rho_3 = _data_rho_3[_stride_rho_3_0 * ctr_0 + _stride_rho_3_1 * ctr_1 + _stride_rho_3_2 * ctr_2];
60 const double rate_factor = pow(local_rho_0, order_0) * pow(local_rho_1, order_1) * pow(local_rho_2, order_2) * pow(local_rho_3, order_3) * rate_coefficient;
61 _data_rho_0[_stride_rho_0_0 * ctr_0 + _stride_rho_0_1 * ctr_1 + _stride_rho_0_2 * ctr_2] = local_rho_0 + rate_factor * stoech_0;
62 _data_rho_1[_stride_rho_1_0 * ctr_0 + _stride_rho_1_1 * ctr_1 + _stride_rho_1_2 * ctr_2] = local_rho_1 + rate_factor * stoech_1;
63 _data_rho_2[_stride_rho_2_0 * ctr_0 + _stride_rho_2_1 * ctr_1 + _stride_rho_2_2 * ctr_2] = local_rho_2 + rate_factor * stoech_2;
64 _data_rho_3[_stride_rho_3_0 * ctr_0 + _stride_rho_3_1 * ctr_1 + _stride_rho_3_2 * ctr_2] = local_rho_3 + rate_factor * stoech_3;
65 }
66 }
67 }
68 }
69}
70} // namespace internal_49f1aaa6789b7fa16fb103a21ce6fe12
71
72void ReactionKernelBulk_4_double_precision::run(IBlock *block) {
73
74 auto rho_0 = block->getData<field::GhostLayerField<double, 1>>(rho_0ID);
75 auto rho_1 = block->getData<field::GhostLayerField<double, 1>>(rho_1ID);
76 auto rho_3 = block->getData<field::GhostLayerField<double, 1>>(rho_3ID);
77 auto rho_2 = block->getData<field::GhostLayerField<double, 1>>(rho_2ID);
78
79 auto &stoech_2 = this->stoech_2_;
80 auto &rate_coefficient = this->rate_coefficient_;
81 auto &stoech_1 = this->stoech_1_;
82 auto &stoech_3 = this->stoech_3_;
83 auto &order_0 = this->order_0_;
84 auto &stoech_0 = this->stoech_0_;
85 auto &order_2 = this->order_2_;
86 auto &order_1 = this->order_1_;
87 auto &order_3 = this->order_3_;
88 WALBERLA_ASSERT_GREATER_EQUAL(0, -int_c(rho_0->nrOfGhostLayers()))
89 double *RESTRICT _data_rho_0 = rho_0->dataAt(0, 0, 0, 0);
90 WALBERLA_ASSERT_GREATER_EQUAL(0, -int_c(rho_1->nrOfGhostLayers()))
91 double *RESTRICT _data_rho_1 = rho_1->dataAt(0, 0, 0, 0);
92 WALBERLA_ASSERT_GREATER_EQUAL(0, -int_c(rho_2->nrOfGhostLayers()))
93 double *RESTRICT _data_rho_2 = rho_2->dataAt(0, 0, 0, 0);
94 WALBERLA_ASSERT_GREATER_EQUAL(0, -int_c(rho_3->nrOfGhostLayers()))
95 double *RESTRICT _data_rho_3 = rho_3->dataAt(0, 0, 0, 0);
96 WALBERLA_ASSERT_GREATER_EQUAL(rho_0->xSizeWithGhostLayer(), int64_t(int64_c(rho_0->xSize()) + 0))
97 const int64_t _size_rho_0_0 = int64_t(int64_c(rho_0->xSize()) + 0);
98 WALBERLA_ASSERT_GREATER_EQUAL(rho_0->ySizeWithGhostLayer(), int64_t(int64_c(rho_0->ySize()) + 0))
99 const int64_t _size_rho_0_1 = int64_t(int64_c(rho_0->ySize()) + 0);
100 WALBERLA_ASSERT_GREATER_EQUAL(rho_0->zSizeWithGhostLayer(), int64_t(int64_c(rho_0->zSize()) + 0))
101 const int64_t _size_rho_0_2 = int64_t(int64_c(rho_0->zSize()) + 0);
102 const int64_t _stride_rho_0_0 = int64_t(rho_0->xStride());
103 const int64_t _stride_rho_0_1 = int64_t(rho_0->yStride());
104 const int64_t _stride_rho_0_2 = int64_t(rho_0->zStride());
105 const int64_t _stride_rho_1_0 = int64_t(rho_1->xStride());
106 const int64_t _stride_rho_1_1 = int64_t(rho_1->yStride());
107 const int64_t _stride_rho_1_2 = int64_t(rho_1->zStride());
108 const int64_t _stride_rho_2_0 = int64_t(rho_2->xStride());
109 const int64_t _stride_rho_2_1 = int64_t(rho_2->yStride());
110 const int64_t _stride_rho_2_2 = int64_t(rho_2->zStride());
111 const int64_t _stride_rho_3_0 = int64_t(rho_3->xStride());
112 const int64_t _stride_rho_3_1 = int64_t(rho_3->yStride());
113 const int64_t _stride_rho_3_2 = int64_t(rho_3->zStride());
114 internal_49f1aaa6789b7fa16fb103a21ce6fe12::reactionkernelbulk_4_double_precision_reactionkernelbulk_4_double_precision(_data_rho_0, _data_rho_1, _data_rho_2, _data_rho_3, _size_rho_0_0, _size_rho_0_1, _size_rho_0_2, _stride_rho_0_0, _stride_rho_0_1, _stride_rho_0_2, _stride_rho_1_0, _stride_rho_1_1, _stride_rho_1_2, _stride_rho_2_0, _stride_rho_2_1, _stride_rho_2_2, _stride_rho_3_0, _stride_rho_3_1, _stride_rho_3_2, order_0, order_1, order_2, order_3, rate_coefficient, stoech_0, stoech_1, stoech_2, stoech_3);
115}
116
117void ReactionKernelBulk_4_double_precision::runOnCellInterval(const shared_ptr<StructuredBlockStorage> &blocks, const CellInterval &globalCellInterval, cell_idx_t ghostLayers, IBlock *block) {
118
119 CellInterval ci = globalCellInterval;
120 CellInterval blockBB = blocks->getBlockCellBB(*block);
121 blockBB.expand(ghostLayers);
122 ci.intersect(blockBB);
123 blocks->transformGlobalToBlockLocalCellInterval(ci, *block);
124 if (ci.empty())
125 return;
126
127 auto rho_0 = block->getData<field::GhostLayerField<double, 1>>(rho_0ID);
128 auto rho_1 = block->getData<field::GhostLayerField<double, 1>>(rho_1ID);
129 auto rho_3 = block->getData<field::GhostLayerField<double, 1>>(rho_3ID);
130 auto rho_2 = block->getData<field::GhostLayerField<double, 1>>(rho_2ID);
131
132 auto &stoech_2 = this->stoech_2_;
133 auto &rate_coefficient = this->rate_coefficient_;
134 auto &stoech_1 = this->stoech_1_;
135 auto &stoech_3 = this->stoech_3_;
136 auto &order_0 = this->order_0_;
137 auto &stoech_0 = this->stoech_0_;
138 auto &order_2 = this->order_2_;
139 auto &order_1 = this->order_1_;
140 auto &order_3 = this->order_3_;
141 WALBERLA_ASSERT_GREATER_EQUAL(ci.xMin(), -int_c(rho_0->nrOfGhostLayers()))
142 WALBERLA_ASSERT_GREATER_EQUAL(ci.yMin(), -int_c(rho_0->nrOfGhostLayers()))
143 WALBERLA_ASSERT_GREATER_EQUAL(ci.zMin(), -int_c(rho_0->nrOfGhostLayers()))
144 double *RESTRICT _data_rho_0 = rho_0->dataAt(ci.xMin(), ci.yMin(), ci.zMin(), 0);
145 WALBERLA_ASSERT_GREATER_EQUAL(ci.xMin(), -int_c(rho_1->nrOfGhostLayers()))
146 WALBERLA_ASSERT_GREATER_EQUAL(ci.yMin(), -int_c(rho_1->nrOfGhostLayers()))
147 WALBERLA_ASSERT_GREATER_EQUAL(ci.zMin(), -int_c(rho_1->nrOfGhostLayers()))
148 double *RESTRICT _data_rho_1 = rho_1->dataAt(ci.xMin(), ci.yMin(), ci.zMin(), 0);
149 WALBERLA_ASSERT_GREATER_EQUAL(ci.xMin(), -int_c(rho_2->nrOfGhostLayers()))
150 WALBERLA_ASSERT_GREATER_EQUAL(ci.yMin(), -int_c(rho_2->nrOfGhostLayers()))
151 WALBERLA_ASSERT_GREATER_EQUAL(ci.zMin(), -int_c(rho_2->nrOfGhostLayers()))
152 double *RESTRICT _data_rho_2 = rho_2->dataAt(ci.xMin(), ci.yMin(), ci.zMin(), 0);
153 WALBERLA_ASSERT_GREATER_EQUAL(ci.xMin(), -int_c(rho_3->nrOfGhostLayers()))
154 WALBERLA_ASSERT_GREATER_EQUAL(ci.yMin(), -int_c(rho_3->nrOfGhostLayers()))
155 WALBERLA_ASSERT_GREATER_EQUAL(ci.zMin(), -int_c(rho_3->nrOfGhostLayers()))
156 double *RESTRICT _data_rho_3 = rho_3->dataAt(ci.xMin(), ci.yMin(), ci.zMin(), 0);
157 WALBERLA_ASSERT_GREATER_EQUAL(rho_0->xSizeWithGhostLayer(), int64_t(int64_c(ci.xSize()) + 0))
158 const int64_t _size_rho_0_0 = int64_t(int64_c(ci.xSize()) + 0);
159 WALBERLA_ASSERT_GREATER_EQUAL(rho_0->ySizeWithGhostLayer(), int64_t(int64_c(ci.ySize()) + 0))
160 const int64_t _size_rho_0_1 = int64_t(int64_c(ci.ySize()) + 0);
161 WALBERLA_ASSERT_GREATER_EQUAL(rho_0->zSizeWithGhostLayer(), int64_t(int64_c(ci.zSize()) + 0))
162 const int64_t _size_rho_0_2 = int64_t(int64_c(ci.zSize()) + 0);
163 const int64_t _stride_rho_0_0 = int64_t(rho_0->xStride());
164 const int64_t _stride_rho_0_1 = int64_t(rho_0->yStride());
165 const int64_t _stride_rho_0_2 = int64_t(rho_0->zStride());
166 const int64_t _stride_rho_1_0 = int64_t(rho_1->xStride());
167 const int64_t _stride_rho_1_1 = int64_t(rho_1->yStride());
168 const int64_t _stride_rho_1_2 = int64_t(rho_1->zStride());
169 const int64_t _stride_rho_2_0 = int64_t(rho_2->xStride());
170 const int64_t _stride_rho_2_1 = int64_t(rho_2->yStride());
171 const int64_t _stride_rho_2_2 = int64_t(rho_2->zStride());
172 const int64_t _stride_rho_3_0 = int64_t(rho_3->xStride());
173 const int64_t _stride_rho_3_1 = int64_t(rho_3->yStride());
174 const int64_t _stride_rho_3_2 = int64_t(rho_3->zStride());
175 internal_49f1aaa6789b7fa16fb103a21ce6fe12::reactionkernelbulk_4_double_precision_reactionkernelbulk_4_double_precision(_data_rho_0, _data_rho_1, _data_rho_2, _data_rho_3, _size_rho_0_0, _size_rho_0_1, _size_rho_0_2, _stride_rho_0_0, _stride_rho_0_1, _stride_rho_0_2, _stride_rho_1_0, _stride_rho_1_1, _stride_rho_1_2, _stride_rho_2_0, _stride_rho_2_1, _stride_rho_2_2, _stride_rho_3_0, _stride_rho_3_1, _stride_rho_3_2, order_0, order_1, order_2, order_3, rate_coefficient, stoech_0, stoech_1, stoech_2, stoech_3);
176}
177
178} // namespace pystencils
179} // namespace walberla
180
181#if (defined WALBERLA_CXX_COMPILER_IS_GNU) || (defined WALBERLA_CXX_COMPILER_IS_CLANG)
182#pragma GCC diagnostic pop
183#endif
184
185#if (defined WALBERLA_CXX_COMPILER_IS_INTEL)
186#pragma warning pop
187#endif
FUNC_PREFIX
#define FUNC_PREFIX
\file AdvectiveFluxKernel_double_precision.cpp \author pystencils
Definition AdvectiveFluxKernel_double_precision.cpp:28
RESTRICT
#define RESTRICT
\file AdvectiveFluxKernel_double_precision.h \author pystencils
Definition AdvectiveFluxKernel_double_precision.h:40
ReactionKernelBulk_4_double_precision.h
walberla::pystencils::ReactionKernelBulk_4_double_precision::run
void run(IBlock *block)
Definition ReactionKernelBulk_4_double_precision.cpp:72
walberla::pystencils::ReactionKernelBulk_4_double_precision::runOnCellInterval
void runOnCellInterval(const shared_ptr< StructuredBlockStorage > &blocks, const CellInterval &globalCellInterval, cell_idx_t ghostLayers, IBlock *block)
Definition ReactionKernelBulk_4_double_precision.cpp:117
stream
cudaStream_t stream[1]
CUDA streams for parallel computing on CPU and GPU.
Definition common_cuda.cu:34
block
static double * block(double *p, std::size_t index, std::size_t size)
Definition elc.cpp:175
std
STL namespace.
walberla::pystencils::internal_49f1aaa6789b7fa16fb103a21ce6fe12::reactionkernelbulk_4_double_precision_reactionkernelbulk_4_double_precision
static FUNC_PREFIX void reactionkernelbulk_4_double_precision_reactionkernelbulk_4_double_precision(double *RESTRICT _data_rho_0, double *RESTRICT _data_rho_1, double *RESTRICT _data_rho_2, double *RESTRICT _data_rho_3, int64_t const _size_rho_0_0, int64_t const _size_rho_0_1, int64_t const _size_rho_0_2, int64_t const _stride_rho_0_0, int64_t const _stride_rho_0_1, int64_t const _stride_rho_0_2, int64_t const _stride_rho_1_0, int64_t const _stride_rho_1_1, int64_t const _stride_rho_1_2, int64_t const _stride_rho_2_0, int64_t const _stride_rho_2_1, int64_t const _stride_rho_2_2, int64_t const _stride_rho_3_0, int64_t const _stride_rho_3_1, int64_t const _stride_rho_3_2, double order_0, double order_1, double order_2, double order_3, double rate_coefficient, double stoech_0, double stoech_1, double stoech_2, double stoech_3)
Definition ReactionKernelBulk_4_double_precision.cpp:49
walberla
\file PackInfoPdfDoublePrecision.cpp \author pystencils
Definition EKWalberla.hpp:38