cwpearson/astaroth
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Played around with forcing and cleaned the example implementation a bit

Browse Source
This commit is contained in:
jpekkila
2019-06-18 17:40:27 +03:00
parent d4907332f2
commit b5753f0bec
1 changed files with 14 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
acc/mhd_solver/stencil_process.sps
View File

@@ -195,12 +195,13 @@ forcing(int3 globalVertexIdx)
Vector b = (Vector){(globalVertexIdx.x - nx_min) * dsx,
(globalVertexIdx.y - ny_min) * dsy,
(globalVertexIdx.z - nz_min) * dsz}; // sink (current index)
Vector dir = normalized(b - a);
if (is_valid(dir)) {
return Scalar(1.) * dir;
} else {
return (Vector){0, 0, 0};
}
Scalar magnitude = 0.1;
// Vector c = magnitude * (1 / length(b - a)) * normalized(b - a); // Outward flow
Vector c = magnitude * cross(normalized(b - a), (Vector){0, 0, 1}); // Vortex
if (is_valid(c)) { return c; }
else { return (Vector){0, 0, 0}; }
#else
return (Vector){0, 0, 0};
#endif // LFORCING