Save the toroidal modes to the restart file.

ORNL-Fusion · Jan 29, 2024 · 97d204a · 97d204a
1 parent 69d2fec
commit 97d204a
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/Sources/restart_mod.f90 b/Sources/restart_mod.f90
@@ -471,6 +471,8 @@ SUBROUTINE restart_write(restart_ext, wout_file)
       CALL cdf_define(ncid, vn_nfpin, nfp)
       CALL cdf_define(ncid, vn_wout, wout_file)
 
+      CALL cdf_define(ncid, vn_tor_modes, fourier_context%tor_modes)
+
       CALL cdf_define(ncid, vn_jbsupss, jbsupsmnsh, dimname=restart_dims)
       CALL cdf_define(ncid, vn_jbsupuc, jbsupumnch, dimname=restart_dims)
       CALL cdf_define(ncid, vn_jbsupvc, jbsupvmnch, dimname=restart_dims)
@@ -546,6 +548,8 @@ SUBROUTINE restart_write(restart_ext, wout_file)
       CALL cdf_write(ncid, vn_nfpin, nfp)
       CALL cdf_write(ncid, vn_wout, wout_file)
 
+      CALL cdf_write(ncid, vn_tor_modes, fourier_context%tor_modes)
+
       CALL cdf_write(ncid, vn_jbsupss, jbsupsmnsh)
       CALL cdf_write(ncid, vn_jbsupuc, jbsupumnch)
       CALL cdf_write(ncid, vn_jbsupvc, jbsupvmnch)