This is a simple Octree implementation in Haskell.
To use simply:
module Main where import Data.Octree as O import Data.Vector.V3 main = do let oct = fromList [(Vector3 1 2 3, "a"), (Vector3 3 4 5, "b"), (Vector3 8 8 8, "c")] report msg elt = putStrLn $ msg ++ show elt report "Nearest :" $ O.nearest oct $ Vector3 2 2 3 report "Within range:" $ O.withinRange oct 5.0 $ Vector3 2 2 3 return ()
For now it uses AC-Vector package for vectors, but I may change it to use Tensor package used by OpenGL package, if there is interest. So far I still wait for package with vector operations (like dot, cross producton, vector projection and rejection) on Tensor types.
Official releases are on Hackage.
This package is also a part of Stackage - a stable subset of Hackage.