tubes parallel to mix when running with helpers

This commit is contained in:
Jeff Garretson
2025-11-04 14:27:59 -06:00
parent 7f23f40b30
commit 938881a92b

View File

@@ -391,6 +391,14 @@ module voltapp_mpi
call Toc("GCM2MIX")
end if
! tubes are only done after spinup
if(vApp%doDeep .and. vApp%time >= 0) then
if(vApp%useHelpers) call vhReqStep(vApp)
if(vApp%useHelpers .and. vApp%doTubeHelp) then
call VhReqTubeStart(vApp)
endif
endif
! run remix
call Tic("ReMIX", .true.)
call runRemix(vApp)
@@ -405,9 +413,8 @@ module voltapp_mpi
! only do imag after spinup
if(vApp%doDeep .and. vApp%time >= 0) then
if(vApp%useHelpers) call vhReqStep(vApp)
! instead of PreDeep, use Tube Helpers and replicate other calls
!Update i-shell to trace within in case rTrc has changed
vApp%iDeep = vApp%gApp%Grid%ie-1
@@ -417,7 +424,7 @@ module voltapp_mpi
call Toc("G2C")
call Tic("VoltTubes",.true.)
if(vApp%useHelpers .and. vApp%doTubeHelp) then
call VhReqTubeStart(vApp)
! Tubes were started earlier
call vhReqTubeEnd(vApp)
! Now pack into tubeShell
call Tic("Tube2Shell")