{-# LANGUAGE ForeignFunctionInterface #-}
module Torch.FFI.THC.TensorRandom where
import Foreign
import Foreign.C.Types
import Data.Word
import Data.Int
import Torch.Types.TH
import Torch.Types.THC
foreign import ccall "THCTensorRandom.h THCRandom_init"
c_THCRandom_init :: Ptr C'THCState -> CInt -> CInt -> IO ()
foreign import ccall "THCTensorRandom.h THCRandom_shutdown"
c_THCRandom_shutdown :: Ptr C'THCState -> IO ()
foreign import ccall "THCTensorRandom.h THCRandom_seed"
c_THCRandom_seed :: Ptr C'THCState -> IO CULong
foreign import ccall "THCTensorRandom.h THCRandom_seedAll"
c_THCRandom_seedAll :: Ptr C'THCState -> IO CULong
foreign import ccall "THCTensorRandom.h THCRandom_manualSeed"
c_THCRandom_manualSeed :: Ptr C'THCState -> CULong -> IO ()
foreign import ccall "THCTensorRandom.h THCRandom_manualSeedAll"
c_THCRandom_manualSeedAll :: Ptr C'THCState -> CULong -> IO ()
foreign import ccall "THCTensorRandom.h THCRandom_initialSeed"
c_THCRandom_initialSeed :: Ptr C'THCState -> IO CULong
foreign import ccall "THCTensorRandom.h THCRandom_getRNGState"
c_THCRandom_getRNGState :: Ptr C'THCState -> Ptr C'THByteTensor -> IO ()
foreign import ccall "THCTensorRandom.h THCRandom_setRNGState"
c_THCRandom_setRNGState :: Ptr C'THCState -> Ptr C'THByteTensor -> IO ()
foreign import ccall "THCTensorRandom.h &THCRandom_init"
p_THCRandom_init :: FunPtr (Ptr C'THCState -> CInt -> CInt -> IO ())
foreign import ccall "THCTensorRandom.h &THCRandom_shutdown"
p_THCRandom_shutdown :: FunPtr (Ptr C'THCState -> IO ())
foreign import ccall "THCTensorRandom.h &THCRandom_seed"
p_THCRandom_seed :: FunPtr (Ptr C'THCState -> IO CULong)
foreign import ccall "THCTensorRandom.h &THCRandom_seedAll"
p_THCRandom_seedAll :: FunPtr (Ptr C'THCState -> IO CULong)
foreign import ccall "THCTensorRandom.h &THCRandom_manualSeed"
p_THCRandom_manualSeed :: FunPtr (Ptr C'THCState -> CULong -> IO ())
foreign import ccall "THCTensorRandom.h &THCRandom_manualSeedAll"
p_THCRandom_manualSeedAll :: FunPtr (Ptr C'THCState -> CULong -> IO ())
foreign import ccall "THCTensorRandom.h &THCRandom_initialSeed"
p_THCRandom_initialSeed :: FunPtr (Ptr C'THCState -> IO CULong)
foreign import ccall "THCTensorRandom.h &THCRandom_getRNGState"
p_THCRandom_getRNGState :: FunPtr (Ptr C'THCState -> Ptr C'THByteTensor -> IO ())
foreign import ccall "THCTensorRandom.h &THCRandom_setRNGState"
p_THCRandom_setRNGState :: FunPtr (Ptr C'THCState -> Ptr C'THByteTensor -> IO ())