Most coarray methods implemented, but not fully tested

MintonGroup · Apr 14, 2023 · be4985c · be4985c
1 parent fe00a04
commit be4985c
Show file tree

Hide file tree

Showing 19 changed files with 1,484 additions and 318 deletions.
diff --git a/src/CMakeLists.txt b/src/CMakeLists.txt
@@ -86,6 +86,8 @@ SET(FAST_MATH_FILES
 SET(COARRAY_FILES
             ${SRC}/coarray/coarray_module.f90
             ${SRC}/swiftest/swiftest_coarray.f90
+            ${SRC}/whm/whm_coarray.f90
+            ${SRC}/rmvs/rmvs_coarray.f90
 )
 
 IF(USE_COARRAY)

diff --git a/src/base/base_module.f90 b/src/base/base_module.f90
@@ -387,7 +387,7 @@ subroutine base_util_snapshot_save(self, snapshot)
          !! Memory usage grows by a factor of 2 each time it fills up, but no more. 
          implicit none
          ! Arguments
-         class(base_storage), intent(inout) :: self     !! Storage ncounter storage object
+         class(base_storage), intent(inout) :: self     !! Storage encounter storage object
          class(*),            intent(in)    :: snapshot !! Object to snapshot
          ! Internals
          integer(I4B) :: nnew, nold