{-# LANGUAGE ForeignFunctionInterface #-}
module Geometry.VertexEnum.CVertexEnum
  ( c_intersections )
  where
import Foreign         ( Ptr )
import Foreign.C.Types ( CDouble, CUInt(..) )

foreign import ccall unsafe "intersections" c_intersections
  :: Ptr CDouble            -- halfspaces
  -> Ptr CDouble            -- interior point
  -> CUInt                  -- dim
  -> CUInt                  -- n halfspaces
  -> Ptr CUInt              -- n intersections
  -> Ptr CUInt              -- exitcode
  -> CUInt                  -- 0/1 print to stdout
  -> IO (Ptr (Ptr CDouble))