module StateInfix:sig..end
val (^=!) : ('a, 'b) GapiLens.t -> 'b -> 'a -> unit * 'aval (+=!) : ('a, int) GapiLens.t -> int -> 'a -> unit * 'a
val (-=!) : ('a, int) GapiLens.t -> int -> 'a -> unit * 'a
val (@=!) : ('a, 'b list) GapiLens.t -> 'b list -> 'a -> unit * 'a