Opencl_api.Devicetype t = {id : int;handle : Opencl_types.cl_device_id;platform : Platform.t;name : string;vendor : string;max_compute_units : int;max_work_group_size : int;max_work_item_dims : int;max_work_item_sizes : int array;global_mem_size : int64;local_mem_size : int64;max_clock_freq : int;supports_fp64 : bool;is_cpu : bool;}val get_devices :
Opencl_types.cl_platform_id ->
Opencl_types.cl_bitfield ->
Opencl_types.cl_device_id arrayval get_info_string :
Opencl_types.cl_device_id ->
Opencl_types.cl_device_info ->
stringval get_info_int :
Opencl_types.cl_device_id ->
Opencl_types.cl_device_info ->
intval get_info_long :
Opencl_types.cl_device_id ->
Opencl_types.cl_device_info ->
int64val get_info_size :
Opencl_types.cl_device_id ->
Opencl_types.cl_device_info ->
intval make_device : Platform.t -> int -> Opencl_types.cl_device_id -> tval get : int -> t