opencl_intf.F90 File Reference

Go to the source code of this file.

Data Types
interface	opencl_intf::clgetplatformids
interface	opencl_intf::clgetdeviceids
interface	opencl_intf::clcreatecontext
interface	opencl_intf::clcreatecommandqueue
interface	opencl_intf::clcreatebuffer
interface	opencl_intf::clcreateuserevent
interface	opencl_intf::clenqueuereadbuffer
interface	opencl_intf::clenqueuewritebuffer
interface	opencl_intf::clenqueuecopybuffer
interface	opencl_intf::clenqueuemarkerwithwaitlist
interface	opencl_intf::clenqueuemarker
interface	opencl_intf::clenqueuebarrier
interface	opencl_intf::clenqueuewaitforevents
interface	opencl_intf::clwaitforevents
interface	opencl_intf::clsetusereventstatus
interface	opencl_intf::clgetdeviceinfo
interface	opencl_intf::clreleasecontext
interface	opencl_intf::clreleasecommandqueue
interface	opencl_intf::clreleasedevice
interface	opencl_intf::clreleaseprogram
interface	opencl_intf::clreleasememobject
interface	opencl_intf::clreleaseevent
interface	opencl_intf::clflush
interface	opencl_intf::clfinish

Modules
module	opencl_intf
	Fortran OpenCL interface.

Enumerations
enum	{   opencl_intf::cl_success = 0 , opencl_intf::cl_device_not_found = -1 , opencl_intf::cl_device_not_available = -2 , opencl_intf::cl_compiler_not_available = -3 ,   opencl_intf::cl_mem_object_allocation_failure = -4 , opencl_intf::cl_out_of_resources = -5 , opencl_intf::cl_out_of_host_memory = -6 , opencl_intf::cl_profiling_info_not_available = -7 ,   opencl_intf::cl_mem_copy_overlap = -8 , opencl_intf::cl_image_format_mismatch = -9 , opencl_intf::cl_image_format_not_supported = -10 , opencl_intf::cl_build_program_failure = -11 ,   opencl_intf::cl_map_failure = -12 }
	Enum Error Codes. More...
enum	{   opencl_intf::cl_mem_read_write = 1 , opencl_intf::cl_mem_write_only = 2 , opencl_intf::cl_mem_read_only = 4 , opencl_intf::cl_mem_use_host_ptr = 8 ,   opencl_intf::cl_mem_alloc_host_ptr = 16 , opencl_intf::cl_mem_host_write_only = 128 , opencl_intf::cl_mem_host_read_only = 256 , opencl_intf::cl_mem_host_no_access = 512 }
	Enum mem flags. More...
enum	{ opencl_intf::cl_complete = 0 , opencl_intf::cl_running = 1 , opencl_intf::cl_submitted = 2 , opencl_intf::cl_queued = 3 }
	Enum event flags. More...
enum	{ opencl_intf::cl_false = 0 , opencl_intf::cl_true = 1 }
	Enum boolean. More...
enum	{ opencl_intf::cl_context_platform = int(Z'1084') }
enum	{ opencl_intf::cl_device_name = 4139 }
	Enum device info. More...

Functions/Subroutines
subroutine	opencl_intf::opencl_init
subroutine	opencl_intf::opencl_finalize
subroutine	opencl_intf::opencl_device_name (name)
integer function	opencl_intf::opencl_device_count ()
	Return the number of OpenCL devices.

Variables
type(c_ptr), bind(C)	opencl_intf::glb_cmd_queue = C_NULL_PTR
	Global OpenCL command queue.
type(c_ptr), bind(C)	opencl_intf::aux_cmd_queue = C_NULL_PTR
	Aux OpenCL command queue.
type(c_ptr), bind(C)	opencl_intf::glb_ctx = C_NULL_PTR
	Global OpenCL context.
type(c_ptr), target	opencl_intf::glb_device_id = C_NULL_PTR
	Global OpenCL device_id.
integer(c_int64_t), parameter	opencl_intf::cl_device_type_default = 1
	Device types.
integer(c_int64_t), parameter	opencl_intf::cl_device_type_cpu = 2
integer(c_int64_t), parameter	opencl_intf::cl_device_type_gpu = 4
integer(c_int64_t), parameter	opencl_intf::cl_device_type_accelerator = 8
integer(c_int64_t), parameter	opencl_intf::cl_device_type_custom = 16
integer(c_int64_t), parameter	opencl_intf::cl_device_type_all = int(Z'FFFFFFFF', i8)