R/clFloat.R

Defines functions length.clFloat print.clFloat as.character.clFloat as.integer.clFloat is.clFloat as.double.clFloat as.clFloat clFloat

Documented in as.character.clFloat as.clFloat as.double.clFloat as.integer.clFloat clFloat is.clFloat length.clFloat print.clFloat

clFloat <- function(x) .Call("double2float", x)
as.clFloat <- function(x) .Call("double2float", x)
as.double.clFloat <- function(x, ...) .Call("float2double", x)
is.clFloat <- function(x) inherits(x, "clFloat")
as.integer.clFloat <- function(x, ...) as.integer(.Call("float2double", x), ...)
as.character.clFloat <- function(x, ...) as.character(.Call("float2double", x), ...)
print.clFloat <- function(x, ...) { cat(" Object of class clFloat:\n"); print(.Call("float2double", x), ...) }
length.clFloat <- function(x) .Call("clFloat_length", x)
"length<-.clFloat" <- function(x, value) .Call("clFloat_length_set", x, value)
`[.clFloat` <- function(x, ...) .Call("double2float", `[`(as.double(x), ...))
`[<-.clFloat` <- function(x, ..., value) .Call("double2float", `[<-`(as.double(x), ..., value))

Try the OpenCL package in your browser

Any scripts or data that you put into this service are public.

OpenCL documentation built on May 29, 2017, 8:13 p.m.