module Bindings.Gsl.VectorsAndMatrices 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.Array (peekArray,pokeArray)
import Data.Int
import Data.Word
data C'gsl_vector = C'gsl_vector{
} deriving (Eq,Show)
instance Storable C'gsl_vector where
sizeOf _ = 20
alignment = sizeOf
peek p = do
return $ C'gsl_vector
poke p (C'gsl_vector) = do
return ()
data C'gsl_matrix = C'gsl_matrix{
} deriving (Eq,Show)
instance Storable C'gsl_matrix where
sizeOf _ = 24
alignment = sizeOf
peek p = do
return $ C'gsl_matrix
poke p (C'gsl_matrix) = do
return ()