mirror of
https://github.com/JHUAPL/kaiju.git
synced 2026-01-09 15:17:56 -05:00
Debug messages and flag fix
This commit is contained in:
@@ -30,6 +30,12 @@ module raijuBCs
|
||||
doWholeDomain = .false.
|
||||
endif
|
||||
|
||||
if(doWholeDomain) then
|
||||
write(*,*)"applyRaijuBCs: doWholeDomain=T"
|
||||
else
|
||||
write(*,*)"applyRaijuBCs: doWholeDomain=F"
|
||||
endif
|
||||
|
||||
call calcMomentIngestionLocs(Model, Grid, State, doWholeDomain, doMomentIngest)
|
||||
call applyMomentIngestion(Model, Grid, State, doMomentIngest)
|
||||
|
||||
|
||||
@@ -101,8 +101,11 @@ module raijuColdStartHelper
|
||||
|
||||
cs%lastEval = t0
|
||||
cs%lastTarget = dstTarget
|
||||
cs%doneFirstCS = .true. ! Whether we do anything or not, we were at least called once
|
||||
|
||||
if (dstTarget > 0) then ! We got nothing to contribute
|
||||
if (dstTarget > 0) then ! We've got nothing to contribute
|
||||
write(*,*)"RAIJU coldstart not adding anything"
|
||||
write(*,*)'doAccumulate=',doAccumulate
|
||||
return
|
||||
endif
|
||||
|
||||
@@ -154,8 +157,6 @@ module raijuColdStartHelper
|
||||
State%eta = etaCS
|
||||
endif
|
||||
|
||||
State%coldStarter%doneFirstCS = .true.
|
||||
|
||||
end subroutine raijuGeoColdStart
|
||||
|
||||
|
||||
|
||||
@@ -44,7 +44,7 @@ module raijuPreAdvancer
|
||||
call applyRaijuBCs(Model, Grid, State, doWholeDomainO=State%isFirstCpl) ! If fullEtaMap=True, mom2eta map is applied to the whole domain
|
||||
call Toc("BCs")
|
||||
|
||||
! Handle plasmaasphere refilling for the full step about to happen
|
||||
! Handle plasmasphere refilling for the full step about to happen
|
||||
call plasmasphereRefill(Model,Grid,State)
|
||||
|
||||
! Handle edge cases that may effect the validity of information carried over from last coupling period
|
||||
|
||||
Reference in New Issue
Block a user