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

Improved sink particle stability vie Truelove criterion.

Browse Source
This commit is contained in:
Miikka Vaisala
2019-08-19 14:38:36 +08:00
parent 1bfb0390ad
commit 5d93d743c7
3 changed files with 11 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/standalone/simulation.cc
View File

@@ -250,9 +250,13 @@ run_simulation(void)
const AcReal dt = host_timestep(umax, mesh_info);
#if LSINK
const AcReal sum_mass = acReduceScal(RTYPE_MAX, VTXBUF_ACCRETION);
accreted_mass = accreted_mass + sum_mass;
AcReal sink_mass = AC_M_sink_init + accreted_mass;
AcReal sink_mass = 0.0;
//if (i > 1000 ) {
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);