sig type bandit val initialBandit : Obandit.Bandit.bandit val step : Obandit.Bandit.bandit -> float -> int * Obandit.Bandit.bandit end