{-# LINE 1 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
{-# LANGUAGE Safe #-}
{-# LANGUAGE ForeignFunctionInterface #-}
module MXNet.Core.Base.Internal.Raw where
import qualified Foreign.C.String as C2HSImp
import qualified Foreign.C.Types as C2HSImp
import qualified Foreign.Ptr as C2HSImp
import Foreign.C.Types
import Foreign.Marshal.Alloc
import Foreign.Marshal.Array
import Foreign.Ptr
import Foreign.Storable
import C2HS.C.Extra.Marshal
import MXNet.Core.Internal.Types.Raw
{-# LINE 27 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
{-# LINE 32 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxGetLastError :: IO ((String))
mxGetLastError =
mxGetLastError'_ >>= \res ->
C2HSImp.peekCString res >>= \res' ->
return (res')
{-# LINE 37 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxRandomSeed :: (Int) -> IO ((Int))
mxRandomSeed a1 =
let {a1' = fromIntegral a1} in
mxRandomSeed'_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 44 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNotifyShutdown :: IO ((Int))
mxNotifyShutdown =
mxNotifyShutdown'_ >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 49 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSetProfilerConfig :: (Int)
-> (String)
-> IO ((Int))
mxSetProfilerConfig a1 a2 =
let {a1' = fromIntegral a1} in
C2HSImp.withCString a2 $ \a2' ->
mxSetProfilerConfig'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 56 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSetProfilerState :: (Int)
-> IO ((Int))
mxSetProfilerState a1 =
let {a1' = fromIntegral a1} in
mxSetProfilerState'_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 62 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxDumpProfile :: IO ((Int))
mxDumpProfile =
mxDumpProfile'_ >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 67 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayCreateNone :: IO ((Int), (NDArrayHandle))
mxNDArrayCreateNone =
alloca $ \a1' ->
mxNDArrayCreateNone'_ a1' >>= \res ->
let {res' = fromIntegral res} in
peek a1'>>= \a1'' ->
return (res', a1'')
{-# LINE 75 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayCreate :: ([MXUInt])
-> (MXUInt)
-> (Int)
-> (Int)
-> (Int)
-> IO ((Int), (NDArrayHandle))
mxNDArrayCreate a1 a2 a3 a4 a5 =
withArray a1 $ \a1' ->
let {a2' = id a2} in
let {a3' = fromIntegral a3} in
let {a4' = fromIntegral a4} in
let {a5' = fromIntegral a5} in
alloca $ \a6' ->
mxNDArrayCreate'_ a1' a2' a3' a4' a5' a6' >>= \res ->
let {res' = fromIntegral res} in
peek a6'>>= \a6'' ->
return (res', a6'')
{-# LINE 86 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayCreateEx :: ([MXUInt]) -> (MXUInt) -> (Int)
-> (Int)
-> (Int)
-> (Int)
-> IO ((Int), (NDArrayHandle))
mxNDArrayCreateEx a1 a2 a3 a4 a5 a6 =
withArray a1 $ \a1' ->
let {a2' = id a2} in
let {a3' = fromIntegral a3} in
let {a4' = fromIntegral a4} in
let {a5' = fromIntegral a5} in
let {a6' = fromIntegral a6} in
alloca $ \a7' ->
mxNDArrayCreateEx'_ a1' a2' a3' a4' a5' a6' a7' >>= \res ->
let {res' = fromIntegral res} in
peek a7'>>= \a7'' ->
return (res', a7'')
{-# LINE 98 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayLoadFromRawBytes :: (Ptr ())
-> (CSize)
-> IO ((Int), (NDArrayHandle))
mxNDArrayLoadFromRawBytes a1 a2 =
let {a1' = id a1} in
let {a2' = id a2} in
alloca $ \a3' ->
mxNDArrayLoadFromRawBytes'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peek a3'>>= \a3'' ->
return (res', a3'')
{-# LINE 105 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArraySaveRawBytes :: (NDArrayHandle)
-> IO ((Int), (CSize), (Ptr CChar))
mxNDArraySaveRawBytes a1 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
mxNDArraySaveRawBytes'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
peek a3'>>= \a3'' ->
return (res', a2'', a3'')
{-# LINE 112 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArraySave :: (String)
-> (MXUInt)
-> ([NDArrayHandle])
-> ([String])
-> IO ((Int))
mxNDArraySave a1 a2 a3 a4 =
C2HSImp.withCString a1 $ \a1' ->
let {a2' = id a2} in
withArray a3 $ \a3' ->
withStringArray a4 $ \a4' ->
mxNDArraySave'_ a1' a2' a3' a4' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 120 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayLoadImpl :: (String)
-> IO ((Int), (MXUInt), (Ptr NDArrayHandle), (MXUInt), (Ptr (Ptr CChar)))
mxNDArrayLoadImpl a1 =
C2HSImp.withCString a1 $ \a1' ->
alloca $ \a2' ->
alloca $ \a3' ->
alloca $ \a4' ->
alloca $ \a5' ->
mxNDArrayLoadImpl'_ a1' a2' a3' a4' a5' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
peek a3'>>= \a3'' ->
peek a4'>>= \a4'' ->
peek a5'>>= \a5'' ->
return (res', a2'', a3'', a4'', a5'')
{-# LINE 128 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayLoad :: String
-> IO (Int,
MXUInt, [NDArrayHandle],
MXUInt, [String])
mxNDArrayLoad fname = do
(res, c1, p1, c2, p2) <- mxNDArrayLoadImpl fname
handles <- peekArray (fromIntegral c1) p1
names <- peekStringArray c2 p2
return (res, c1, handles, c2, names)
mxNDArraySyncCopyFromCPU :: (NDArrayHandle)
-> (Ptr ())
-> (CSize)
-> IO ((Int))
mxNDArraySyncCopyFromCPU a1 a2 a3 =
let {a1' = id a1} in
let {a2' = id a2} in
let {a3' = id a3} in
mxNDArraySyncCopyFromCPU'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 150 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArraySyncCopyToCPU :: (NDArrayHandle)
-> (Ptr ())
-> (CSize)
-> IO ((Int))
mxNDArraySyncCopyToCPU a1 a2 a3 =
let {a1' = id a1} in
let {a2' = id a2} in
let {a3' = id a3} in
mxNDArraySyncCopyToCPU'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 157 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayWaitToRead :: (NDArrayHandle) -> IO ((Int))
mxNDArrayWaitToRead a1 =
let {a1' = id a1} in
mxNDArrayWaitToRead'_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 162 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayWaitToWrite :: (NDArrayHandle) -> IO ((Int))
mxNDArrayWaitToWrite a1 =
let {a1' = id a1} in
mxNDArrayWaitToWrite'_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 167 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayWaitAll :: IO ((Int))
mxNDArrayWaitAll =
mxNDArrayWaitAll'_ >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 172 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayFree :: (NDArrayHandle) -> IO ((Int))
mxNDArrayFree a1 =
let {a1' = id a1} in
mxNDArrayFree'_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 177 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArraySlice :: (NDArrayHandle)
-> (MXUInt)
-> (MXUInt)
-> IO ((Int), (NDArrayHandle))
mxNDArraySlice a1 a2 a3 =
let {a1' = id a1} in
let {a2' = id a2} in
let {a3' = id a3} in
alloca $ \a4' ->
mxNDArraySlice'_ a1' a2' a3' a4' >>= \res ->
let {res' = fromIntegral res} in
peek a4'>>= \a4'' ->
return (res', a4'')
{-# LINE 186 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayAt :: (NDArrayHandle)
-> (MXUInt)
-> IO ((Int), (NDArrayHandle))
mxNDArrayAt a1 a2 =
let {a1' = id a1} in
let {a2' = id a2} in
alloca $ \a3' ->
mxNDArrayAt'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peek a3'>>= \a3'' ->
return (res', a3'')
{-# LINE 194 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayReshape :: (NDArrayHandle)
-> (Int)
-> ([Int])
-> IO ((Int), (NDArrayHandle))
mxNDArrayReshape a1 a2 a3 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
withIntegralArray a3 $ \a3' ->
alloca $ \a4' ->
mxNDArrayReshape'_ a1' a2' a3' a4' >>= \res ->
let {res' = fromIntegral res} in
peek a4'>>= \a4'' ->
return (res', a4'')
{-# LINE 203 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayGetShapeImpl :: (NDArrayHandle) -> IO ((Int), (MXUInt), (Ptr MXUInt))
mxNDArrayGetShapeImpl a1 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
mxNDArrayGetShapeImpl'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
peek a3'>>= \a3'' ->
return (res', a2'', a3'')
{-# LINE 209 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayGetShape :: NDArrayHandle
-> IO (Int, MXUInt, [MXUInt])
mxNDArrayGetShape handle = do
(res, d, p) <- mxNDArrayGetShapeImpl handle
shapes <- peekArray (fromIntegral d) p
return (res, d, shapes)
mxNDArrayGetData :: (NDArrayHandle)
-> IO ((Int), (Ptr MXFloat))
mxNDArrayGetData a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxNDArrayGetData'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 224 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayGetDType :: (NDArrayHandle)
-> IO ((Int), (Int))
mxNDArrayGetDType a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxNDArrayGetDType'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peekIntegral a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 231 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxNDArrayGetContext :: (NDArrayHandle)
-> IO ((Int), (Int), (Int))
mxNDArrayGetContext a1 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
mxNDArrayGetContext'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peekIntegral a2'>>= \a2'' ->
peekIntegral a3'>>= \a3'' ->
return (res', a2'', a3'')
{-# LINE 239 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxListFunctionsImpl :: IO ((Int), (MXUInt), (Ptr FunctionHandle))
mxListFunctionsImpl =
alloca $ \a1' ->
alloca $ \a2' ->
mxListFunctionsImpl'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a1'>>= \a1'' ->
peek a2'>>= \a2'' ->
return (res', a1'', a2'')
{-# LINE 246 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxListFunctions :: IO (Int, MXUInt, [FunctionHandle])
mxListFunctions = do
(res, c, p) <- mxListFunctionsImpl
fs <- peekArray (fromIntegral c) p
return (res, c, fs)
mxGetFunction :: (String)
-> IO ((Int), (FunctionHandle))
mxGetFunction a1 =
C2HSImp.withCString a1 $ \a1' ->
alloca $ \a2' ->
mxGetFunction'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 260 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxFuncGetInfoImpl :: (FunctionHandle) -> IO ((Int), (String), (String), (MXUInt), (Ptr (Ptr CChar)), (Ptr (Ptr CChar)), (Ptr (Ptr CChar)), (String))
mxFuncGetInfoImpl a1 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
alloca $ \a4' ->
alloca $ \a5' ->
alloca $ \a6' ->
alloca $ \a7' ->
alloca $ \a8' ->
mxFuncGetInfoImpl'_ a1' a2' a3' a4' a5' a6' a7' a8' >>= \res ->
let {res' = fromIntegral res} in
peekString a2'>>= \a2'' ->
peekString a3'>>= \a3'' ->
peek a4'>>= \a4'' ->
peek a5'>>= \a5'' ->
peek a6'>>= \a6'' ->
peek a7'>>= \a7'' ->
peekString a8'>>= \a8'' ->
return (res', a2'', a3'', a4'', a5'', a6'', a7'', a8'')
{-# LINE 271 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxFuncGetInfo :: FunctionHandle
-> IO (Int,
String, String,
MXUInt,
[String], [String], [String],
String)
mxFuncGetInfo handle = do
(res, name, desc, argc, argv, argtype, argdesc, rettype) <- mxFuncGetInfoImpl handle
argv' <- peekStringArray argc argv
argtype' <- peekStringArray argc argtype
argdesc' <- peekStringArray argc argdesc
return (res, name, desc, argc, argv', argtype', argdesc', rettype)
mxFuncDescribe :: (FunctionHandle) -> IO ((Int), (MXUInt), (MXUInt), (MXUInt), (Int))
mxFuncDescribe a1 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
alloca $ \a4' ->
alloca $ \a5' ->
mxFuncDescribe'_ a1' a2' a3' a4' a5' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
peek a3'>>= \a3'' ->
peek a4'>>= \a4'' ->
peekIntegral a5'>>= \a5'' ->
return (res', a2'', a3'', a4'', a5'')
{-# LINE 300 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxFuncInvoke :: (FunctionHandle)
-> ([NDArrayHandle])
-> ([MXFloat])
-> ([NDArrayHandle])
-> IO ((Int))
mxFuncInvoke a1 a2 a3 a4 =
let {a1' = id a1} in
withArray a2 $ \a2' ->
withArray a3 $ \a3' ->
withArray a4 $ \a4' ->
mxFuncInvoke'_ a1' a2' a3' a4' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 309 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxFuncInvokeEx :: (FunctionHandle)
-> ([NDArrayHandle])
-> ([MXFloat])
-> ([NDArrayHandle])
-> (Int)
-> ([String])
-> ([String])
-> IO ((Int))
mxFuncInvokeEx a1 a2 a3 a4 a5 a6 a7 =
let {a1' = id a1} in
withArray a2 $ \a2' ->
withArray a3 $ \a3' ->
withArray a4 $ \a4' ->
let {a5' = fromIntegral a5} in
withStringArray a6 $ \a6' ->
withStringArray a7 $ \a7' ->
mxFuncInvokeEx'_ a1' a2' a3' a4' a5' a6' a7' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 321 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxImperativeInvoke = undefined
mxSymbolListAtomicSymbolCreatorsImpl :: IO ((Int), (MXUInt), (Ptr AtomicSymbolCreator))
mxSymbolListAtomicSymbolCreatorsImpl =
alloca $ \a1' ->
alloca $ \a2' ->
mxSymbolListAtomicSymbolCreatorsImpl'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a1'>>= \a1'' ->
peek a2'>>= \a2'' ->
return (res', a1'', a2'')
{-# LINE 331 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolListAtomicSymbolCreators
:: IO (Int, MXUInt, [AtomicSymbolCreator])
mxSymbolListAtomicSymbolCreators = do
(res, n, p) <- mxSymbolListAtomicSymbolCreatorsImpl
ss <- peekArray (fromIntegral n) p
return (res, n, ss)
mxSymbolGetAtomicSymbolName :: (AtomicSymbolCreator) -> IO ((Int), (String))
mxSymbolGetAtomicSymbolName a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxSymbolGetAtomicSymbolName'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peekString a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 347 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolGetAtomicSymbolInfoImpl :: (AtomicSymbolCreator) -> ([String]) -> IO ((Int), (String), (String), (MXUInt), (Ptr (Ptr CChar)), (Ptr (Ptr CChar)), (Ptr (Ptr CChar)), (String))
mxSymbolGetAtomicSymbolInfoImpl a1 a8 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
alloca $ \a4' ->
alloca $ \a5' ->
alloca $ \a6' ->
alloca $ \a7' ->
withStringArray a8 $ \a8' ->
alloca $ \a9' ->
mxSymbolGetAtomicSymbolInfoImpl'_ a1' a2' a3' a4' a5' a6' a7' a8' a9' >>= \res ->
let {res' = fromIntegral res} in
peekString a2'>>= \a2'' ->
peekString a3'>>= \a3'' ->
peek a4'>>= \a4'' ->
peek a5'>>= \a5'' ->
peek a6'>>= \a6'' ->
peek a7'>>= \a7'' ->
peekString a9'>>= \a9'' ->
return (res', a2'', a3'', a4'', a5'', a6'', a7'', a9'')
{-# LINE 359 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolGetAtomicSymbolInfo
:: AtomicSymbolCreator
-> [String]
-> IO (Int, String, String, MXUInt,
[String], [String], [String],
String)
mxSymbolGetAtomicSymbolInfo creator kargs = do
(res, name, desc, argc, argv, argtype, argdesc, rettype) <- mxSymbolGetAtomicSymbolInfoImpl creator kargs
argv' <- peekStringArray argc argv
argtype' <- peekStringArray argc argtype
argdesc' <- peekStringArray argc argdesc
return (res, name, desc, argc, argv', argtype', argdesc', rettype)
mxSymbolCreateAtomicSymbol :: (AtomicSymbolCreator)
-> (MXUInt)
-> ([String])
-> ([String])
-> IO ((Int), (SymbolHandle))
mxSymbolCreateAtomicSymbol a1 a2 a3 a4 =
let {a1' = id a1} in
let {a2' = id a2} in
withStringArray a3 $ \a3' ->
withStringArray a4 $ \a4' ->
alloca $ \a5' ->
mxSymbolCreateAtomicSymbol'_ a1' a2' a3' a4' a5' >>= \res ->
let {res' = fromIntegral res} in
peek a5'>>= \a5'' ->
return (res', a5'')
{-# LINE 387 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolCreateVariable :: (String)
-> IO ((Int), (SymbolHandle))
mxSymbolCreateVariable a1 =
C2HSImp.withCString a1 $ \a1' ->
alloca $ \a2' ->
mxSymbolCreateVariable'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 394 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolCreateGroup :: (MXUInt)
-> ([SymbolHandle]) -> IO ((Int), (SymbolHandle))
mxSymbolCreateGroup a1 a2 =
let {a1' = id a1} in
withArray a2 $ \a2' ->
alloca $ \a3' ->
mxSymbolCreateGroup'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peek a3'>>= \a3'' ->
return (res', a3'')
{-# LINE 402 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolCreateFromFile :: (String)
-> IO ((Int), (SymbolHandle))
mxSymbolCreateFromFile a1 =
C2HSImp.withCString a1 $ \a1' ->
alloca $ \a2' ->
mxSymbolCreateFromFile'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 408 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolCreateFromJSON :: (String)
-> IO ((Int), (SymbolHandle))
mxSymbolCreateFromJSON a1 =
C2HSImp.withCString a1 $ \a1' ->
alloca $ \a2' ->
mxSymbolCreateFromJSON'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 414 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolSaveToFile :: (SymbolHandle)
-> (String)
-> IO ((Int))
mxSymbolSaveToFile a1 a2 =
let {a1' = id a1} in
C2HSImp.withCString a2 $ \a2' ->
mxSymbolSaveToFile'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 420 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolSaveToJSON :: (SymbolHandle)
-> IO ((Int), (String))
mxSymbolSaveToJSON a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxSymbolSaveToJSON'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peekString a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 427 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolFree :: (SymbolHandle) -> IO ((Int))
mxSymbolFree a1 =
let {a1' = id a1} in
mxSymbolFree'_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 432 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolCopy :: (SymbolHandle) -> IO ((Int), (SymbolHandle))
mxSymbolCopy a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxSymbolCopy'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 438 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolPrint :: (SymbolHandle)
-> IO ((Int), (String))
mxSymbolPrint a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxSymbolPrint'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peekString a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 444 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolGetName :: (SymbolHandle) -> IO ((Int), (String), (Int))
mxSymbolGetName a1 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
mxSymbolGetName'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peekString a2'>>= \a2'' ->
peekIntegral a3'>>= \a3'' ->
return (res', a2'', a3'')
{-# LINE 452 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolGetAttr :: (SymbolHandle)
-> (String)
-> IO ((Int), (String), (Int))
mxSymbolGetAttr a1 a2 =
let {a1' = id a1} in
C2HSImp.withCString a2 $ \a2' ->
alloca $ \a3' ->
alloca $ \a4' ->
mxSymbolGetAttr'_ a1' a2' a3' a4' >>= \res ->
let {res' = fromIntegral res} in
peekString a3'>>= \a3'' ->
peekIntegral a4'>>= \a4'' ->
return (res', a3'', a4'')
{-# LINE 461 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolSetAttr :: (SymbolHandle)
-> (String)
-> (String)
-> IO ((Int))
mxSymbolSetAttr a1 a2 a3 =
let {a1' = id a1} in
C2HSImp.withCString a2 $ \a2' ->
C2HSImp.withCString a3 $ \a3' ->
mxSymbolSetAttr'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 469 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolListAttrImpl :: (SymbolHandle) -> IO ((Int), (MXUInt), (Ptr (Ptr CChar)))
mxSymbolListAttrImpl a1 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
mxSymbolListAttrImpl'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peekIntegral a2'>>= \a2'' ->
peek a3'>>= \a3'' ->
return (res', a2'', a3'')
{-# LINE 475 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolListAttr :: SymbolHandle
-> IO (Int, MXUInt, [String])
mxSymbolListAttr symbol = do
(res, n, p) <- mxSymbolListAttrImpl symbol
ss <- peekStringArray n p
return (res, n, ss)
mxSymbolListAttrShallowImpl :: (SymbolHandle) -> IO ((Int), (MXUInt), (Ptr (Ptr CChar)))
mxSymbolListAttrShallowImpl a1 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
mxSymbolListAttrShallowImpl'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
peek a3'>>= \a3'' ->
return (res', a2'', a3'')
{-# LINE 490 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolListAttrShallow :: SymbolHandle
-> IO (Int, MXUInt, [String])
mxSymbolListAttrShallow symbol = do
(res, n, p) <- mxSymbolListAttrShallowImpl symbol
ss <- peekStringArray n p
return (res, n, ss)
mxSymbolListArgumentsImpl :: (SymbolHandle) -> IO ((Int), (MXUInt), (Ptr (Ptr CChar)))
mxSymbolListArgumentsImpl a1 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
mxSymbolListArgumentsImpl'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
peek a3'>>= \a3'' ->
return (res', a2'', a3'')
{-# LINE 505 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolListArguments :: SymbolHandle
-> IO (Int, MXUInt, [String])
mxSymbolListArguments symbol = do
(res, n, p) <- mxSymbolListArgumentsImpl symbol
ss <- peekStringArray n p
return (res, n, ss)
mxSymbolListOutputsImpl :: (SymbolHandle) -> IO ((Int), (MXUInt), (Ptr (Ptr CChar)))
mxSymbolListOutputsImpl a1 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
mxSymbolListOutputsImpl'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
peek a3'>>= \a3'' ->
return (res', a2'', a3'')
{-# LINE 520 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolListOutputs :: SymbolHandle
-> IO (Int, MXUInt, [String])
mxSymbolListOutputs symbol = do
(res, n, p) <- mxSymbolListOutputsImpl symbol
ss <- peekStringArray n p
return (res, n, ss)
mxSymbolGetInternals :: (SymbolHandle) -> IO ((Int), (SymbolHandle))
mxSymbolGetInternals a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxSymbolGetInternals'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 536 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolGetOutput :: (SymbolHandle)
-> (MXUInt)
-> IO ((Int), (SymbolHandle))
mxSymbolGetOutput a1 a2 =
let {a1' = id a1} in
let {a2' = id a2} in
alloca $ \a3' ->
mxSymbolGetOutput'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peek a3'>>= \a3'' ->
return (res', a3'')
{-# LINE 544 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolListAuxiliaryStatesImpl :: (SymbolHandle) -> IO ((Int), (MXUInt), (Ptr (Ptr CChar)))
mxSymbolListAuxiliaryStatesImpl a1 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
mxSymbolListAuxiliaryStatesImpl'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
peek a3'>>= \a3'' ->
return (res', a2'', a3'')
{-# LINE 550 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolListAuxiliaryStates
:: SymbolHandle
-> IO (Int, MXUInt, [String])
mxSymbolListAuxiliaryStates symbol = do
(res, n, p) <- mxSymbolListAuxiliaryStatesImpl symbol
ss <- peekStringArray n p
return (res, n, ss)
mxSymbolCompose :: (SymbolHandle)
-> (String)
-> (MXUInt)
-> ([String])
-> ([SymbolHandle])
-> IO ((Int))
mxSymbolCompose a1 a2 a3 a4 a5 =
let {a1' = id a1} in
C2HSImp.withCString a2 $ \a2' ->
let {a3' = id a3} in
withStringArray a4 $ \a4' ->
withArray a5 $ \a5' ->
mxSymbolCompose'_ a1' a2' a3' a4' a5' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 568 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolGrad :: (SymbolHandle)
-> (MXUInt)
-> ([String])
-> IO ((Int), (SymbolHandle))
mxSymbolGrad a1 a2 a3 =
let {a1' = id a1} in
let {a2' = id a2} in
withStringArray a3 $ \a3' ->
alloca $ \a4' ->
mxSymbolGrad'_ a1' a2' a3' a4' >>= \res ->
let {res' = fromIntegral res} in
peek a4'>>= \a4'' ->
return (res', a4'')
{-# LINE 577 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolInferShapeImpl :: (SymbolHandle) -> (MXUInt) -> ([String]) -> (Ptr MXUInt) -> (Ptr MXUInt) -> IO ((Int), (MXUInt), (Ptr MXUInt), (Ptr (Ptr MXUInt)), (MXUInt), (Ptr MXUInt), (Ptr (Ptr MXUInt)), (MXUInt), (Ptr MXUInt), (Ptr (Ptr MXUInt)), (Int))
mxSymbolInferShapeImpl a1 a2 a3 a4 a5 =
let {a1' = id a1} in
let {a2' = id a2} in
withStringArray a3 $ \a3' ->
let {a4' = id a4} in
let {a5' = id a5} in
alloca $ \a6' ->
alloca $ \a7' ->
alloca $ \a8' ->
alloca $ \a9' ->
alloca $ \a10' ->
alloca $ \a11' ->
alloca $ \a12' ->
alloca $ \a13' ->
alloca $ \a14' ->
alloca $ \a15' ->
mxSymbolInferShapeImpl'_ a1' a2' a3' a4' a5' a6' a7' a8' a9' a10' a11' a12' a13' a14' a15' >>= \res ->
let {res' = fromIntegral res} in
peek a6'>>= \a6'' ->
peek a7'>>= \a7'' ->
peek a8'>>= \a8'' ->
peek a9'>>= \a9'' ->
peek a10'>>= \a10'' ->
peek a11'>>= \a11'' ->
peek a12'>>= \a12'' ->
peek a13'>>= \a13'' ->
peek a14'>>= \a14'' ->
peekIntegral a15'>>= \a15'' ->
return (res', a6'', a7'', a8'', a9'', a10'', a11'', a12'', a13'', a14'', a15'')
{-# LINE 595 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolInferShape :: SymbolHandle
-> MXUInt
-> [String]
-> Ptr MXUInt
-> Ptr MXUInt
-> IO (Int,
(MXUInt, [MXUInt], [Ptr MXUInt]),
(MXUInt, [MXUInt], [Ptr MXUInt]),
(MXUInt, [MXUInt], [Ptr MXUInt]),
Int)
mxSymbolInferShape sym argc keys indptr shapedata = do
(res, in_size, in_ndim, in_data, out_size, out_ndim, out_data, aux_size, aux_ndim, aux_data, success) <- mxSymbolInferShapeImpl sym argc keys indptr shapedata
in_ndim' <- peekArray (fromIntegral in_size) in_ndim
in_data' <- peekArray (fromIntegral in_size) in_data
out_ndim' <- peekArray (fromIntegral out_size) out_ndim
out_data' <- peekArray (fromIntegral out_size) out_data
aux_ndim' <- peekArray (fromIntegral aux_size) aux_ndim
aux_data' <- peekArray (fromIntegral aux_size) aux_data
return (res, (in_size, in_ndim', in_data'), (out_size, out_ndim', out_data'), (aux_size, aux_ndim', aux_data'), success)
mxSymbolInferShapePartialImpl :: (SymbolHandle) -> (MXUInt) -> ([String]) -> (Ptr MXUInt) -> (Ptr MXUInt) -> IO ((Int), (MXUInt), (Ptr MXUInt), (Ptr (Ptr MXUInt)), (MXUInt), (Ptr MXUInt), (Ptr (Ptr MXUInt)), (MXUInt), (Ptr MXUInt), (Ptr (Ptr MXUInt)), (Int))
mxSymbolInferShapePartialImpl a1 a2 a3 a4 a5 =
let {a1' = id a1} in
let {a2' = id a2} in
withStringArray a3 $ \a3' ->
let {a4' = id a4} in
let {a5' = id a5} in
alloca $ \a6' ->
alloca $ \a7' ->
alloca $ \a8' ->
alloca $ \a9' ->
alloca $ \a10' ->
alloca $ \a11' ->
alloca $ \a12' ->
alloca $ \a13' ->
alloca $ \a14' ->
alloca $ \a15' ->
mxSymbolInferShapePartialImpl'_ a1' a2' a3' a4' a5' a6' a7' a8' a9' a10' a11' a12' a13' a14' a15' >>= \res ->
let {res' = fromIntegral res} in
peek a6'>>= \a6'' ->
peek a7'>>= \a7'' ->
peek a8'>>= \a8'' ->
peek a9'>>= \a9'' ->
peek a10'>>= \a10'' ->
peek a11'>>= \a11'' ->
peek a12'>>= \a12'' ->
peek a13'>>= \a13'' ->
peek a14'>>= \a14'' ->
peekIntegral a15'>>= \a15'' ->
return (res', a6'', a7'', a8'', a9'', a10'', a11'', a12'', a13'', a14'', a15'')
{-# LINE 639 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxSymbolInferShapePartial
:: SymbolHandle
-> MXUInt
-> [String]
-> Ptr MXUInt
-> Ptr MXUInt
-> IO (Int,
(MXUInt, [MXUInt], [Ptr MXUInt]),
(MXUInt, [MXUInt], [Ptr MXUInt]),
(MXUInt, [MXUInt], [Ptr MXUInt]),
Int)
mxSymbolInferShapePartial sym argc keys indptr shapedata = do
(res, in_size, in_ndim, in_data, out_size, out_ndim, out_data, aux_size, aux_ndim, aux_data, success) <- mxSymbolInferShapePartialImpl sym argc keys indptr shapedata
in_ndim' <- peekArray (fromIntegral in_size) in_ndim
in_data' <- peekArray (fromIntegral in_size) in_data
out_ndim' <- peekArray (fromIntegral out_size) out_ndim
out_data' <- peekArray (fromIntegral out_size) out_data
aux_ndim' <- peekArray (fromIntegral aux_size) aux_ndim
aux_data' <- peekArray (fromIntegral aux_size) aux_data
return (res, (in_size, in_ndim', in_data'), (out_size, out_ndim', out_data'), (aux_size, aux_ndim', aux_data'), success)
mxSymbolInferType :: (SymbolHandle)
-> (MXUInt)
-> ([String])
-> (Ptr CInt)
-> IO ((Int), (MXUInt), (MXUInt), (MXUInt), (Int))
mxSymbolInferType a1 a2 a3 a4 =
let {a1' = id a1} in
let {a2' = id a2} in
withStringArray a3 $ \a3' ->
let {a4' = id a4} in
alloca $ \a5' ->
alloca $ \a6' ->
alloca $ \a7' ->
alloca $ \a8' ->
alloca $ \a9' ->
alloca $ \a10' ->
alloca $ \a11' ->
mxSymbolInferType'_ a1' a2' a3' a4' a5' a6' a7' a8' a9' a10' a11' >>= \res ->
let {res' = fromIntegral res} in
peek a5'>>= \a5'' ->
peek a7'>>= \a7'' ->
peek a9'>>= \a9'' ->
peekIntegral a11'>>= \a11'' ->
return (res', a5'', a7'', a9'', a11'')
{-# LINE 683 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxExecutorFree :: (ExecutorHandle)
-> IO ((Int))
mxExecutorFree a1 =
let {a1' = id a1} in
mxExecutorFree'_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 690 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxExecutorPrint :: (ExecutorHandle)
-> IO ((Int), (String))
mxExecutorPrint a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxExecutorPrint'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peekString a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 696 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxExecutorForward :: (ExecutorHandle)
-> (Int)
-> IO ((Int))
mxExecutorForward a1 a2 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
mxExecutorForward'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 703 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxExecutorBackward :: (ExecutorHandle)
-> (MXUInt)
-> ([NDArrayHandle])
-> IO ((Int))
mxExecutorBackward a1 a2 a3 =
let {a1' = id a1} in
let {a2' = id a2} in
withArray a3 $ \a3' ->
mxExecutorBackward'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 710 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxExecutorOutputsImpl :: (ExecutorHandle)
-> IO ((Int), (MXUInt), (Ptr NDArrayHandle))
mxExecutorOutputsImpl a1 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
mxExecutorOutputsImpl'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
peek a3'>>= \a3'' ->
return (res', a2'', a3'')
{-# LINE 716 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxExecutorOutputs :: ExecutorHandle
-> IO (Int, [NDArrayHandle])
mxExecutorOutputs handle = do
(r, c, p) <- mxExecutorOutputsImpl handle
handles <- peekArray (fromIntegral c) p
return (r, handles)
mxExecutorBind :: (SymbolHandle)
-> (Int)
-> (Int)
-> (MXUInt)
-> ([NDArrayHandle])
-> ([NDArrayHandle])
-> ([MXUInt])
-> (MXUInt)
-> ([NDArrayHandle])
-> IO ((Int), (ExecutorHandle))
mxExecutorBind a1 a2 a3 a4 a5 a6 a7 a8 a9 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
let {a3' = fromIntegral a3} in
let {a4' = id a4} in
withArray a5 $ \a5' ->
withArray a6 $ \a6' ->
withArray a7 $ \a7' ->
let {a8' = id a8} in
withArray a9 $ \a9' ->
alloca $ \a10' ->
mxExecutorBind'_ a1' a2' a3' a4' a5' a6' a7' a8' a9' a10' >>= \res ->
let {res' = fromIntegral res} in
peek a10'>>= \a10'' ->
return (res', a10'')
{-# LINE 738 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxExecutorBindX :: (SymbolHandle)
-> (Int)
-> (Int)
-> (MXUInt)
-> ([String])
-> ([Int])
-> ([Int])
-> (MXUInt)
-> ([NDArrayHandle])
-> ([NDArrayHandle])
-> ([MXUInt])
-> (MXUInt)
-> ([NDArrayHandle])
-> IO ((Int), (ExecutorHandle))
mxExecutorBindX a1 a2 a3 a4 a5 a6 a7 a8 a9 a10 a11 a12 a13 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
let {a3' = fromIntegral a3} in
let {a4' = id a4} in
withStringArray a5 $ \a5' ->
withIntegralArray a6 $ \a6' ->
withIntegralArray a7 $ \a7' ->
let {a8' = id a8} in
withArray a9 $ \a9' ->
withArray a10 $ \a10' ->
withArray a11 $ \a11' ->
let {a12' = id a12} in
withArray a13 $ \a13' ->
alloca $ \a14' ->
mxExecutorBindX'_ a1' a2' a3' a4' a5' a6' a7' a8' a9' a10' a11' a12' a13' a14' >>= \res ->
let {res' = fromIntegral res} in
peek a14'>>= \a14'' ->
return (res', a14'')
{-# LINE 757 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxExecutorBindEX :: (SymbolHandle)
-> (Int)
-> (Int)
-> (MXUInt)
-> ([String])
-> ([Int])
-> ([Int])
-> (MXUInt)
-> ([NDArrayHandle])
-> ([NDArrayHandle])
-> ([MXUInt])
-> (MXUInt)
-> ([NDArrayHandle])
-> (ExecutorHandle)
-> IO ((Int), (ExecutorHandle))
mxExecutorBindEX a1 a2 a3 a4 a5 a6 a7 a8 a9 a10 a11 a12 a13 a14 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
let {a3' = fromIntegral a3} in
let {a4' = id a4} in
withStringArray a5 $ \a5' ->
withIntegralArray a6 $ \a6' ->
withIntegralArray a7 $ \a7' ->
let {a8' = id a8} in
withArray a9 $ \a9' ->
withArray a10 $ \a10' ->
withArray a11 $ \a11' ->
let {a12' = id a12} in
withArray a13 $ \a13' ->
let {a14' = id a14} in
alloca $ \a15' ->
mxExecutorBindEX'_ a1' a2' a3' a4' a5' a6' a7' a8' a9' a10' a11' a12' a13' a14' a15' >>= \res ->
let {res' = fromIntegral res} in
peek a15'>>= \a15'' ->
return (res', a15'')
{-# LINE 777 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxExecutorSetMonitorCallback :: (ExecutorHandle)
-> (ExecutorMonitorCallback) -> (Ptr ()) -> IO ((Int))
mxExecutorSetMonitorCallback a1 a2 a3 =
let {a1' = id a1} in
let {a2' = id a2} in
let {a3' = id a3} in
mxExecutorSetMonitorCallback'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 784 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxListDataItersImpl :: IO ((Int), (MXUInt), (Ptr DataIterCreator))
mxListDataItersImpl =
alloca $ \a1' ->
alloca $ \a2' ->
mxListDataItersImpl'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a1'>>= \a1'' ->
peek a2'>>= \a2'' ->
return (res', a1'', a2'')
{-# LINE 791 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxListDataIters :: IO (Int, [DataIterCreator])
mxListDataIters = do
(res, c, p) <- mxListDataItersImpl
creators <- peekArray (fromIntegral c) p
return (res, creators)
mxDataIterCreateIter :: (DataIterCreator)
-> (MXUInt)
-> ([String])
-> ([String])
-> IO ((Int), (DataIterHandle))
mxDataIterCreateIter a1 a2 a3 a4 =
let {a1' = id a1} in
let {a2' = id a2} in
withStringArray a3 $ \a3' ->
withStringArray a4 $ \a4' ->
alloca $ \a5' ->
mxDataIterCreateIter'_ a1' a2' a3' a4' a5' >>= \res ->
let {res' = fromIntegral res} in
peek a5'>>= \a5'' ->
return (res', a5'')
{-# LINE 807 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxDataIterGetIterInfoImpl :: (DataIterCreator)
-> IO ((Int), (String), (String), (MXUInt), (Ptr (Ptr CChar)), (Ptr (Ptr CChar)), (Ptr (Ptr CChar)))
mxDataIterGetIterInfoImpl a1 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
alloca $ \a4' ->
alloca $ \a5' ->
alloca $ \a6' ->
alloca $ \a7' ->
mxDataIterGetIterInfoImpl'_ a1' a2' a3' a4' a5' a6' a7' >>= \res ->
let {res' = fromIntegral res} in
peekString a2'>>= \a2'' ->
peekString a3'>>= \a3'' ->
peek a4'>>= \a4'' ->
peek a5'>>= \a5'' ->
peek a6'>>= \a6'' ->
peek a7'>>= \a7'' ->
return (res', a2'', a3'', a4'', a5'', a6'', a7'')
{-# LINE 817 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxDataIterGetIterInfo :: DataIterCreator
-> IO (Int, String, String,
MXUInt,
[String], [String], [String])
mxDataIterGetIterInfo creator = do
(res, name, desc, argc, argv, argtype, argdesc) <- mxDataIterGetIterInfoImpl creator
argv' <- peekStringArray argc argv
argtype' <- peekStringArray argc argtype
argdesc' <- peekStringArray argc argdesc
return (res, name, desc, argc, argv', argtype', argdesc')
mxDataIterFree :: (DataIterHandle)
-> IO ((Int))
mxDataIterFree a1 =
let {a1' = id a1} in
mxDataIterFree'_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 841 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxDataIterNext :: (DataIterHandle)
-> IO ((Int), (Int))
mxDataIterNext a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxDataIterNext'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peekIntegral a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 847 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxDataIterBeforeFirst :: (DataIterHandle)
-> IO ((Int))
mxDataIterBeforeFirst a1 =
let {a1' = id a1} in
mxDataIterBeforeFirst'_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 852 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxDataIterGetData :: (DataIterHandle)
-> IO ((Int), (NDArrayHandle))
mxDataIterGetData a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxDataIterGetData'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 858 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxDataIterGetIndexImpl :: (DataIterHandle)
-> IO ((Int), (Ptr CULong), (CULong))
mxDataIterGetIndexImpl a1 =
let {a1' = id a1} in
alloca $ \a2' ->
alloca $ \a3' ->
mxDataIterGetIndexImpl'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
peekIntegral a3'>>= \a3'' ->
return (res', a2'', a3'')
{-# LINE 872 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxDataIterGetIndex :: DataIterHandle
-> IO (Int, [CULong])
mxDataIterGetIndex creator = do
(res, p, c) <- mxDataIterGetIndexImpl creator
indices <- peekArray (fromIntegral c) p
return (res, indices)
mxDataIterGetPadNum :: (DataIterHandle)
-> IO ((Int), (Int))
mxDataIterGetPadNum a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxDataIterGetPadNum'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peekIntegral a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 890 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxDataIterGetLabel :: (DataIterHandle)
-> IO ((Int), (NDArrayHandle))
mxDataIterGetLabel a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxDataIterGetLabel'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 896 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxInitPSEnv :: (MXUInt)
-> ([String])
-> ([String])
-> IO ((Int))
mxInitPSEnv a1 a2 a3 =
let {a1' = id a1} in
withStringArray a2 $ \a2' ->
withStringArray a3 $ \a3' ->
mxInitPSEnv'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 905 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStoreCreate :: (String)
-> IO ((Int), (KVStoreHandle))
mxKVStoreCreate a1 =
C2HSImp.withCString a1 $ \a1' ->
alloca $ \a2' ->
mxKVStoreCreate'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 911 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStoreFree :: (KVStoreHandle)
-> IO ((Int))
mxKVStoreFree a1 =
let {a1' = id a1} in
mxKVStoreFree'_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 916 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStoreInit :: (KVStoreHandle)
-> (MXUInt)
-> ([Int])
-> ([NDArrayHandle])
-> IO ((Int))
mxKVStoreInit a1 a2 a3 a4 =
let {a1' = id a1} in
let {a2' = id a2} in
withIntegralArray a3 $ \a3' ->
withArray a4 $ \a4' ->
mxKVStoreInit'_ a1' a2' a3' a4' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 924 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStorePush :: (KVStoreHandle)
-> (MXUInt)
-> ([Int])
-> ([NDArrayHandle])
-> (Int)
-> IO ((Int))
mxKVStorePush a1 a2 a3 a4 a5 =
let {a1' = id a1} in
let {a2' = id a2} in
withIntegralArray a3 $ \a3' ->
withArray a4 $ \a4' ->
let {a5' = fromIntegral a5} in
mxKVStorePush'_ a1' a2' a3' a4' a5' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 933 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStorePull :: (KVStoreHandle)
-> (MXUInt)
-> ([Int])
-> ([NDArrayHandle])
-> (Int)
-> IO ((Int))
mxKVStorePull a1 a2 a3 a4 a5 =
let {a1' = id a1} in
let {a2' = id a2} in
withIntegralArray a3 $ \a3' ->
withArray a4 $ \a4' ->
let {a5' = fromIntegral a5} in
mxKVStorePull'_ a1' a2' a3' a4' a5' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 942 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStoreSetUpdater = undefined
mxKVStoreGetType :: (KVStoreHandle)
-> IO ((Int), (String))
mxKVStoreGetType a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxKVStoreGetType'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peekString a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 957 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStoreGetRank :: (KVStoreHandle)
-> IO ((Int), (Int))
mxKVStoreGetRank a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxKVStoreGetRank'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peekIntegral a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 965 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStoreGetGroupSize :: (KVStoreHandle)
-> IO ((Int), (Int))
mxKVStoreGetGroupSize a1 =
let {a1' = id a1} in
alloca $ \a2' ->
mxKVStoreGetGroupSize'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peekIntegral a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 975 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStoreIsWorkerNode :: IO ((Int), (Int))
mxKVStoreIsWorkerNode =
alloca $ \a1' ->
mxKVStoreIsWorkerNode'_ a1' >>= \res ->
let {res' = fromIntegral res} in
peekIntegral a1'>>= \a1'' ->
return (res', a1'')
{-# LINE 980 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStoreIsServerNode :: IO ((Int), (Int))
mxKVStoreIsServerNode =
alloca $ \a1' ->
mxKVStoreIsServerNode'_ a1' >>= \res ->
let {res' = fromIntegral res} in
peekIntegral a1'>>= \a1'' ->
return (res', a1'')
{-# LINE 985 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStoreIsSchedulerNode :: IO ((Int), (Int))
mxKVStoreIsSchedulerNode =
alloca $ \a1' ->
mxKVStoreIsSchedulerNode'_ a1' >>= \res ->
let {res' = fromIntegral res} in
peekIntegral a1'>>= \a1'' ->
return (res', a1'')
{-# LINE 990 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStoreBarrier :: (KVStoreHandle)
-> IO ((Int))
mxKVStoreBarrier a1 =
let {a1' = id a1} in
mxKVStoreBarrier'_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 995 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStoreSetBarrierBeforeExit :: (KVStoreHandle)
-> (Int)
-> IO ((Int))
mxKVStoreSetBarrierBeforeExit a1 a2 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
mxKVStoreSetBarrierBeforeExit'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 1001 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStoreRunServer = undefined
mxKVStoreSendCommmandToServers :: (KVStoreHandle)
-> (Int)
-> (String)
-> IO ((Int))
mxKVStoreSendCommmandToServers a1 a2 a3 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
C2HSImp.withCString a3 $ \a3' ->
mxKVStoreSendCommmandToServers'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 1017 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxKVStoreGetNumDeadNode :: (KVStoreHandle)
-> (Int)
-> (Int)
-> IO ((Int), (Int))
mxKVStoreGetNumDeadNode a1 a2 a4 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
alloca $ \a3' ->
let {a4' = fromIntegral a4} in
mxKVStoreGetNumDeadNode'_ a1' a2' a3' a4' >>= \res ->
let {res' = fromIntegral res} in
peekIntegral a3'>>= \a3'' ->
return (res', a3'')
{-# LINE 1027 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxRecordIOWriterCreate :: (String)
-> IO ((Int), (RecordIOHandle))
mxRecordIOWriterCreate a1 =
C2HSImp.withCString a1 $ \a1' ->
alloca $ \a2' ->
mxRecordIOWriterCreate'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 1033 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxRecordIOWriterFree :: (RecordIOHandle)
-> IO ((Int))
mxRecordIOWriterFree a1 =
let {a1' = id a1} in
mxRecordIOWriterFree'_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 1038 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxRecordIOWriterWriteRecord :: (RecordIOHandle)
-> (Ptr CChar)
-> (CSize)
-> IO ((Int))
mxRecordIOWriterWriteRecord a1 a2 a3 =
let {a1' = id a1} in
let {a2' = id a2} in
let {a3' = id a3} in
mxRecordIOWriterWriteRecord'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 1045 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxRecordIOWriterTell :: (RecordIOHandle)
-> (Ptr CSize)
-> IO ((Int))
mxRecordIOWriterTell a1 a2 =
let {a1' = id a1} in
let {a2' = id a2} in
mxRecordIOWriterTell'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 1051 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxRecordIOReaderCreate :: (String)
-> IO ((Int), (RecordIOHandle))
mxRecordIOReaderCreate a1 =
C2HSImp.withCString a1 $ \a1' ->
alloca $ \a2' ->
mxRecordIOReaderCreate'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
peek a2'>>= \a2'' ->
return (res', a2'')
{-# LINE 1057 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxRecordIOReaderFree :: (RecordIOHandle)
-> IO ((Int))
mxRecordIOReaderFree a1 =
let {a1' = id a1} in
mxRecordIOReaderFree'_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 1062 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxRecordIOReaderReadRecord :: (RecordIOHandle)
-> (Ptr (Ptr CChar))
-> IO ((Int), (CSize))
mxRecordIOReaderReadRecord a1 a2 =
let {a1' = id a1} in
let {a2' = id a2} in
alloca $ \a3' ->
mxRecordIOReaderReadRecord'_ a1' a2' a3' >>= \res ->
let {res' = fromIntegral res} in
peek a3'>>= \a3'' ->
return (res', a3'')
{-# LINE 1070 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxRecordIOReaderSeek :: (RecordIOHandle)
-> (CSize)
-> IO ((Int))
mxRecordIOReaderSeek a1 a2 =
let {a1' = id a1} in
let {a2' = id a2} in
mxRecordIOReaderSeek'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 1076 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxRtcCreate :: (String)
-> (MXUInt)
-> (MXUInt)
-> ([String])
-> ([String])
-> ([NDArrayHandle])
-> ([NDArrayHandle])
-> (Ptr CChar)
-> IO ((Int), (RtcHandle))
mxRtcCreate a1 a2 a3 a4 a5 a6 a7 a8 =
C2HSImp.withCString a1 $ \a1' ->
let {a2' = id a2} in
let {a3' = id a3} in
withStringArray a4 $ \a4' ->
withStringArray a5 $ \a5' ->
withArray a6 $ \a6' ->
withArray a7 $ \a7' ->
let {a8' = id a8} in
alloca $ \a9' ->
mxRtcCreate'_ a1' a2' a3' a4' a5' a6' a7' a8' a9' >>= \res ->
let {res' = fromIntegral res} in
peek a9'>>= \a9'' ->
return (res', a9'')
{-# LINE 1089 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxRtcPush :: (RtcHandle)
-> (MXUInt)
-> (MXUInt)
-> ([NDArrayHandle])
-> ([NDArrayHandle])
-> (MXUInt)
-> (MXUInt)
-> (MXUInt)
-> (MXUInt)
-> (MXUInt)
-> (MXUInt)
-> IO ((Int))
mxRtcPush a1 a2 a3 a4 a5 a6 a7 a8 a9 a10 a11 =
let {a1' = id a1} in
let {a2' = id a2} in
let {a3' = id a3} in
withArray a4 $ \a4' ->
withArray a5 $ \a5' ->
let {a6' = id a6} in
let {a7' = id a7} in
let {a8' = id a8} in
let {a9' = id a9} in
let {a10' = id a10} in
let {a11' = id a11} in
mxRtcPush'_ a1' a2' a3' a4' a5' a6' a7' a8' a9' a10' a11' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 1104 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxRtcFree :: (RtcHandle) -> IO ((Int))
mxRtcFree a1 =
let {a1' = id a1} in
mxRtcFree'_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 1109 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
mxCustomOpRegister :: (String)
-> (CustomOpPropCreator) -> IO ((Int))
mxCustomOpRegister a1 a2 =
C2HSImp.withCString a1 $ \a1' ->
let {a2' = id a2} in
mxCustomOpRegister'_ a1' a2' >>= \res ->
let {res' = fromIntegral res} in
return (res')
{-# LINE 1115 "src/MXNet/Core/Base/Internal/Raw.chs" #-}
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXGetLastError"
mxGetLastError'_ :: (IO (C2HSImp.Ptr C2HSImp.CChar))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXRandomSeed"
mxRandomSeed'_ :: (C2HSImp.CInt -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNotifyShutdown"
mxNotifyShutdown'_ :: (IO C2HSImp.CInt)
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSetProfilerConfig"
mxSetProfilerConfig'_ :: (C2HSImp.CInt -> ((C2HSImp.Ptr C2HSImp.CChar) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSetProfilerState"
mxSetProfilerState'_ :: (C2HSImp.CInt -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXDumpProfile"
mxDumpProfile'_ :: (IO C2HSImp.CInt)
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayCreateNone"
mxNDArrayCreateNone'_ :: ((C2HSImp.Ptr (NDArrayHandle)) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayCreate"
mxNDArrayCreate'_ :: ((C2HSImp.Ptr C2HSImp.CUInt) -> (C2HSImp.CUInt -> (C2HSImp.CInt -> (C2HSImp.CInt -> (C2HSImp.CInt -> ((C2HSImp.Ptr (NDArrayHandle)) -> (IO C2HSImp.CInt)))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayCreateEx"
mxNDArrayCreateEx'_ :: ((C2HSImp.Ptr C2HSImp.CUInt) -> (C2HSImp.CUInt -> (C2HSImp.CInt -> (C2HSImp.CInt -> (C2HSImp.CInt -> (C2HSImp.CInt -> ((C2HSImp.Ptr (NDArrayHandle)) -> (IO C2HSImp.CInt))))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayLoadFromRawBytes"
mxNDArrayLoadFromRawBytes'_ :: ((C2HSImp.Ptr ()) -> (CSize -> ((C2HSImp.Ptr (NDArrayHandle)) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArraySaveRawBytes"
mxNDArraySaveRawBytes'_ :: ((NDArrayHandle) -> ((C2HSImp.Ptr CSize) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArraySave"
mxNDArraySave'_ :: ((C2HSImp.Ptr C2HSImp.CChar) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> (IO C2HSImp.CInt)))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayLoad"
mxNDArrayLoadImpl'_ :: ((C2HSImp.Ptr C2HSImp.CChar) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr (NDArrayHandle))) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> (IO C2HSImp.CInt))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArraySyncCopyFromCPU"
mxNDArraySyncCopyFromCPU'_ :: ((NDArrayHandle) -> ((C2HSImp.Ptr ()) -> (CSize -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArraySyncCopyToCPU"
mxNDArraySyncCopyToCPU'_ :: ((NDArrayHandle) -> ((C2HSImp.Ptr ()) -> (CSize -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayWaitToRead"
mxNDArrayWaitToRead'_ :: ((NDArrayHandle) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayWaitToWrite"
mxNDArrayWaitToWrite'_ :: ((NDArrayHandle) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayWaitAll"
mxNDArrayWaitAll'_ :: (IO C2HSImp.CInt)
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayFree"
mxNDArrayFree'_ :: ((NDArrayHandle) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArraySlice"
mxNDArraySlice'_ :: ((NDArrayHandle) -> (C2HSImp.CUInt -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (NDArrayHandle)) -> (IO C2HSImp.CInt)))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayAt"
mxNDArrayAt'_ :: ((NDArrayHandle) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (NDArrayHandle)) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayReshape"
mxNDArrayReshape'_ :: ((NDArrayHandle) -> (C2HSImp.CInt -> ((C2HSImp.Ptr C2HSImp.CInt) -> ((C2HSImp.Ptr (NDArrayHandle)) -> (IO C2HSImp.CInt)))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayGetShape"
mxNDArrayGetShapeImpl'_ :: ((NDArrayHandle) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CUInt)) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayGetData"
mxNDArrayGetData'_ :: ((NDArrayHandle) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CFloat)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayGetDType"
mxNDArrayGetDType'_ :: ((NDArrayHandle) -> ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXNDArrayGetContext"
mxNDArrayGetContext'_ :: ((NDArrayHandle) -> ((C2HSImp.Ptr C2HSImp.CInt) -> ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXListFunctions"
mxListFunctionsImpl'_ :: ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr (FunctionHandle))) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXGetFunction"
mxGetFunction'_ :: ((C2HSImp.Ptr C2HSImp.CChar) -> ((C2HSImp.Ptr (FunctionHandle)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXFuncGetInfo"
mxFuncGetInfoImpl'_ :: ((FunctionHandle) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> (IO C2HSImp.CInt)))))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXFuncDescribe"
mxFuncDescribe'_ :: ((FunctionHandle) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXFuncInvoke"
mxFuncInvoke'_ :: ((FunctionHandle) -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((C2HSImp.Ptr C2HSImp.CFloat) -> ((C2HSImp.Ptr (NDArrayHandle)) -> (IO C2HSImp.CInt)))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXFuncInvokeEx"
mxFuncInvokeEx'_ :: ((FunctionHandle) -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((C2HSImp.Ptr C2HSImp.CFloat) -> ((C2HSImp.Ptr (NDArrayHandle)) -> (C2HSImp.CInt -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> (IO C2HSImp.CInt))))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolListAtomicSymbolCreators"
mxSymbolListAtomicSymbolCreatorsImpl'_ :: ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr (AtomicSymbolCreator))) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolGetAtomicSymbolName"
mxSymbolGetAtomicSymbolName'_ :: ((AtomicSymbolCreator) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolGetAtomicSymbolInfo"
mxSymbolGetAtomicSymbolInfoImpl'_ :: ((AtomicSymbolCreator) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> (IO C2HSImp.CInt))))))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolCreateAtomicSymbol"
mxSymbolCreateAtomicSymbol'_ :: ((AtomicSymbolCreator) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr (SymbolHandle)) -> (IO C2HSImp.CInt))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolCreateVariable"
mxSymbolCreateVariable'_ :: ((C2HSImp.Ptr C2HSImp.CChar) -> ((C2HSImp.Ptr (SymbolHandle)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolCreateGroup"
mxSymbolCreateGroup'_ :: (C2HSImp.CUInt -> ((C2HSImp.Ptr (SymbolHandle)) -> ((C2HSImp.Ptr (SymbolHandle)) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolCreateFromFile"
mxSymbolCreateFromFile'_ :: ((C2HSImp.Ptr C2HSImp.CChar) -> ((C2HSImp.Ptr (SymbolHandle)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolCreateFromJSON"
mxSymbolCreateFromJSON'_ :: ((C2HSImp.Ptr C2HSImp.CChar) -> ((C2HSImp.Ptr (SymbolHandle)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolSaveToFile"
mxSymbolSaveToFile'_ :: ((SymbolHandle) -> ((C2HSImp.Ptr C2HSImp.CChar) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolSaveToJSON"
mxSymbolSaveToJSON'_ :: ((SymbolHandle) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolFree"
mxSymbolFree'_ :: ((SymbolHandle) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolCopy"
mxSymbolCopy'_ :: ((SymbolHandle) -> ((C2HSImp.Ptr (SymbolHandle)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolPrint"
mxSymbolPrint'_ :: ((SymbolHandle) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolGetName"
mxSymbolGetName'_ :: ((SymbolHandle) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolGetAttr"
mxSymbolGetAttr'_ :: ((SymbolHandle) -> ((C2HSImp.Ptr C2HSImp.CChar) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt)))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolSetAttr"
mxSymbolSetAttr'_ :: ((SymbolHandle) -> ((C2HSImp.Ptr C2HSImp.CChar) -> ((C2HSImp.Ptr C2HSImp.CChar) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolListAttr"
mxSymbolListAttrImpl'_ :: ((SymbolHandle) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolListAttrShallow"
mxSymbolListAttrShallowImpl'_ :: ((SymbolHandle) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolListArguments"
mxSymbolListArgumentsImpl'_ :: ((SymbolHandle) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolListOutputs"
mxSymbolListOutputsImpl'_ :: ((SymbolHandle) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolGetInternals"
mxSymbolGetInternals'_ :: ((SymbolHandle) -> ((C2HSImp.Ptr (SymbolHandle)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolGetOutput"
mxSymbolGetOutput'_ :: ((SymbolHandle) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (SymbolHandle)) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolListAuxiliaryStates"
mxSymbolListAuxiliaryStatesImpl'_ :: ((SymbolHandle) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolCompose"
mxSymbolCompose'_ :: ((SymbolHandle) -> ((C2HSImp.Ptr C2HSImp.CChar) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr (SymbolHandle)) -> (IO C2HSImp.CInt))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolGrad"
mxSymbolGrad'_ :: ((SymbolHandle) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr (SymbolHandle)) -> (IO C2HSImp.CInt)))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolInferShape"
mxSymbolInferShapeImpl'_ :: ((SymbolHandle) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CUInt)) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CUInt))) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CUInt)) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CUInt))) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CUInt)) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CUInt))) -> ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt))))))))))))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolInferShapePartial"
mxSymbolInferShapePartialImpl'_ :: ((SymbolHandle) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CUInt)) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CUInt))) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CUInt)) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CUInt))) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CUInt)) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CUInt))) -> ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt))))))))))))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXSymbolInferType"
mxSymbolInferType'_ :: ((SymbolHandle) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr C2HSImp.CInt) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CInt)) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CInt)) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CInt)) -> ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt))))))))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXExecutorFree"
mxExecutorFree'_ :: ((ExecutorHandle) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXExecutorPrint"
mxExecutorPrint'_ :: ((ExecutorHandle) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXExecutorForward"
mxExecutorForward'_ :: ((ExecutorHandle) -> (C2HSImp.CInt -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXExecutorBackward"
mxExecutorBackward'_ :: ((ExecutorHandle) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (NDArrayHandle)) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXExecutorOutputs"
mxExecutorOutputsImpl'_ :: ((ExecutorHandle) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr (NDArrayHandle))) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXExecutorBind"
mxExecutorBind'_ :: ((SymbolHandle) -> (C2HSImp.CInt -> (C2HSImp.CInt -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((C2HSImp.Ptr (ExecutorHandle)) -> (IO C2HSImp.CInt)))))))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXExecutorBindX"
mxExecutorBindX'_ :: ((SymbolHandle) -> (C2HSImp.CInt -> (C2HSImp.CInt -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr C2HSImp.CInt) -> ((C2HSImp.Ptr C2HSImp.CInt) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((C2HSImp.Ptr (ExecutorHandle)) -> (IO C2HSImp.CInt)))))))))))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXExecutorBindEX"
mxExecutorBindEX'_ :: ((SymbolHandle) -> (C2HSImp.CInt -> (C2HSImp.CInt -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr C2HSImp.CInt) -> ((C2HSImp.Ptr C2HSImp.CInt) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((ExecutorHandle) -> ((C2HSImp.Ptr (ExecutorHandle)) -> (IO C2HSImp.CInt))))))))))))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXExecutorSetMonitorCallback"
mxExecutorSetMonitorCallback'_ :: ((ExecutorHandle) -> ((ExecutorMonitorCallback) -> ((C2HSImp.Ptr ()) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXListDataIters"
mxListDataItersImpl'_ :: ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr (DataIterCreator))) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXDataIterCreateIter"
mxDataIterCreateIter'_ :: ((DataIterCreator) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr (DataIterHandle)) -> (IO C2HSImp.CInt))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXDataIterGetIterInfo"
mxDataIterGetIterInfoImpl'_ :: ((DataIterCreator) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr C2HSImp.CUInt) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> ((C2HSImp.Ptr (C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar))) -> (IO C2HSImp.CInt))))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXDataIterFree"
mxDataIterFree'_ :: ((DataIterHandle) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXDataIterNext"
mxDataIterNext'_ :: ((DataIterHandle) -> ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXDataIterBeforeFirst"
mxDataIterBeforeFirst'_ :: ((DataIterHandle) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXDataIterGetData"
mxDataIterGetData'_ :: ((DataIterHandle) -> ((C2HSImp.Ptr (NDArrayHandle)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXDataIterGetIndex"
mxDataIterGetIndexImpl'_ :: ((DataIterHandle) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CULong)) -> ((C2HSImp.Ptr C2HSImp.CULong) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXDataIterGetPadNum"
mxDataIterGetPadNum'_ :: ((DataIterHandle) -> ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXDataIterGetLabel"
mxDataIterGetLabel'_ :: ((DataIterHandle) -> ((C2HSImp.Ptr (NDArrayHandle)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXInitPSEnv"
mxInitPSEnv'_ :: (C2HSImp.CUInt -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStoreCreate"
mxKVStoreCreate'_ :: ((C2HSImp.Ptr C2HSImp.CChar) -> ((C2HSImp.Ptr (KVStoreHandle)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStoreFree"
mxKVStoreFree'_ :: ((KVStoreHandle) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStoreInit"
mxKVStoreInit'_ :: ((KVStoreHandle) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr C2HSImp.CInt) -> ((C2HSImp.Ptr (NDArrayHandle)) -> (IO C2HSImp.CInt)))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStorePush"
mxKVStorePush'_ :: ((KVStoreHandle) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr C2HSImp.CInt) -> ((C2HSImp.Ptr (NDArrayHandle)) -> (C2HSImp.CInt -> (IO C2HSImp.CInt))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStorePull"
mxKVStorePull'_ :: ((KVStoreHandle) -> (C2HSImp.CUInt -> ((C2HSImp.Ptr C2HSImp.CInt) -> ((C2HSImp.Ptr (NDArrayHandle)) -> (C2HSImp.CInt -> (IO C2HSImp.CInt))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStoreGetType"
mxKVStoreGetType'_ :: ((KVStoreHandle) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStoreGetRank"
mxKVStoreGetRank'_ :: ((KVStoreHandle) -> ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStoreGetGroupSize"
mxKVStoreGetGroupSize'_ :: ((KVStoreHandle) -> ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStoreIsWorkerNode"
mxKVStoreIsWorkerNode'_ :: ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStoreIsServerNode"
mxKVStoreIsServerNode'_ :: ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStoreIsSchedulerNode"
mxKVStoreIsSchedulerNode'_ :: ((C2HSImp.Ptr C2HSImp.CInt) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStoreBarrier"
mxKVStoreBarrier'_ :: ((KVStoreHandle) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStoreSetBarrierBeforeExit"
mxKVStoreSetBarrierBeforeExit'_ :: ((KVStoreHandle) -> (C2HSImp.CInt -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStoreSendCommmandToServers"
mxKVStoreSendCommmandToServers'_ :: ((KVStoreHandle) -> (C2HSImp.CInt -> ((C2HSImp.Ptr C2HSImp.CChar) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXKVStoreGetNumDeadNode"
mxKVStoreGetNumDeadNode'_ :: ((KVStoreHandle) -> (C2HSImp.CInt -> ((C2HSImp.Ptr C2HSImp.CInt) -> (C2HSImp.CInt -> (IO C2HSImp.CInt)))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXRecordIOWriterCreate"
mxRecordIOWriterCreate'_ :: ((C2HSImp.Ptr C2HSImp.CChar) -> ((C2HSImp.Ptr (RecordIOHandle)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXRecordIOWriterFree"
mxRecordIOWriterFree'_ :: ((RecordIOHandle) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXRecordIOWriterWriteRecord"
mxRecordIOWriterWriteRecord'_ :: ((RecordIOHandle) -> ((C2HSImp.Ptr C2HSImp.CChar) -> (CSize -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXRecordIOWriterTell"
mxRecordIOWriterTell'_ :: ((RecordIOHandle) -> ((C2HSImp.Ptr CSize) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXRecordIOReaderCreate"
mxRecordIOReaderCreate'_ :: ((C2HSImp.Ptr C2HSImp.CChar) -> ((C2HSImp.Ptr (RecordIOHandle)) -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXRecordIOReaderFree"
mxRecordIOReaderFree'_ :: ((RecordIOHandle) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXRecordIOReaderReadRecord"
mxRecordIOReaderReadRecord'_ :: ((RecordIOHandle) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr CSize) -> (IO C2HSImp.CInt))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXRecordIOReaderSeek"
mxRecordIOReaderSeek'_ :: ((RecordIOHandle) -> (CSize -> (IO C2HSImp.CInt)))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXRtcCreate"
mxRtcCreate'_ :: ((C2HSImp.Ptr C2HSImp.CChar) -> (C2HSImp.CUInt -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr (C2HSImp.Ptr C2HSImp.CChar)) -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((C2HSImp.Ptr C2HSImp.CChar) -> ((C2HSImp.Ptr (RtcHandle)) -> (IO C2HSImp.CInt))))))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXRtcPush"
mxRtcPush'_ :: ((RtcHandle) -> (C2HSImp.CUInt -> (C2HSImp.CUInt -> ((C2HSImp.Ptr (NDArrayHandle)) -> ((C2HSImp.Ptr (NDArrayHandle)) -> (C2HSImp.CUInt -> (C2HSImp.CUInt -> (C2HSImp.CUInt -> (C2HSImp.CUInt -> (C2HSImp.CUInt -> (C2HSImp.CUInt -> (IO C2HSImp.CInt))))))))))))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXRtcFree"
mxRtcFree'_ :: ((RtcHandle) -> (IO C2HSImp.CInt))
foreign import ccall safe "MXNet/Core/Base/Internal/Raw.chs.h MXCustomOpRegister"
mxCustomOpRegister'_ :: ((C2HSImp.Ptr C2HSImp.CChar) -> ((CustomOpPropCreator) -> (IO C2HSImp.CInt)))