{-# LANGUAGE ForeignFunctionInterface, InterruptibleFFI #-} module OGDF.OptimalHierarchyLayout.FFI where import Data.Word import Data.Int import Foreign.C import Foreign.Ptr import OGDF.OptimalHierarchyLayout.RawType import OGDF.OptimalHierarchyLayout.RawType foreign import ccall interruptible "OGDFOptimalHierarchyLayout.h OptimalHierarchyLayout_delete" c_optimalhierarchylayout_delete :: Ptr RawOptimalHierarchyLayout -> IO () foreign import ccall interruptible "OGDFOptimalHierarchyLayout.h OptimalHierarchyLayout_newOptimalHierarchyLayout" c_optimalhierarchylayout_newoptimalhierarchylayout :: IO (Ptr RawOptimalHierarchyLayout) foreign import ccall interruptible "OGDFOptimalHierarchyLayout.h OptimalHierarchyLayout_optimalHierarchyLayout_layerDistance" c_optimalhierarchylayout_optimalhierarchylayout_layerdistance :: Ptr RawOptimalHierarchyLayout -> CDouble -> IO () foreign import ccall interruptible "OGDFOptimalHierarchyLayout.h OptimalHierarchyLayout_optimalHierarchyLayout_nodeDistance" c_optimalhierarchylayout_optimalhierarchylayout_nodedistance :: Ptr RawOptimalHierarchyLayout -> CDouble -> IO () foreign import ccall interruptible "OGDFOptimalHierarchyLayout.h OptimalHierarchyLayout_optimalHierarchyLayout_weightBalancing" c_optimalhierarchylayout_optimalhierarchylayout_weightbalancing :: Ptr RawOptimalHierarchyLayout -> CDouble -> IO ()