{-# LANGUAGE ForeignFunctionInterface #-}
module Torch.FFI.TH.Float.Lapack where
import Foreign
import Foreign.C.Types
import Data.Word
import Data.Int
import Torch.Types.TH
foreign import ccall "THLapack.h THFloatLapack_gesv"
c_gesv_ :: CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_gesv :: Ptr C'THState -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_gesv = const c_gesv_
foreign import ccall "THLapack.h THFloatLapack_trtrs"
c_trtrs_ :: CChar -> CChar -> CChar -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_trtrs :: Ptr C'THState -> CChar -> CChar -> CChar -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_trtrs = const c_trtrs_
foreign import ccall "THLapack.h THFloatLapack_gels"
c_gels_ :: CChar -> CInt -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_gels :: Ptr C'THState -> CChar -> CInt -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_gels = const c_gels_
foreign import ccall "THLapack.h THFloatLapack_syev"
c_syev_ :: CChar -> CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_syev :: Ptr C'THState -> CChar -> CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_syev = const c_syev_
foreign import ccall "THLapack.h THFloatLapack_geev"
c_geev_ :: CChar -> CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_geev :: Ptr C'THState -> CChar -> CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_geev = const c_geev_
foreign import ccall "THLapack.h THFloatLapack_gesvd"
c_gesvd_ :: CChar -> CChar -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_gesvd :: Ptr C'THState -> CChar -> CChar -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_gesvd = const c_gesvd_
foreign import ccall "THLapack.h THFloatLapack_getrf"
c_getrf_ :: CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CInt -> IO ()
c_getrf :: Ptr C'THState -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CInt -> IO ()
c_getrf = const c_getrf_
foreign import ccall "THLapack.h THFloatLapack_getrs"
c_getrs_ :: CChar -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_getrs :: Ptr C'THState -> CChar -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_getrs = const c_getrs_
foreign import ccall "THLapack.h THFloatLapack_getri"
c_getri_ :: CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_getri :: Ptr C'THState -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_getri = const c_getri_
foreign import ccall "THLapack.h THFloatLapack_potrf"
c_potrf_ :: CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_potrf :: Ptr C'THState -> CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_potrf = const c_potrf_
foreign import ccall "THLapack.h THFloatLapack_potri"
c_potri_ :: CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_potri :: Ptr C'THState -> CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_potri = const c_potri_
foreign import ccall "THLapack.h THFloatLapack_potrs"
c_potrs_ :: CChar -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_potrs :: Ptr C'THState -> CChar -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_potrs = const c_potrs_
foreign import ccall "THLapack.h THFloatLapack_pstrf"
c_pstrf_ :: CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CInt -> CFloat -> Ptr CFloat -> Ptr CInt -> IO ()
c_pstrf :: Ptr C'THState -> CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CInt -> CFloat -> Ptr CFloat -> Ptr CInt -> IO ()
c_pstrf = const c_pstrf_
foreign import ccall "THLapack.h THFloatLapack_geqrf"
c_geqrf_ :: CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_geqrf :: Ptr C'THState -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_geqrf = const c_geqrf_
foreign import ccall "THLapack.h THFloatLapack_orgqr"
c_orgqr_ :: CInt -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_orgqr :: Ptr C'THState -> CInt -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_orgqr = const c_orgqr_
foreign import ccall "THLapack.h THFloatLapack_ormqr"
c_ormqr_ :: CChar -> CChar -> CInt -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_ormqr :: Ptr C'THState -> CChar -> CChar -> CInt -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ()
c_ormqr = const c_ormqr_
foreign import ccall "THLapack.h &THFloatLapack_gesv"
p_gesv :: FunPtr (CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_trtrs"
p_trtrs :: FunPtr (CChar -> CChar -> CChar -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_gels"
p_gels :: FunPtr (CChar -> CInt -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_syev"
p_syev :: FunPtr (CChar -> CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_geev"
p_geev :: FunPtr (CChar -> CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_gesvd"
p_gesvd :: FunPtr (CChar -> CChar -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_getrf"
p_getrf :: FunPtr (CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_getrs"
p_getrs :: FunPtr (CChar -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_getri"
p_getri :: FunPtr (CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_potrf"
p_potrf :: FunPtr (CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_potri"
p_potri :: FunPtr (CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_potrs"
p_potrs :: FunPtr (CChar -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_pstrf"
p_pstrf :: FunPtr (CChar -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> Ptr CInt -> CFloat -> Ptr CFloat -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_geqrf"
p_geqrf :: FunPtr (CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_orgqr"
p_orgqr :: FunPtr (CInt -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CInt -> IO ())
foreign import ccall "THLapack.h &THFloatLapack_ormqr"
p_ormqr :: FunPtr (CChar -> CChar -> CInt -> CInt -> CInt -> Ptr CFloat -> CInt -> Ptr CFloat -> Ptr CFloat -> CInt -> Ptr CFloat -> CInt -> Ptr CInt -> IO ())