Safe Haskell | None |
---|---|
Language | Haskell2010 |
Synopsis
- major :: Num a => [a]
- minor :: Num a => [a]
- major7 :: Num a => [a]
- dom7 :: Num a => [a]
- minor7 :: Num a => [a]
- aug :: Num a => [a]
- dim :: Num a => [a]
- dim7 :: Num a => [a]
- one :: Num a => [a]
- five :: Num a => [a]
- plus :: Num a => [a]
- sharp5 :: Num a => [a]
- msharp5 :: Num a => [a]
- sus2 :: Num a => [a]
- sus4 :: Num a => [a]
- six :: Num a => [a]
- m6 :: Num a => [a]
- sevenSus2 :: Num a => [a]
- sevenSus4 :: Num a => [a]
- sevenFlat5 :: Num a => [a]
- m7flat5 :: Num a => [a]
- sevenSharp5 :: Num a => [a]
- m7sharp5 :: Num a => [a]
- nine :: Num a => [a]
- m9 :: Num a => [a]
- m7sharp9 :: Num a => [a]
- maj9 :: Num a => [a]
- nineSus4 :: Num a => [a]
- sixby9 :: Num a => [a]
- m6by9 :: Num a => [a]
- sevenFlat9 :: Num a => [a]
- m7flat9 :: Num a => [a]
- sevenFlat10 :: Num a => [a]
- nineSharp5 :: Num a => [a]
- m9sharp5 :: Num a => [a]
- sevenSharp5flat9 :: Num a => [a]
- m7sharp5flat9 :: Num a => [a]
- eleven :: Num a => [a]
- m11 :: Num a => [a]
- maj11 :: Num a => [a]
- elevenSharp :: Num a => [a]
- m11sharp :: Num a => [a]
- thirteen :: Num a => [a]
- m13 :: Num a => [a]
- chordTable :: Num a => [(String, [a])]
- chordL :: Num a => Pattern String -> Pattern [a]
Documentation
sevenFlat5 :: Num a => [a] Source #
sevenSharp5 :: Num a => [a] Source #
sevenFlat9 :: Num a => [a] Source #
sevenFlat10 :: Num a => [a] Source #
nineSharp5 :: Num a => [a] Source #
sevenSharp5flat9 :: Num a => [a] Source #
m7sharp5flat9 :: Num a => [a] Source #
elevenSharp :: Num a => [a] Source #
chordTable :: Num a => [(String, [a])] Source #
chordate cs m n
selects the n
th "chord" (a chord is a list of Ints)
from a list of chords cs
and transposes it by m
chordate :: Num b => [[b]] -> b -> Int -> [b]
chordate cs m n = map (+m) $ cs!!n
enchord chords pn pc
turns every note in the note pattern pn
into
a chord, selecting from the chord lists chords
using the index pattern
pc
. For example, Chords.enchord [Chords.major Chords.minor] "c g" "0 1"
will create a pattern of a C-major chord followed by a G-minor chord.
enchord :: Num a => [[a]] -> Pattern a -> Pattern Int -> Pattern a
enchord chords pn pc = flatpat $ (chordate chords) $ pn * pc