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