-- Produced by boxnd-gen; edit the generator, not this file.

module Box3D.HeightField
  ( create
  , destroy
  )

  where

import Foreign
import Box3D.Tags (HeightFieldData, HeightFieldDef)

foreign import ccall unsafe "b3CreateHeightField"
  c_b3CreateHeightField :: Ptr HeightFieldDef -> IO (Ptr HeightFieldData)

foreign import ccall unsafe "b3DestroyHeightField"
  c_b3DestroyHeightField :: Ptr HeightFieldData -> IO ()

{- | Create a generic height field.

Binds @b3CreateHeightField@.
-}
create
  :: Ptr HeightFieldDef
  -- ^ @data@
  -> IO (Ptr HeightFieldData)
create :: Ptr HeightFieldDef -> IO (Ptr HeightFieldData)
create Ptr HeightFieldDef
a0 =
  Ptr HeightFieldDef -> IO (Ptr HeightFieldData)
c_b3CreateHeightField Ptr HeightFieldDef
a0

{- | Destroy a height field.

Binds @b3DestroyHeightField@.
-}
destroy
  :: Ptr HeightFieldData
  -> IO ()
destroy :: Ptr HeightFieldData -> IO ()
destroy Ptr HeightFieldData
a0 =
  Ptr HeightFieldData -> IO ()
c_b3DestroyHeightField Ptr HeightFieldData
a0