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
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
|
#pragma once
#include "component.hpp"
#include "equilibrium.hpp"
namespace kel {
namespace lbm {
namespace cmpt {
struct BGK {};
struct BGKGuo {};
}
/**
* Standard BGK collision operator for LBM
*/
template<typename T, typename Descriptor>
class component<T, Descriptor, cmpt::BGK> {
private:
typename saw::native_data_type<T>::type relaxation_;
saw::data<T> frequency_;
public:
component(typename saw::native_data_type<T>::type relaxation__):
relaxation_{relaxation__},
frequency_{typename saw::native_data_type<T>::type(1) / relaxation_}
{}
using Component = cmpt::BGK;
/**
* Thoughts regarding automating order setup
*/
using access = cmpt::access_tuple<
cmpt::access<"dfs", 1, true, true, true>
>;
/**
* Thoughts regarding automating order setup
*/
static constexpr saw::string_literal name = "collision";
static constexpr saw::string_literal after = "";
static constexpr saw::string_literal before = "streaming";
/**
* Raw setup
*/
template<typename CellFieldSchema>
void apply(saw::data<CellFieldSchema>& field, saw::data<sch::FixedArray<sch::UInt64,Descriptor::D>> index, uint64_t time_step){
bool is_even = ((time_step % 2) == 0);
auto& cell = field(index);
auto& dfs_old = (is_even) ? cell.template get<"dfs_old">() : cell.template get<"dfs">();
// auto& dfs = (not is_even) ? cell.template get<"dfs_old">() : cell.template get<"dfs">();
saw::data<T> rho;
saw::data<sch::FixedArray<T,Descriptor::D>> vel;
compute_rho_u<T,Descriptor>(dfs_old,rho,vel);
auto eq = equilibrium<T,Descriptor>(rho,vel);
for(uint64_t i = 0u; i < Descriptor::Q; ++i){
dfs_old({i}) = dfs_old({i}) + frequency_ * (eq.at(i) - dfs_old({i}));
// dfs_old({i}).set(dfs_old({i}).get() + (1.0 / relaxation_) * (eq.at(i).get() - dfs_old({i}).get()));
}
}
};
template<typename T, typename Descriptor>
class component<T, Descriptor, cmpt::BGKGuo> {
private:
typename saw::native_data_type<T>::type relaxation_;
saw::data<T> frequency_;
public:
component(typename saw::native_data_type<T>::type relaxation__):
relaxation_{relaxation__},
frequency_{typename saw::native_data_type<T>::type(1) / relaxation_}
{}
using Component = cmpt::BGKGuo;
using access = cmpt::access_tuple<
cmpt::access<"dfs", 1, true, true, true>,
cmpt::access<"force", 0, true, false>
>;
/**
* Thoughts regarding automating order setup
*/
static constexpr saw::string_literal name = "collision";
static constexpr saw::string_literal after = "";
static constexpr saw::string_literal before = "streaming";
template<typename CellFieldSchema>
void apply(saw::data<CellFieldSchema>& field, saw::data<sch::FixedArray<sch::UInt64, Descriptor::D>> index, uint64_t time_step){
bool is_even = ((time_step % 2) == 0);
auto& cell = field(index);
auto& dfs_old = (is_even) ? cell.template get<"dfs_old">() : cell.template get<"dfs">();
// auto& dfs = (not is_even) ? cell.template get<"dfs_old">() : cell.template get<"dfs">();
saw::data<T> rho;
saw::data<sch::FixedArray<T,Descriptor::D>> vel;
compute_rho_u<T,Descriptor>(dfs_old,rho,vel);
auto eq = equilibrium<T,Descriptor>(rho,vel);
using dfi = df_info<T,Descriptor>;
auto& force = cell.template get<"force">();
for(uint64_t i = 0u; i < Descriptor::Q; ++i){
saw::data<T> ci_min_u{0};
saw::data<T> ci_dot_u{0};
for(uint64_t d = 0u; d < Descriptor::D; ++d){
ci_dot_u = ci_dot_u + vel.at({d}) * saw::data<T>{static_cast<typename saw::native_data_type<T>::type>(dfi::directions[i][d])};
}
saw::data<T> F_i{0};// = saw::data<T>{dfi::weights[i]} * (ci_dot_F * dfi::inv_cs2 + ci_dot_u * ci_dot_F * (dfi::inv_cs2 * dfi::inv_cs2));
for(uint64_t d = 0u; d < Descriptor::D; ++d){
F_i = F_i +
saw::data<T>{dfi::weights[i]} * ((saw::data<T>{static_cast<typename saw::native_data_type<T>::type>(dfi::directions[i][d])}
- vel.at({d}) ) * dfi::inv_cs2 + ci_dot_u * saw::data<T>{static_cast<typename saw::native_data_type<T>::type>(dfi::directions[i][d])} * dfi::inv_cs2 * dfi::inv_cs2 ) * force({d});
}
dfs_old({i}) = dfs_old({i}) + frequency_ * (eq.at(i) - dfs_old({i}) ) + F_i * (saw::data<T>{1} - saw::data<T>{0.5f} * frequency_);
}
}
};
}
}
|
