Added in time and space dimension coordinates to encounter dataset

MintonGroup · Dec 5, 2022 · 14d2859 · 14d2859
1 parent 3565093
commit 14d2859
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 0 deletions.
diff --git a/src/symba/symba_io.f90 b/src/symba/symba_io.f90
@@ -122,6 +122,9 @@ module subroutine symba_io_encounter_initialize_output(self, param)
 
          ! Take the file out of define mode
          call check( nf90_enddef(nciu%id), "symba_io_encounter_initialize_output nf90_enddef"  )
+
+         ! Add in the space dimension coordinates
+         call check( nf90_put_var(nciu%id, nciu%space_varid, nciu%space_coords, start=[1], count=[NDIM]), "symba_io_encounter_initialize_output nf90_put_var space"  )
       end associate
 
       return

diff --git a/src/symba/symba_util.f90 b/src/symba/symba_util.f90
@@ -1389,6 +1389,8 @@ module subroutine symba_util_take_encounter_snapshot(self, param, t)
 
                if (npl_snap + ntp_snap == 0) return
 
+               snapshot%t = t
+
                ! Save the snapshot
                self%encounter_history%iframe = self%encounter_history%iframe + 1
                call self%resize_storage(self%encounter_history%iframe)