Merge pull request #53 from GEOS-ESM/hotfix/extact_replay

Fix exact replay
GEOS-ESM · Sep 24, 2019 · e32f2e7 · e32f2e7
2 parents 5e74149 + 118c18d
commit e32f2e7
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/MAPL_Base/MAPL_Generic.F90 b/MAPL_Base/MAPL_Generic.F90
@@ -5048,11 +5048,11 @@ subroutine MAPL_ESMFStateReadFromFile(STATE,CLOCK,FILENAME,MPL,HDR,RC)
     end if
 
     if (filetype == 'binary' .or. filetype == 'BINARY') then
-       UNIT = GETFILE(FNAME, form="unformatted", rc=status)
+       UNIT = GETFILE(FNAME, form="unformatted", all_pes=.true., rc=status)
        VERIFY_(STATUS)
 
     elseif(filetype=="formatted".or.filetype=="FORMATTED") then
-       UNIT = GETFILE(FNAME, form="formatted", rc=status)
+       UNIT = GETFILE(FNAME, form="formatted", all_pes=.true., rc=status)
        VERIFY_(STATUS)
 
     elseif(filetype=='pbinary') then