sig
  val sync_cpu_to_gpu : Lit.Renderer.T.t -> Lit.buf -> unit
  val sync_gpu_to_cpu : Lit.Renderer.T.t -> Lit.buf -> unit
  val gpu_map :
    Lit.Renderer.T.t ->
    [ `R | `RW | `W ] ->
    Lit.buf -> ('a, 'b) Gg.Ba.ba_scalar_type -> ('a, 'b) Gg.bigarray
  val gpu_unmap : Lit.Renderer.T.t -> Lit.buf -> unit
end