Re-adding ability to run without RCM, adjusting tests that were shallow-only before

This commit is contained in:
Jeffrey Garretson
2023-02-13 14:42:53 -07:00
parent 34c0f1892f
commit af88712c27
9 changed files with 14 additions and 14 deletions

View File

@@ -6,7 +6,7 @@
<time tFin="36000.0"/>
<output dtOut="60.0" tsOut="100" doTimer="F"/>
<restart dtRes="1800.0"/>
<coupling dtCouple="5.0" rDeep="8.0" imType="SST"/>
<coupling dtCouple="5.0" doDeep="F" rDeep="8.0" imType="SST"/>
<eqmap eqFile="JulySST.h5"/>
</VOLTRON>
<Gamera>

View File

@@ -6,7 +6,7 @@
<time tFin="36000.0"/>
<output dtOut="60.0" tsOut="100" doTimer="F"/>
<restart dtRes="1800.0"/>
<coupling dt="5.0"/>
<coupling dtCouple="5.0" doDeep="F"/>
</VOLTRON>
<Gamera>
<sim runid="msphere" doH5g="T" H5Grid="lfmD.h5" icType="user" pdmb="1.0" pFloor="1.0e-8" dFloor="1.0e-6" rmeth="7UP"/>

View File

@@ -6,7 +6,7 @@
<time tFin="36000.0"/>
<output dtOut="60.0" tsOut="100" doTimer="F"/>
<restart dtRes="1800.0"/>
<coupling dt="5.0"/>
<coupling dtCouple="5.0" doDeep="F"/>
</VOLTRON>
<Gamera>
<sim runid="msphere" doH5g="T" H5Grid="lfmQ.h5" icType="user" pdmb="1.0" pFloor="1.0e-8" dFloor="1.0e-6" rmeth="7UP"/>

View File

@@ -140,7 +140,7 @@ module gamapp_mpi
real(rp), dimension(:,:,:), allocatable :: tempX,tempY,tempZ
real(rp) :: tmpDT
character(len=strLen) :: inH5
logical :: doH5g
logical :: doH5g, allLoud
integer, dimension(NDIM) :: dims
integer, dimension(:), allocatable :: gamRestartNumbers
@@ -156,6 +156,9 @@ module gamapp_mpi
call xmlInp%Set_Val(doH5g ,"sim/doH5g" ,.false.)
! debugging flag to make all gamera ranks loud
call xmlInp%Set_Val(allLoud, "output/allLoud", .false.)
if(Grid%NumRi*Grid%NumRj*Grid%NumRk > 1) then
Grid%isTiled = .true.
endif
@@ -317,7 +320,7 @@ module gamapp_mpi
Grid%Ri = rank
! only rank 0 should be loud
if(Grid%Ri==0 .and. Grid%Rj==0 .and. Grid%Rk==0) then
if((Grid%Ri==0 .and. Grid%Rj==0 .and. Grid%Rk==0) .or. allLoud) then
Model%isLoud = .true.
else
Model%isLoud = .false.

View File

@@ -132,11 +132,8 @@ module voltapp
vApp%TargetDeepDT = vApp%DeepDT
call xmlInp%Set_Val(vApp%rTrc, "coupling/rTrc" , 40.0)
if (vApp%DeepDT>0) then
vApp%doDeep = .true.
else
vApp%doDeep = .false.
endif
!Coupling is unified, so adding a separate XML option to control "deep" parts
call xmlInp%Set_Val(vApp%doDeep, "coupling/doDeep", .true.)
call xmlInp%Set_Val(vApp%doGCM, "coupling/doGCM",.false.)
if (vApp%isEarth) then

View File

@@ -4,7 +4,7 @@
<voltron>
<sim tFin="677.115987461"/>
<spinup doSpin="F"/>
<coupling dt="5.0"/>
<coupling dtCouple="5.0" doDeep="F"/>
</voltron>
<Gamera>
<iPdir N="1"/>

View File

@@ -4,7 +4,7 @@
<voltron>
<sim tFin="677.115987461"/>
<spinup doSpin="F"/>
<coupling dt="5.0" doAsyncCoupling="F"/>
<coupling dtCouple="5.0" doDeep="F" doAsyncCoupling="F"/>
</voltron>
<Gamera>
<iPdir N="1" bcPeriodic="F"/>

View File

@@ -4,7 +4,7 @@
<voltron>
<sim tFin="677.115987461"/>
<spinup doSpin="F"/>
<coupling dt="5.0" doAsyncCoupling="F"/>
<coupling dtCouple="5.0" doDeep="F" doAsyncCoupling="F"/>
</voltron>
<Gamera>
<iPdir N="1" bcPeriodic="F"/>

View File

@@ -4,7 +4,7 @@
<voltron>
<sim tFin="677.115987461"/>
<spinup doSpin="F"/>
<coupling dt="5.0" doAsyncCoupling="F"/>
<coupling dtCouple="5.0" doDeep="F" doAsyncCoupling="F"/>
</voltron>
<Gamera>
<iPdir N="2" bcPeriodic="F"/>