Enumeration of common music notation note names (C to B).

Note sequence as usually understood, ie. C - B.

Char variant of show.

Note name in lilypond syntax (ie. lower case).

Table of Note and corresponding pitch-classes.

Transform Note to pitch-class number.

map note_to_pc [C,E,G] == [0,4,7]

Inverse of note_to_pc.

mapMaybe pc_to_note [0,4,7] == [C,E,G]

Modal transposition of Note value.

note_t_transpose C 2 == E

Parser from Char, case insensitive flag.

mapMaybe (parse_note True) "CDEFGab" == [C,D,E,F,G,A,B]

Inclusive set of Note within indicated interval. This is not equal to enumFromTo which is not circular.

note_span E B == [E,F,G,A,B]
note_span B D == [B,C,D]
enumFromTo B D == []

Enumeration of common music notation note alterations.

Generic form.

Transform Alteration to semitone alteration. Returns Nothing for non-semitone alterations.

map alteration_to_diff [Flat,QuarterToneSharp] == [Just (-1),Nothing]

Is Alteration 12-ET.

Transform Alteration to semitone alteration.

map alteration_to_diff_err [Flat,Sharp] == [-1,1]

Transform Alteration to fractional semitone alteration, ie. allow quarter tones.

alteration_to_fdiff QuarterToneSharp == 0.5

Transform fractional semitone alteration to Alteration, ie. allow quarter tones.

map fdiff_to_alteration [-0.5,0.5] == [Just QuarterToneFlat
                                      ,Just QuarterToneSharp]

Raise Alteration by a quarter tone where possible.

alteration_raise_quarter_tone Flat == Just QuarterToneFlat
alteration_raise_quarter_tone DoubleSharp == Nothing

Lower Alteration by a quarter tone where possible.

alteration_lower_quarter_tone Sharp == Just QuarterToneSharp
alteration_lower_quarter_tone DoubleFlat == Nothing

Edit Alteration by a quarter tone where possible, -0.5 lowers, 0 retains, 0.5 raises.

import Data.Ratio
alteration_edit_quarter_tone (-1 % 2) Flat == Just ThreeQuarterToneFlat

Simplify Alteration to standard 12ET by deleting quarter tones.

Data.List.nub (map alteration_clear_quarter_tone [minBound..maxBound])

Table of Unicode characters for alterations.

Unicode has entries for Musical Symbols in the range U+1D100 through U+1D1FF. The 3/4 symbols are non-standard, here they correspond to MUSICAL SYMBOL FLAT DOWN and MUSICAL SYMBOL SHARP UP.

map alteration_symbol [minBound .. maxBound] == "𝄫𝄭♭𝄳♮𝄲♯𝄰𝄪"

Inverse of alteration_symbol.

mapMaybe symbol_to_alteration "♭♮♯" == [Flat,Natural,Sharp]

ISO alteration notation. When not strict extended to allow ## for x.

symbol_to_alteration extended to allow single character ISO notations.

ISO alteration table, strings not characters because of double flat.

The ISO ASCII spellings for alterations. Naturals are written as the empty string.

mapMaybe alteration_iso_m [Flat .. Sharp] == ["b","","#"]
mapMaybe alteration_iso_m [DoubleFlat,DoubleSharp] == ["bb","x"]

The ISO ASCII spellings for alterations.

The Tonhöhe ASCII spellings for alterations.

The Tonhöhe ASCII spellings for alterations.

See http://www.musiccog.ohio-state.edu/Humdrum/guide04.html and http://lilypond.org/doc/v2.16/Documentation/notation/writing-pitches

map alteration_tonh [Flat .. Sharp] == ["es","eh","","ih","is"]

Inverse of alteration_tonh.

mapMaybe tonh_to_alteration ["es","eh","","ih","is"] == [Flat .. Sharp]

Note and alteration to pitch-class, or not.

Error variant.

map note_alteration_to_pc_err [(A,DoubleSharp),(B,Sharp),(C,Flat),(C,DoubleFlat)]

Note & alteration sequence in key-signature spelling.

Table connecting pitch class number with note_alteration_ks.

reverse_lookup of pc_note_alteration_ks_tbl.

Alteration given as a rational semitone difference and a string representation of the alteration.

Transform Alteration to Alteration_R.

let r = [(-1,"♭"),(0,"♮"),(1,"♯")]
map alteration_r [Flat,Natural,Sharp] == r

Parser for ISO note name, upper case.

map (T.run_parser_error p_note_t . return) "ABCDEFG"

Note name in lower case (not ISO)

Case-insensitive note name (not ISO).

Parser for ISO alteration name.

map (T.run_parser_error p_alteration_t_iso) (words "bb b # x ##")