Top-level functor for 41 ET and related tunings with 41 pitches per octave.

Functor

ET41 ("ET41.oz")

Import

• HS at "x-ozlib://anders/strasheela/HarmonisedScore/HarmonisedScore.ozf"
• DB at "source/DB.ozf"
• Out at "source/Output.ozf"

Export

• db:DB
• Out
• <P/2:Acc>
• pc:<P/2:PC>
• pcName:<P/2:PCName>
• <P/2:Pitch>

Define

fun{Acc SymAcc}
Transforms symbolic accidental (atom) into the corresponding accidental integer. The following symbolic accidentals are supported: the empty atom '' is natural (!), '7' and 'L' are a septimal comma sharp and flat, '77' and 'LL' are two septimal commas sharp and flat, '#' and 'b' are a semitone sharp and flat, and finally 'x' and 'bb' are two semitones sharp and flat.
Note: Returned value depends on {HS.db.getAccidentalOffset}, set the HS database to ET41.db.fullDB.


fun{PC SymPC}
Tranforms a conventional symbolic note names to the corresponding 31 ET pitch class. Notation of the symbolic note names: 'C' is c natural, 'C7' is c septimal comma sharp etc. See Acc for other accidentals supported.
NB: the following pitch class names are undefined (otherwise, the meaning of octave would become inconsistent): any flattened C and any raised B.


fun{PCName MyPC}
Expects a PC (an int) and returns a list of the corresponding symbolic note names (a list of atom). Complements function PC.


fun{Pitch SymPC#Octave}
Transforms a symbolic pair SymPC#Octave into the corresponding pitch (an int). SymPC is a pitch class symbol (an atom) as expected by the function PC, octave is an integer. The returned value depends on PitchesPerOctave.



End