Module Kernel.Cuda

module Cuda: sig .. end

type cuda_extra 

val cuda_create_extra : int -> cuda_extra

val cuda_launch_grid : int Pervasives.ref ->
       Kernel.kernel ->
       Kernel.grid ->
       Kernel.block ->
       cuda_extra -> Spoc.Devices.generalInfo -> int -> unit

val cuda_load_arg : int Pervasives.ref ->
       cuda_extra ->
       Spoc.Devices.device -> 'c -> 'd -> ('a, 'b) Kernel.kernelArgs -> unit