-- | A measurement that is relative to another by a floating-point value.
module Data.Measure.RelativeDouble where

-- | A class of data types that are a measurement relative by a floating-point value.
class RelativeDouble t where
  (.*.) :: t -> Double -> t -- ^ Relative by a product.
  (./.) :: t -> Double -> t -- ^ Relative by a quotient.