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

Added some preprocessing directives for accretion

Browse Source
This commit is contained in:
Miikka Vaisala
2019-08-13 13:51:46 +08:00
parent 8c7176d702
commit 870eb32bb3
1 changed files with 6 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
src/standalone/simulation.cc
View File

@@ -195,7 +195,9 @@ run_simulation(void)
// TODO: This need to be possible to define in astaroth.conf
acmesh_init_to(INIT_TYPE_GAUSSIAN_RADIAL_EXPL, mesh);
#if LACCRETION
vertex_buffer_set(VTXBUF_ACCRETION, 0.0, mesh);
#endif
acInit(mesh_info);
acLoad(*mesh);
@@ -244,12 +246,15 @@ run_simulation(void)
for (int i = 1; i < max_steps; ++i) {
const AcReal umax = acReduceVec(RTYPE_MAX, VTXBUF_UUX, VTXBUF_UUY, VTXBUF_UUZ);
const AcReal dt = host_timestep(umax, mesh_info);
#if LACCRETION
const AcReal sum_mass = acReduceScal(RTYPE_MAX, VTXBUF_ACCRETION);
accreted_mass = accreted_mass + sum_mass;
accreted_mass = accreted_mass + sum_mass;
AcReal sink_mass = AC_M_sink_init + accreted_mass;
printf("sink mass is: %e\n", sink_mass);
printf("accreted mass is: %e\n", accreted_mass);
acLoadDeviceConstant(AC_M_sink, sink_mass);
#endif
#if LFORCING
const ForcingParams forcing_params = generateForcingParams(mesh_info);