sig val consecutive_recent_attempts : Ketrew_target.State.t -> int end