accelerate-examples-1.3.0.0: examples/ray/Common/Type.hs

module Common.Type (

  V3(..),
  module Common.Type,

) where

import Data.Array.Accelerate.Linear.V3

type Position     = V3 Float
type Direction    = V3 Float
type Normal       = (Position, Direction)