Skip to content
Merged
Changes from 1 commit
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
21 changes: 0 additions & 21 deletions src/simulation/m_start_up.fpp
Original file line number Diff line number Diff line change
Expand Up @@ -1257,11 +1257,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 @@ -1272,10 +1267,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 @@ -1288,19 +1279,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 All @@ -1322,11 +1306,6 @@ contains
! the modules. The preparations below DO DEPEND on the grid being complete.
call s_initialize_weno_module()

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

call s_initialize_cbc_module()
call s_initialize_derived_variables()
if (bubbles_lagrange) call s_initialize_bubbles_EL_module(q_cons_ts(1)%vf)
Expand Down
Loading