1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
#pragma once
#include "macroscopic.hpp"
#include "component.hpp"
#include "equilibrium.hpp"
namespace kel {
namespace lbm {
namespace cmpt {
struct PSM {};
}
/**
* PSM collision operator for LBM
*/
template<typename T, typename Descriptor, typename Encode>
class component<T, Descriptor, cmpt::PSM, Encode> {
private:
saw::data<T> relaxation_;
saw::data<T> frequency_;
public:
component(
typename saw::native_data_type<T>::type relaxation__
):
relaxation_{relaxation__}
{
saw::data<T> one;
one = 1.0;
frequency_ = one / relaxation_;
}
template<typename CellFieldSchema, typename MacroFieldSchema>
void apply(const saw::data<CellFieldSchema, Encode>& field, const saw::data<MacroFieldSchema,Encode>& macros, saw::data<sch::FixedArray<sch::UInt64,Descriptor::D>> index, saw::data<sch::UInt64> time_step) const {
using dfi = df_info<T,Descriptor>;
bool is_even = ((time_step.get() % 2) == 0);
auto& dfs_old_f = (is_even) ? field.template get<"dfs_old">() : field.template get<"dfs">();
auto& porous_f = macros.template get<"porosity">();
auto& rho_f = macros.template get<"density">();
auto& vel_f = macros.template get<"velocity">();
saw::data<sch::Scalar<T>>& rho = rho_f.at(index);
saw::data<sch::Vector<T,Descriptor::D>>& vel = vel_f.at(index);
compute_rho_u<T,Descriptor>(dfs_old_f.at(index),rho,vel);
auto eq = equilibrium<T,Descriptor>(rho,vel);
saw::data<T> one{1.0};
auto& porous = porous_f.at(index);
auto flip_porous = one - porous.at({});
auto& dfs = dfs_old_f.at(index);
auto dfs_cpy = dfs;
for(uint64_t i = 0u; i < Descriptor::Q; ++i){
uint64_t i_opp = dfi::opposite_index[i];
dfs.at({i}) = dfs_cpy.at({i}) + frequency_ * (eq.at(i) - dfs_cpy.at({i})) * porous.at({}) + (dfs_cpy.at({i_opp}) - dfs_cpy.at({i}) ) * flip_porous;
}
}
};
}
}
|
