sig
  val ( |. ) : 'a -> ('a, 'b) GapiLens.t -> 'b
  val ( ^= ) : ('a, 'b) GapiLens.t -> 'b -> 'a -> 'a
  val ( ^%= ) : ('a, 'b) GapiLens.t -> ('b -> 'b) -> 'a -> 'a
  val ( |-- ) :
    ('a, 'b) GapiLens.t -> ('b, 'c) GapiLens.t -> ('a, 'c) GapiLens.t
  val ( --| ) :
    ('a, 'b) GapiLens.t -> ('c, 'a) GapiLens.t -> ('c, 'b) GapiLens.t
  val ( *** ) :
    ('a, 'b) GapiLens.t ->
    ('c, 'd) GapiLens.t -> ('a * 'c, 'b * 'd) GapiLens.t
  val ( += ) : ('a, int) GapiLens.t -> int -> 'a -> 'a
  val ( -= ) : ('a, int) GapiLens.t -> int -> 'a -> 'a
end