module BuildBox.Data.Dividable
	(Dividable(..))
where

class Dividable a where
	divide :: a -> a -> a
	
instance Dividable Integer where
	divide	= div

instance Dividable Float where
	divide	= (/)