ESPResSo
Extensible Simulation Package for Research on Soft Matter Systems
Loading...
Searching...
No Matches
ReactionKernelBulk_2_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_2_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_2_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_2cb10021ef8890fa965cb94996ae1510 {
49static FUNC_PREFIX void reactionkernelbulk_2_double_precision_reactionkernelbulk_2_double_precision(double *RESTRICT _data_rho_0, double *RESTRICT _data_rho_1, 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, double order_0, double order_1, double rate_coefficient, double stoech_0, double stoech_1) {
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 rate_factor = pow(local_rho_0, order_0) * pow(local_rho_1, order_1) * rate_coefficient;
59 _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;
60 _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;
61 }
62 }
63 }
64 }
65}
66} // namespace internal_2cb10021ef8890fa965cb94996ae1510
67
68void ReactionKernelBulk_2_double_precision::run(IBlock *block) {
69
70 auto rho_0 = block->getData<field::GhostLayerField<double, 1>>(rho_0ID);
71 auto rho_1 = block->getData<field::GhostLayerField<double, 1>>(rho_1ID);
72
73 auto &rate_coefficient = this->rate_coefficient_;
74 auto &stoech_1 = this->stoech_1_;
75 auto &order_0 = this->order_0_;
76 auto &stoech_0 = this->stoech_0_;
77 auto &order_1 = this->order_1_;
78 WALBERLA_ASSERT_GREATER_EQUAL(0, -int_c(rho_0->nrOfGhostLayers()))
79 double *RESTRICT _data_rho_0 = rho_0->dataAt(0, 0, 0, 0);
80 WALBERLA_ASSERT_GREATER_EQUAL(0, -int_c(rho_1->nrOfGhostLayers()))
81 double *RESTRICT _data_rho_1 = rho_1->dataAt(0, 0, 0, 0);
82 WALBERLA_ASSERT_GREATER_EQUAL(rho_0->xSizeWithGhostLayer(), int64_t(int64_c(rho_0->xSize()) + 0))
83 const int64_t _size_rho_0_0 = int64_t(int64_c(rho_0->xSize()) + 0);
84 WALBERLA_ASSERT_GREATER_EQUAL(rho_0->ySizeWithGhostLayer(), int64_t(int64_c(rho_0->ySize()) + 0))
85 const int64_t _size_rho_0_1 = int64_t(int64_c(rho_0->ySize()) + 0);
86 WALBERLA_ASSERT_GREATER_EQUAL(rho_0->zSizeWithGhostLayer(), int64_t(int64_c(rho_0->zSize()) + 0))
87 const int64_t _size_rho_0_2 = int64_t(int64_c(rho_0->zSize()) + 0);
88 const int64_t _stride_rho_0_0 = int64_t(rho_0->xStride());
89 const int64_t _stride_rho_0_1 = int64_t(rho_0->yStride());
90 const int64_t _stride_rho_0_2 = int64_t(rho_0->zStride());
91 const int64_t _stride_rho_1_0 = int64_t(rho_1->xStride());
92 const int64_t _stride_rho_1_1 = int64_t(rho_1->yStride());
93 const int64_t _stride_rho_1_2 = int64_t(rho_1->zStride());
94 internal_2cb10021ef8890fa965cb94996ae1510::reactionkernelbulk_2_double_precision_reactionkernelbulk_2_double_precision(_data_rho_0, _data_rho_1, _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, order_0, order_1, rate_coefficient, stoech_0, stoech_1);
95}
96
97void ReactionKernelBulk_2_double_precision::runOnCellInterval(const shared_ptr<StructuredBlockStorage> &blocks, const CellInterval &globalCellInterval, cell_idx_t ghostLayers, IBlock *block) {
98
99 CellInterval ci = globalCellInterval;
100 CellInterval blockBB = blocks->getBlockCellBB(*block);
101 blockBB.expand(ghostLayers);
102 ci.intersect(blockBB);
103 blocks->transformGlobalToBlockLocalCellInterval(ci, *block);
104 if (ci.empty())
105 return;
106
107 auto rho_0 = block->getData<field::GhostLayerField<double, 1>>(rho_0ID);
108 auto rho_1 = block->getData<field::GhostLayerField<double, 1>>(rho_1ID);
109
110 auto &rate_coefficient = this->rate_coefficient_;
111 auto &stoech_1 = this->stoech_1_;
112 auto &order_0 = this->order_0_;
113 auto &stoech_0 = this->stoech_0_;
114 auto &order_1 = this->order_1_;
115 WALBERLA_ASSERT_GREATER_EQUAL(ci.xMin(), -int_c(rho_0->nrOfGhostLayers()))
116 WALBERLA_ASSERT_GREATER_EQUAL(ci.yMin(), -int_c(rho_0->nrOfGhostLayers()))
117 WALBERLA_ASSERT_GREATER_EQUAL(ci.zMin(), -int_c(rho_0->nrOfGhostLayers()))
118 double *RESTRICT _data_rho_0 = rho_0->dataAt(ci.xMin(), ci.yMin(), ci.zMin(), 0);
119 WALBERLA_ASSERT_GREATER_EQUAL(ci.xMin(), -int_c(rho_1->nrOfGhostLayers()))
120 WALBERLA_ASSERT_GREATER_EQUAL(ci.yMin(), -int_c(rho_1->nrOfGhostLayers()))
121 WALBERLA_ASSERT_GREATER_EQUAL(ci.zMin(), -int_c(rho_1->nrOfGhostLayers()))
122 double *RESTRICT _data_rho_1 = rho_1->dataAt(ci.xMin(), ci.yMin(), ci.zMin(), 0);
123 WALBERLA_ASSERT_GREATER_EQUAL(rho_0->xSizeWithGhostLayer(), int64_t(int64_c(ci.xSize()) + 0))
124 const int64_t _size_rho_0_0 = int64_t(int64_c(ci.xSize()) + 0);
125 WALBERLA_ASSERT_GREATER_EQUAL(rho_0->ySizeWithGhostLayer(), int64_t(int64_c(ci.ySize()) + 0))
126 const int64_t _size_rho_0_1 = int64_t(int64_c(ci.ySize()) + 0);
127 WALBERLA_ASSERT_GREATER_EQUAL(rho_0->zSizeWithGhostLayer(), int64_t(int64_c(ci.zSize()) + 0))
128 const int64_t _size_rho_0_2 = int64_t(int64_c(ci.zSize()) + 0);
129 const int64_t _stride_rho_0_0 = int64_t(rho_0->xStride());
130 const int64_t _stride_rho_0_1 = int64_t(rho_0->yStride());
131 const int64_t _stride_rho_0_2 = int64_t(rho_0->zStride());
132 const int64_t _stride_rho_1_0 = int64_t(rho_1->xStride());
133 const int64_t _stride_rho_1_1 = int64_t(rho_1->yStride());
134 const int64_t _stride_rho_1_2 = int64_t(rho_1->zStride());
135 internal_2cb10021ef8890fa965cb94996ae1510::reactionkernelbulk_2_double_precision_reactionkernelbulk_2_double_precision(_data_rho_0, _data_rho_1, _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, order_0, order_1, rate_coefficient, stoech_0, stoech_1);
136}
137
138} // namespace pystencils
139} // namespace walberla
140
141#if (defined WALBERLA_CXX_COMPILER_IS_GNU) || (defined WALBERLA_CXX_COMPILER_IS_CLANG)
142#pragma GCC diagnostic pop
143#endif
144
145#if (defined WALBERLA_CXX_COMPILER_IS_INTEL)
146#pragma warning pop
147#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_2_double_precision.h
walberla::pystencils::ReactionKernelBulk_2_double_precision::runOnCellInterval
void runOnCellInterval(const shared_ptr< StructuredBlockStorage > &blocks, const CellInterval &globalCellInterval, cell_idx_t ghostLayers, IBlock *block)
Definition ReactionKernelBulk_2_double_precision.cpp:97
walberla::pystencils::ReactionKernelBulk_2_double_precision::run
void run(IBlock *block)
Definition ReactionKernelBulk_2_double_precision.cpp:68
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_2cb10021ef8890fa965cb94996ae1510::reactionkernelbulk_2_double_precision_reactionkernelbulk_2_double_precision
static FUNC_PREFIX void reactionkernelbulk_2_double_precision_reactionkernelbulk_2_double_precision(double *RESTRICT _data_rho_0, double *RESTRICT _data_rho_1, 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, double order_0, double order_1, double rate_coefficient, double stoech_0, double stoech_1)
Definition ReactionKernelBulk_2_double_precision.cpp:49
walberla
\file PackInfoPdfDoublePrecision.cpp \author pystencils
Definition EKWalberla.hpp:38