{-# LINE 1 "src/Bindings/Gts/ProgressiveAndHierarchicalSurfaces/HierarchicalVertexSplit.hsc" #-}

{-# LINE 2 "src/Bindings/Gts/ProgressiveAndHierarchicalSurfaces/HierarchicalVertexSplit.hsc" #-}

-- | <http://gts.sourceforge.net/reference/gts-hierarchical-vertex-split.html>

module Bindings.Gts.ProgressiveAndHierarchicalSurfaces.HierarchicalVertexSplit where
import Bindings.GLib
import Bindings.Gts.Types
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

{-# LINE 9 "src/Bindings/Gts/ProgressiveAndHierarchicalSurfaces/HierarchicalVertexSplit.hsc" #-}

foreign import ccall "inline_GTS_HSPLIT_CLASS" c'GTS_HSPLIT_CLASS
  :: Ptr a -> Ptr C'GtsHSplitClass

{-# LINE 11 "src/Bindings/Gts/ProgressiveAndHierarchicalSurfaces/HierarchicalVertexSplit.hsc" #-}
foreign import ccall "inline_GTS_HSPLIT" c'GTS_HSPLIT
  :: Ptr a -> Ptr C'GtsHSplit

{-# LINE 12 "src/Bindings/Gts/ProgressiveAndHierarchicalSurfaces/HierarchicalVertexSplit.hsc" #-}
foreign import ccall "inline_GTS_IS_HSPLIT" c'GTS_IS_HSPLIT
  :: Ptr a -> Ptr C'gboolean

{-# LINE 13 "src/Bindings/Gts/ProgressiveAndHierarchicalSurfaces/HierarchicalVertexSplit.hsc" #-}

foreign import ccall "gts_hsplit_class" c'gts_hsplit_class
  :: IO (Ptr C'GtsHSplitClass)
foreign import ccall "&gts_hsplit_class" p'gts_hsplit_class
  :: FunPtr (IO (Ptr C'GtsHSplitClass))

{-# LINE 15 "src/Bindings/Gts/ProgressiveAndHierarchicalSurfaces/HierarchicalVertexSplit.hsc" #-}
foreign import ccall "gts_hsplit_new" c'gts_hsplit_new
  :: Ptr C'GtsHSplitClass -> Ptr C'GtsSplit -> IO (Ptr C'GtsHSplit)
foreign import ccall "&gts_hsplit_new" p'gts_hsplit_new
  :: FunPtr (Ptr C'GtsHSplitClass -> Ptr C'GtsSplit -> IO (Ptr C'GtsHSplit))

{-# LINE 16 "src/Bindings/Gts/ProgressiveAndHierarchicalSurfaces/HierarchicalVertexSplit.hsc" #-}
foreign import ccall "gts_hsplit_collapse" c'gts_hsplit_collapse
  :: Ptr C'GtsHSplit -> Ptr C'GtsHSurface -> IO ()
foreign import ccall "&gts_hsplit_collapse" p'gts_hsplit_collapse
  :: FunPtr (Ptr C'GtsHSplit -> Ptr C'GtsHSurface -> IO ())

{-# LINE 17 "src/Bindings/Gts/ProgressiveAndHierarchicalSurfaces/HierarchicalVertexSplit.hsc" #-}
foreign import ccall "gts_hsplit_expand" c'gts_hsplit_expand
  :: Ptr C'GtsHSplit -> Ptr C'GtsHSurface -> IO ()
foreign import ccall "&gts_hsplit_expand" p'gts_hsplit_expand
  :: FunPtr (Ptr C'GtsHSplit -> Ptr C'GtsHSurface -> IO ())

{-# LINE 18 "src/Bindings/Gts/ProgressiveAndHierarchicalSurfaces/HierarchicalVertexSplit.hsc" #-}
foreign import ccall "gts_hsplit_force_expand" c'gts_hsplit_force_expand
  :: Ptr C'GtsHSplit -> Ptr C'GtsHSurface -> IO ()
foreign import ccall "&gts_hsplit_force_expand" p'gts_hsplit_force_expand
  :: FunPtr (Ptr C'GtsHSplit -> Ptr C'GtsHSurface -> IO ())

{-# LINE 19 "src/Bindings/Gts/ProgressiveAndHierarchicalSurfaces/HierarchicalVertexSplit.hsc" #-}