{-# LANGUAGE ForeignFunctionInterface #-}
module Torch.FFI.THC.Short.TensorIndex where
import Foreign
import Foreign.C.Types
import Data.Word
import Data.Int
import Torch.Types.TH
import Torch.Types.THC
foreign import ccall "THCTensorIndex.h THCudaShortTensor_indexCopy"
c_indexCopy :: Ptr C'THCState -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THCudaLongTensor -> Ptr C'THCudaShortTensor -> IO ()
foreign import ccall "THCTensorIndex.h THCudaShortTensor_indexAdd"
c_indexAdd :: Ptr C'THCState -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THCudaLongTensor -> Ptr C'THCudaShortTensor -> IO ()
foreign import ccall "THCTensorIndex.h THCudaShortTensor_indexFill"
c_indexFill :: Ptr C'THCState -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THCudaLongTensor -> CShort -> IO ()
foreign import ccall "THCTensorIndex.h THCudaShortTensor_indexSelect"
c_indexSelect :: Ptr C'THCState -> Ptr C'THCudaShortTensor -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THCudaLongTensor -> IO ()
foreign import ccall "THCTensorIndex.h THCudaShortTensor_take"
c_take :: Ptr C'THCState -> Ptr C'THCudaShortTensor -> Ptr C'THCudaShortTensor -> Ptr C'THCudaLongTensor -> IO ()
foreign import ccall "THCTensorIndex.h THCudaShortTensor_put"
c_put :: Ptr C'THCState -> Ptr C'THCudaShortTensor -> Ptr C'THCudaLongTensor -> Ptr C'THCudaShortTensor -> CInt -> IO ()
foreign import ccall "THCTensorIndex.h THCudaShortTensor_indexCopy_long"
c_indexCopy_long :: Ptr C'THCState -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THLongTensor -> Ptr C'THCudaShortTensor -> IO ()
foreign import ccall "THCTensorIndex.h THCudaShortTensor_indexAdd_long"
c_indexAdd_long :: Ptr C'THCState -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THLongTensor -> Ptr C'THCudaShortTensor -> IO ()
foreign import ccall "THCTensorIndex.h THCudaShortTensor_indexFill_long"
c_indexFill_long :: Ptr C'THCState -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THLongTensor -> CShort -> IO ()
foreign import ccall "THCTensorIndex.h THCudaShortTensor_indexSelect_long"
c_indexSelect_long :: Ptr C'THCState -> Ptr C'THCudaShortTensor -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THLongTensor -> IO ()
foreign import ccall "THCTensorIndex.h THCudaShortTensor_calculateAdvancedIndexingOffsets"
c_calculateAdvancedIndexingOffsets :: Ptr C'THCState -> Ptr C'THCudaLongTensor -> Ptr C'THCudaShortTensor -> CPtrdiff -> Ptr (Ptr C'THCudaLongTensor) -> IO ()
foreign import ccall "THCTensorIndex.h &THCudaShortTensor_indexCopy"
p_indexCopy :: FunPtr (Ptr C'THCState -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THCudaLongTensor -> Ptr C'THCudaShortTensor -> IO ())
foreign import ccall "THCTensorIndex.h &THCudaShortTensor_indexAdd"
p_indexAdd :: FunPtr (Ptr C'THCState -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THCudaLongTensor -> Ptr C'THCudaShortTensor -> IO ())
foreign import ccall "THCTensorIndex.h &THCudaShortTensor_indexFill"
p_indexFill :: FunPtr (Ptr C'THCState -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THCudaLongTensor -> CShort -> IO ())
foreign import ccall "THCTensorIndex.h &THCudaShortTensor_indexSelect"
p_indexSelect :: FunPtr (Ptr C'THCState -> Ptr C'THCudaShortTensor -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THCudaLongTensor -> IO ())
foreign import ccall "THCTensorIndex.h &THCudaShortTensor_take"
p_take :: FunPtr (Ptr C'THCState -> Ptr C'THCudaShortTensor -> Ptr C'THCudaShortTensor -> Ptr C'THCudaLongTensor -> IO ())
foreign import ccall "THCTensorIndex.h &THCudaShortTensor_put"
p_put :: FunPtr (Ptr C'THCState -> Ptr C'THCudaShortTensor -> Ptr C'THCudaLongTensor -> Ptr C'THCudaShortTensor -> CInt -> IO ())
foreign import ccall "THCTensorIndex.h &THCudaShortTensor_indexCopy_long"
p_indexCopy_long :: FunPtr (Ptr C'THCState -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THLongTensor -> Ptr C'THCudaShortTensor -> IO ())
foreign import ccall "THCTensorIndex.h &THCudaShortTensor_indexAdd_long"
p_indexAdd_long :: FunPtr (Ptr C'THCState -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THLongTensor -> Ptr C'THCudaShortTensor -> IO ())
foreign import ccall "THCTensorIndex.h &THCudaShortTensor_indexFill_long"
p_indexFill_long :: FunPtr (Ptr C'THCState -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THLongTensor -> CShort -> IO ())
foreign import ccall "THCTensorIndex.h &THCudaShortTensor_indexSelect_long"
p_indexSelect_long :: FunPtr (Ptr C'THCState -> Ptr C'THCudaShortTensor -> Ptr C'THCudaShortTensor -> CInt -> Ptr C'THLongTensor -> IO ())
foreign import ccall "THCTensorIndex.h &THCudaShortTensor_calculateAdvancedIndexingOffsets"
p_calculateAdvancedIndexingOffsets :: FunPtr (Ptr C'THCState -> Ptr C'THCudaLongTensor -> Ptr C'THCudaShortTensor -> CPtrdiff -> Ptr (Ptr C'THCudaLongTensor) -> IO ())