Skip to content
Merged
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
20 changes: 0 additions & 20 deletions src/simulation/m_start_up.fpp
Original file line number Diff line number Diff line change
Expand Up @@ -1264,10 +1264,6 @@ contains
pref = 1._wp
end if

#if defined(MFC_OpenACC) && defined(MFC_MEMORY_DUMP)
call acc_present_dump()
#endif

call s_initialize_mpi_common_module()
call s_initialize_mpi_proxy_module()
call s_initialize_variables_conversion_module()
Expand All @@ -1277,10 +1273,6 @@ contains
if (ib) call s_initialize_ibm_module()
if (qbmm) call s_initialize_qbmm_module()

#if defined(MFC_OpenACC) && defined(MFC_MEMORY_DUMP)
call acc_present_dump()
#endif

if (acoustic_source) then
call s_initialize_acoustic_src()
end if
Expand All @@ -1293,19 +1285,12 @@ contains

if (surface_tension) call s_initialize_surface_tension_module()

#if defined(MFC_OpenACC) && defined(MFC_MEMORY_DUMP)
call acc_present_dump()
#endif

if (relax) call s_initialize_phasechange_module()

call s_initialize_data_output_module()
call s_initialize_derived_variables_module()
call s_initialize_time_steppers_module()

#if defined(MFC_OpenACC) && defined(MFC_MEMORY_DUMP)
call acc_present_dump()
#endif
call s_initialize_boundary_common_module()

! Reading in the user provided initial condition and grid data
Expand Down Expand Up @@ -1333,11 +1318,6 @@ contains
call s_initialize_riemann_solvers_module()
end if

#if defined(MFC_OpenACC) && defined(MFC_MEMORY_DUMP)
print *, "[MEM-INST] After: s_initialize_weno_module"
call acc_present_dump()
#endif

call s_initialize_derived_variables()
if (bubbles_lagrange) call s_initialize_bubbles_EL_module(q_cons_ts(1)%vf)

Expand Down
Loading