Key the force record on the global patch id and let a zero stride be rejected

Author: sbryngelson

src/simulation/m_data_output.fpp

@@ -1132,7 +1132,7 @@ contains
             if (num_procs > 1) ib_idx = local_ib_patch_ids(i)
             if (ib_force_buf_n == ib_force_buf_len) call s_flush_ib_force_files()
             ib_force_buf_n = ib_force_buf_n + 1
-            ib_force_buf(1, ib_force_buf_n) = real(max(patch_ib(ib_idx)%gbl_patch_id, ib_idx), wp)
+            ib_force_buf(1, ib_force_buf_n) = real(patch_ib(ib_idx)%gbl_patch_id, wp)
             ib_force_buf(2, ib_force_buf_n) = real(t_step, wp)
             ib_force_buf(3, ib_force_buf_n) = mytime
             ib_force_buf(4:6,ib_force_buf_n) = patch_ib(ib_idx)%force(1:3)

toolchain/mfc/case_validator.py

@@ -759,7 +759,7 @@ def check_ibm(self):
         )
         self.prohibit(not ib and num_ibs > 0, "num_ibs is set, but ib is not enabled")
         self.prohibit(ib_state_wrt and not ib, "ib_state_wrt requires ib to be enabled")
-        ib_force_stride = self.get("ib_force_stride", 1) or 1
+        ib_force_stride = self.get("ib_force_stride", 1)
         self.prohibit(ib_force_stride < 1, "ib_force_stride must be >= 1")
         self.prohibit(many_ib_patch_parallelism and not ib, "many_ib_patch_parallelism requires ib to be enabled")