reset_trial_space Subroutine

    subroutine reset_trial_space()
        integer(int64) :: i

        do i = 1_int64, TotWalkers
            ! remove the trial flag from all determinants
            call clr_flag(CurrentDets(:, i), flag_trial)
        end do
    end subroutine reset_trial_space