accelerate-examples-0.13.0.0: examples/n-body/Solver/BarnsHut.hs

module Solver.BarnsHut
  where

import Common.Type
import Data.Array.Accelerate                    as A

-- | Calculate accelerations on the particles using the Barns-Hut algorithm
--
calcAccels :: Exp R -> Acc (Vector Body) -> Acc (Vector Accel)
calcAccels = error "BarnsHut.calcAccels: not implemented yet!"