Fix loc_violations gaining implicit SAVE attribute

Initializing a local variable in its declaration gives it the SAVE
attribute in Fortran, meaning it would not reset to zero on subsequent
calls. Move the initialization to an executable assignment so the
variable is properly zeroed each time the subroutine is entered.

Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>

Author: sbryngelson

src/pre_process/m_data_output.fpp

@@ -476,13 +476,15 @@ contains
 
         ! Generic loop iterators
         integer :: i, j, k, l
-        real(wp) :: loc_violations = 0._wp, glb_violations
+        real(wp) :: loc_violations, glb_violations
 
         ! Downsample variables
         integer :: m_ds, n_ds, p_ds
         integer :: m_glb_ds, n_glb_ds, p_glb_ds
         integer :: m_glb_save, n_glb_save, p_glb_save ! Size of array being saved
 
+        loc_violations = 0._wp
+
         if (down_sample) then
             if ((mod(m + 1, 3) > 0) .or. (mod(n + 1, 3) > 0) .or. (mod(p + 1, 3) > 0)) then
                 loc_violations = 1._wp