module Reinforcement: sig .. end
sig
end
val epsilon : float
float
class [['a, 'b]] q_learner : 'a list -> 'b -> object .. end
[['a, 'b]]
'a list -> 'b ->
object