module Bindings.Gsl.ChebyshevApproximations where
import Foreign.Ptr (Ptr,FunPtr,plusPtr)
import Foreign.Ptr (wordPtrToPtr,castPtrToFunPtr)
import Foreign.Storable
import Foreign.C.Types
import Foreign.C.String (CString,CStringLen,CWString,CWStringLen)
import Foreign.Marshal.Alloc (alloca)
import Foreign.Marshal.Array (peekArray,pokeArray)
import Data.Int
import Data.Word
import Bindings.Gsl.SpecialFunctions
import Bindings.Gsl.MathematicalFunctions
data C'gsl_cheb_series = C'gsl_cheb_series{
c'gsl_cheb_series'c :: Ptr CDouble,
c'gsl_cheb_series'order :: CSize,
c'gsl_cheb_series'a :: CDouble,
c'gsl_cheb_series'b :: CDouble,
c'gsl_cheb_series'order_sp :: CSize,
c'gsl_cheb_series'f :: Ptr CDouble
} deriving (Eq,Show)
p'gsl_cheb_series'c p = plusPtr p 0
p'gsl_cheb_series'c :: Ptr (C'gsl_cheb_series) -> Ptr (Ptr CDouble)
p'gsl_cheb_series'order p = plusPtr p 4
p'gsl_cheb_series'order :: Ptr (C'gsl_cheb_series) -> Ptr (CSize)
p'gsl_cheb_series'a p = plusPtr p 8
p'gsl_cheb_series'a :: Ptr (C'gsl_cheb_series) -> Ptr (CDouble)
p'gsl_cheb_series'b p = plusPtr p 16
p'gsl_cheb_series'b :: Ptr (C'gsl_cheb_series) -> Ptr (CDouble)
p'gsl_cheb_series'order_sp p = plusPtr p 24
p'gsl_cheb_series'order_sp :: Ptr (C'gsl_cheb_series) -> Ptr (CSize)
p'gsl_cheb_series'f p = plusPtr p 28
p'gsl_cheb_series'f :: Ptr (C'gsl_cheb_series) -> Ptr (Ptr CDouble)
instance Storable C'gsl_cheb_series where
sizeOf _ = 32
alignment _ = 4
peek p = do
v0 <- peekByteOff p 0
v1 <- peekByteOff p 4
v2 <- peekByteOff p 8
v3 <- peekByteOff p 16
v4 <- peekByteOff p 24
v5 <- peekByteOff p 28
return $ C'gsl_cheb_series v0 v1 v2 v3 v4 v5
poke p (C'gsl_cheb_series v0 v1 v2 v3 v4 v5) = do
pokeByteOff p 0 v0
pokeByteOff p 4 v1
pokeByteOff p 8 v2
pokeByteOff p 16 v3
pokeByteOff p 24 v4
pokeByteOff p 28 v5
return ()
foreign import ccall "gsl_cheb_alloc" c'gsl_cheb_alloc
:: CSize -> IO (Ptr C'gsl_cheb_series)
foreign import ccall "&gsl_cheb_alloc" p'gsl_cheb_alloc
:: FunPtr (CSize -> IO (Ptr C'gsl_cheb_series))
foreign import ccall "gsl_cheb_free" c'gsl_cheb_free
:: Ptr C'gsl_cheb_series -> IO ()
foreign import ccall "&gsl_cheb_free" p'gsl_cheb_free
:: FunPtr (Ptr C'gsl_cheb_series -> IO ())
foreign import ccall "gsl_cheb_init" c'gsl_cheb_init
:: Ptr C'gsl_cheb_series -> Ptr C'gsl_function -> CDouble -> CDouble -> IO CInt
foreign import ccall "&gsl_cheb_init" p'gsl_cheb_init
:: FunPtr (Ptr C'gsl_cheb_series -> Ptr C'gsl_function -> CDouble -> CDouble -> IO CInt)
foreign import ccall "gsl_cheb_order" c'gsl_cheb_order
:: Ptr C'gsl_cheb_series -> IO CSize
foreign import ccall "&gsl_cheb_order" p'gsl_cheb_order
:: FunPtr (Ptr C'gsl_cheb_series -> IO CSize)
foreign import ccall "gsl_cheb_size" c'gsl_cheb_size
:: Ptr C'gsl_cheb_series -> IO CSize
foreign import ccall "&gsl_cheb_size" p'gsl_cheb_size
:: FunPtr (Ptr C'gsl_cheb_series -> IO CSize)
foreign import ccall "gsl_cheb_coeffs" c'gsl_cheb_coeffs
:: Ptr C'gsl_cheb_series -> IO (Ptr CDouble)
foreign import ccall "&gsl_cheb_coeffs" p'gsl_cheb_coeffs
:: FunPtr (Ptr C'gsl_cheb_series -> IO (Ptr CDouble))
foreign import ccall "gsl_cheb_eval" c'gsl_cheb_eval
:: Ptr C'gsl_cheb_series -> CDouble -> IO CDouble
foreign import ccall "&gsl_cheb_eval" p'gsl_cheb_eval
:: FunPtr (Ptr C'gsl_cheb_series -> CDouble -> IO CDouble)
foreign import ccall "gsl_cheb_eval_err" c'gsl_cheb_eval_err
:: Ptr C'gsl_cheb_series -> CDouble -> Ptr CDouble -> Ptr CDouble -> IO CInt
foreign import ccall "&gsl_cheb_eval_err" p'gsl_cheb_eval_err
:: FunPtr (Ptr C'gsl_cheb_series -> CDouble -> Ptr CDouble -> Ptr CDouble -> IO CInt)
foreign import ccall "gsl_cheb_eval_n" c'gsl_cheb_eval_n
:: Ptr C'gsl_cheb_series -> CSize -> CDouble -> IO CDouble
foreign import ccall "&gsl_cheb_eval_n" p'gsl_cheb_eval_n
:: FunPtr (Ptr C'gsl_cheb_series -> CSize -> CDouble -> IO CDouble)
foreign import ccall "gsl_cheb_eval_n_err" c'gsl_cheb_eval_n_err
:: Ptr C'gsl_cheb_series -> CSize -> CDouble -> Ptr CDouble -> Ptr CDouble -> IO CInt
foreign import ccall "&gsl_cheb_eval_n_err" p'gsl_cheb_eval_n_err
:: FunPtr (Ptr C'gsl_cheb_series -> CSize -> CDouble -> Ptr CDouble -> Ptr CDouble -> IO CInt)
foreign import ccall "gsl_cheb_eval_mode" c'gsl_cheb_eval_mode
:: Ptr C'gsl_cheb_series -> CDouble -> C'gsl_mode_t -> IO CDouble
foreign import ccall "&gsl_cheb_eval_mode" p'gsl_cheb_eval_mode
:: FunPtr (Ptr C'gsl_cheb_series -> CDouble -> C'gsl_mode_t -> IO CDouble)
foreign import ccall "gsl_cheb_eval_mode_e" c'gsl_cheb_eval_mode_e
:: Ptr C'gsl_cheb_series -> CDouble -> C'gsl_mode_t -> Ptr CDouble -> Ptr CDouble -> IO CInt
foreign import ccall "&gsl_cheb_eval_mode_e" p'gsl_cheb_eval_mode_e
:: FunPtr (Ptr C'gsl_cheb_series -> CDouble -> C'gsl_mode_t -> Ptr CDouble -> Ptr CDouble -> IO CInt)
foreign import ccall "gsl_cheb_calc_deriv" c'gsl_cheb_calc_deriv
:: Ptr C'gsl_cheb_series -> Ptr C'gsl_cheb_series -> IO CInt
foreign import ccall "&gsl_cheb_calc_deriv" p'gsl_cheb_calc_deriv
:: FunPtr (Ptr C'gsl_cheb_series -> Ptr C'gsl_cheb_series -> IO CInt)
foreign import ccall "gsl_cheb_calc_integ" c'gsl_cheb_calc_integ
:: Ptr C'gsl_cheb_series -> Ptr C'gsl_cheb_series -> IO CInt
foreign import ccall "&gsl_cheb_calc_integ" p'gsl_cheb_calc_integ
:: FunPtr (Ptr C'gsl_cheb_series -> Ptr C'gsl_cheb_series -> IO CInt)