module ScaleFactor where type ScaleFactor = (Int, Int, Int) --instance Integral ScaleFactor where