sig val tactical : Tactical.tactical val strategy : ?priority:float -> Tactical.selection -> nbits:int -> Strategy.strategy end