Fixed another string variable NetCDF bug

MintonGroup · Jan 12, 2023 · 600c1b0 · 600c1b0
1 parent 9859c24
commit 600c1b0
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/encounter/encounter_io.f90 b/src/encounter/encounter_io.f90
@@ -232,7 +232,7 @@ module subroutine encounter_io_netcdf_write_frame_snapshot(self, history, param)
 
       ! Internals
       integer(I4B)           :: i, idslot, old_mode, npl, ntp
-      character(len=:), allocatable :: charstring
+      character(len=STRMAX) :: charstring
 
       select type(param)
       class is (swiftest_parameters)