diff --git a/src/fixed_source.F90 b/src/fixed_source.F90 index 901836e2c..2bd4eb3a4 100644 --- a/src/fixed_source.F90 +++ b/src/fixed_source.F90 @@ -116,18 +116,16 @@ contains call timer_stop(time_ic_tallies) ! Write out state point if it's been specified for this batch - if (master) then - do i = 1, n_state_points - if (current_batch == statepoint_batch(i)) then + do i = 1, n_state_points + if (current_batch == statepoint_batch(i)) then #ifdef HDF5 - call hdf5_write_state_point() + call hdf5_write_state_point() #else - call write_state_point() + call write_state_point() #endif - exit - end if - end do - end if + exit + end if + end do end subroutine finalize_batch