Music.Pitch.Augmentable

Augmentable class

class Augmentable a where

Class of types that can be augmented.

 quality (augment a)  = augment (quality a)
 quality (diminish a) = diminish (quality a)
 augment . diminish   = id

Methods

augment :: a -> a

Increase the size of this interval by one.

diminish :: a -> a

Decrease the size of this interval by one.

Instances

Augmentable Double

Augmentable Integer

Integral a => Augmentable (Ratio a)