Text.XML.MusicXML.Note

Contents

• Note entities
• Note
  • Note_
  • Instrument
  • Type
  • Dot
  • Accidental
  • Time_Modification
  • Stem
  • Notehead
  • Beam
  • Notations
    • Tied
    • Slur
    • Tuplet
    • Glissando
    • Slide
    • Ornaments
    • Technical
    • Articulations
    • Arpeggiate
    • Non_Arpeggiate
  • Lyric

Description

Synopsis

• type Full_Note = (Maybe Chord, Full_Note_)
• read_Full_Note :: StateT Result [Content i] Full_Note
• show_Full_Note :: Full_Note -> [Content ()]
• data Full_Note_
  • = Full_Note_1 Pitch
  • | Full_Note_2 Unpitched
  • | Full_Note_3 Rest
• read_Full_Note_ :: StateT Result [Content i] Full_Note_
• show_Full_Note_ :: Full_Note_ -> [Content ()]
• type Note = ((Print_Style, Printout, Maybe CDATA, Maybe CDATA, Maybe CDATA, Maybe CDATA, Maybe CDATA, Maybe Yes_No), (Note_, Maybe Instrument, Editorial_Voice, Maybe Type, [Dot], Maybe Accidental, Maybe Time_Modification, Maybe Stem, Maybe Notehead, Maybe Staff, [Beam], [Notations], [Lyric]))
• read_Note :: Eq i => StateT Result [Content i] Note
• show_Note :: Note -> [Content ()]
• data Note_
  • = Note_1 (Grace, Full_Note, Maybe (Tie, Maybe Tie))
  • | Note_2 (Cue, Full_Note, Duration)
  • | Note_3 (Full_Note, Duration, Maybe (Tie, Maybe Tie))
• read_Note_ :: StateT Result [Content i] Note_
• read_Note_aux1 :: StateT Result [Content i] (Grace, Full_Note, Maybe (Tie, Maybe Tie))
• read_Note_aux2 :: StateT Result [Content i] (Cue, Full_Note, Duration)
• read_Note_aux3 :: StateT Result [Content i] (Full_Note, Duration, Maybe (Tie, Maybe Tie))
• read_Note_aux4 :: StateT Result [Content i] (Tie, Maybe Tie)
• show_Note_ :: Note_ -> [Content ()]
• show_Note_aux1 :: (Tie, Maybe Tie) -> [Content ()]
• type Pitch = (Step, Maybe Alter, Octave)
• read_Pitch :: StateT Result [Content i] Pitch
• show_Pitch :: Pitch -> [Content ()]
• type Step = PCDATA
• read_Step :: StateT Result [Content i] Step
• show_Step :: Step -> [Content ()]
• type Alter = PCDATA
• read_Alter :: StateT Result [Content i] Alter
• show_Alter :: Alter -> [Content ()]
• type Octave = PCDATA
• read_Octave :: StateT Result [Content i] Octave
• show_Octave :: Octave -> [Content ()]
• type Cue = ()
• read_Cue :: StateT Result [Content i] Cue
• show_Cue :: Cue -> [Content ()]
• type Grace = ((Maybe CDATA, Maybe CDATA, Maybe CDATA, Maybe Yes_No), ())
• read_Grace :: StateT Result [Content i] Grace
• show_Grace :: Grace -> [Content ()]
• type Chord = ()
• read_Chord :: StateT Result [Content i] Chord
• show_Chord :: Chord -> [Content ()]
• type Unpitched = Maybe (Display_Step, Display_Octave)
• read_Unpitched :: StateT Result [Content i] Unpitched
• read_Unpitched_aux1 :: StateT Result [Content i] (Display_Step, Display_Octave)
• show_Unpitched :: Unpitched -> [Content ()]
• type Display_Step = PCDATA
• read_Display_Step :: StateT Result [Content i] Display_Step
• show_Display_Step :: Display_Step -> [Content ()]
• type Display_Octave = PCDATA
• read_Display_Octave :: StateT Result [Content i] Display_Octave
• show_Display_Octave :: Display_Octave -> [Content ()]
• type Rest = Maybe (Display_Step, Display_Octave)
• read_Rest :: StateT Result [Content i] Rest
• read_Rest_aux1 :: StateT Result [Content i] (Display_Step, Display_Octave)
• show_Rest :: Rest -> [Content ()]
• type Duration = PCDATA
• read_Duration :: StateT Result [Content i] Duration
• show_Duration :: Duration -> [Content ()]
• type Tie = (Start_Stop, ())
• read_Tie :: StateT Result [Content i] Tie
• show_Tie :: Tie -> [Content ()]
• type Instrument = (ID, ())
• read_Instrument :: StateT Result [Content i] Instrument
• show_Instrument :: Instrument -> [Content ()]
• type Type = (Maybe Symbol_Size, PCDATA)
• read_Type :: StateT Result [Content i] Type
• show_Type :: Type -> [Content ()]
• type Dot = ((Print_Style, Placement), ())
• read_Dot :: StateT Result [Content i] Dot
• show_Dot :: Dot -> [Content ()]
• type Accidental = ((Maybe Yes_No, Maybe Yes_No, Level_Display, Print_Style), PCDATA)
• read_Accidental :: StateT Result [Content i] Accidental
• show_Accidental :: Accidental -> [Content ()]
• type Time_Modification = (Actual_Notes, Normal_Notes, Maybe (Normal_Type, [Normal_Dot]))
• read_Time_Modification :: Eq i => StateT Result [Content i] Time_Modification
• read_Time_Modification_aux1 :: Eq i => StateT Result [Content i] (Normal_Type, [Normal_Dot])
• show_Time_Modification :: Time_Modification -> [Content ()]
• type Stem = ((Position, Color), PCDATA)
• read_Stem :: StateT Result [Content i] Stem
• show_Stem :: Stem -> [Content ()]
• type Notehead = ((Maybe Yes_No, Maybe Yes_No, Font, Color), PCDATA)
• read_Notehead :: StateT Result [Content i] Notehead
• show_Notehead :: Notehead -> [Content ()]
• type Beam = ((Beam_Level, Maybe Yes_No, Maybe Beam_, Color), PCDATA)
• read_Beam :: StateT Result [Content i] Beam
• show_Beam :: Beam -> [Content ()]
• data Beam_
  • = Beam_Accel
  • | Beam_Rit
  • | Beam_None
• read_Beam_ :: String -> Result Beam_
• show_Beam_ :: Beam_ -> String
• type Notations = (Editorial, [Notations_])
• read_Notations :: Eq i => StateT Result [Content i] Notations
• show_Notations :: Notations -> [Content ()]
• data Notations_
  • = Notations_1 Tied
  • | Notations_2 Slur
  • | Notations_3 Tuplet
  • | Notations_4 Glissando
  • | Notations_5 Slide
  • | Notations_6 Ornaments
  • | Notations_7 Technical
  • | Notations_8 Articulations
  • | Notations_9 Dynamics
  • | Notations_10 Fermata
  • | Notations_11 Arpeggiate
  • | Notations_12 Non_Arpeggiate
  • | Notations_13 Accidental_Mark
  • | Notations_14 Other_Notation
• read_Notations_ :: Eq i => StateT Result [Content i] Notations_
• show_Notations_ :: Notations_ -> [Content ()]
• type Tied = ((Start_Stop, Maybe Number_Level, Line_Type, Position, Placement, Orientation, Bezier, Color), ())
• read_Tied :: StateT Result [Content i] Tied
• show_Tied :: Tied -> [Content ()]
• type Slur = ((Start_Stop_Continue, Number_Level, Line_Type, Position, Placement, Orientation, Bezier, Color), ())
• read_Slur :: StateT Result [Content i] Slur
• show_Slur :: Slur -> [Content ()]
• type Tuplet = ((Start_Stop, Maybe Number_Level, Maybe Yes_No, Maybe Tuplet_, Maybe Tuplet_, Line_Shape, Position, Placement), (Maybe Tuplet_Actual, Maybe Tuplet_Normal))
• read_Tuplet :: Eq i => StateT Result [Content i] Tuplet
• show_Tuplet :: Tuplet -> [Content ()]
• data Tuplet_
  • = Tuplet_1
  • | Tuplet_2
  • | Tuplet_3
• read_Tuplet_ :: String -> Result Tuplet_
• show_Tuplet_ :: Tuplet_ -> String
• type Tuplet_Actual = (Maybe Tuplet_Number, Maybe Tuplet_Type, [Tuplet_Dot])
• read_Tuplet_Actual :: Eq i => StateT Result [Content i] Tuplet_Actual
• show_Tuplet_Actual :: Tuplet_Actual -> [Content ()]
• type Tuplet_Normal = (Maybe Tuplet_Number, Maybe Tuplet_Type, [Tuplet_Dot])
• read_Tuplet_Normal :: Eq i => StateT Result [Content i] Tuplet_Normal
• show_Tuplet_Normal :: Tuplet_Normal -> [Content ()]
• type Tuplet_Number = ((Font, Color), PCDATA)
• read_Tuplet_Number :: StateT Result [Content i] Tuplet_Number
• show_Tuplet_Number :: Tuplet_Number -> [Content ()]
• type Tuplet_Type = ((Font, Color), PCDATA)
• read_Tuplet_Type :: StateT Result [Content i] Tuplet_Type
• show_Tuplet_Type :: Tuplet_Type -> [Content ()]
• type Tuplet_Dot = ((Font, Color), ())
• read_Tuplet_Dot :: StateT Result [Content i] Tuplet_Dot
• show_Tuplet_Dot :: Tuplet_Dot -> [Content ()]
• type Glissando = ((Start_Stop, Number_Level, Line_Type, Print_Style), PCDATA)
• read_Glissando :: StateT Result [Content i] Glissando
• show_Glissando :: Glissando -> [Content ()]
• type Slide = ((Start_Stop, Number_Level, Line_Type, Print_Style, Bend_Sound), PCDATA)
• read_Slide :: StateT Result [Content i] Slide
• show_Slide :: Slide -> [Content ()]
• type Other_Notation = ((Start_Stop_Single, Number_Level, Print_Object, Print_Style, Placement), PCDATA)
• read_Other_Notation :: StateT Result [Content i] Other_Notation
• show_Other_Notation :: Other_Notation -> [Content ()]
• type Ornaments = [(Ornaments_, [Accidental_Mark])]
• read_Ornaments :: Eq i => StateT Result [Content i] Ornaments
• read_Ornaments_aux1 :: Eq i => StateT Result [Content i] (Ornaments_, [Accidental_Mark])
• show_Ornaments :: Ornaments -> [Content ()]
• show_Ornaments_aux1 :: (Ornaments_, [Accidental_Mark]) -> [Content ()]
• data Ornaments_
  • = Ornaments_1 Trill_Mark
  • | Ornaments_2 Turn
  • | Ornaments_3 Delayed_Turn
  • | Ornaments_4 Inverted_Turn
  • | Ornaments_5 Shake
  • | Ornaments_6 Wavy_Line
  • | Ornaments_7 Mordent
  • | Ornaments_8 Inverted_Mordent
  • | Ornaments_9 Schleifer
  • | Ornaments_10 Tremolo
  • | Ornaments_11 Other_Ornament
• read_Ornaments_ :: StateT Result [Content i] Ornaments_
• show_Ornaments_ :: Ornaments_ -> [Content ()]
• type Trill_Mark = ((Print_Style, Placement, Trill_Sound), ())
• read_Trill_Mark :: StateT Result [Content i] Trill_Mark
• show_Trill_Mark :: Trill_Mark -> [Content ()]
• type Turn = ((Print_Style, Placement, Trill_Sound), ())
• read_Turn :: StateT Result [Content i] Turn
• show_Turn :: Turn -> [Content ()]
• type Delayed_Turn = ((Print_Style, Placement, Trill_Sound), ())
• read_Delayed_Turn :: StateT Result [Content i] Delayed_Turn
• show_Delayed_Turn :: Delayed_Turn -> [Content ()]
• type Inverted_Turn = ((Print_Style, Placement, Trill_Sound), ())
• read_Inverted_Turn :: StateT Result [Content i] Inverted_Turn
• show_Inverted_Turn :: Inverted_Turn -> [Content ()]
• type Shake = ((Print_Style, Placement, Trill_Sound), ())
• read_Shake :: StateT Result [Content i] Shake
• show_Shake :: Shake -> [Content ()]
• type Mordent = ((Maybe Yes_No, Print_Style, Placement, Trill_Sound), ())
• read_Mordent :: StateT Result [Content i] Mordent
• show_Mordent :: Mordent -> [Content ()]
• type Inverted_Mordent = ((Maybe Yes_No, Print_Style, Placement, Trill_Sound), ())
• read_Inverted_Mordent :: StateT Result [Content i] Inverted_Mordent
• show_Inverted_Mordent :: Inverted_Mordent -> [Content ()]
• type Schleifer = ((Print_Style, Placement), ())
• read_Schleifer :: StateT Result [Content i] Schleifer
• show_Schleifer :: Schleifer -> [Content ()]
• type Tremolo = ((Start_Stop_Single, Print_Style, Placement), PCDATA)
• read_Tremolo :: StateT Result [Content i] Tremolo
• show_Tremolo :: Tremolo -> [Content ()]
• type Other_Ornament = ((Print_Style, Placement), PCDATA)
• read_Other_Ornament :: StateT Result [Content i] Other_Ornament
• show_Other_Ornament :: Other_Ornament -> [Content ()]
• type Accidental_Mark = ((Print_Style, Placement), CDATA)
• read_Accidental_Mark :: StateT Result [Content i] Accidental_Mark
• show_Accidental_Mark :: Accidental_Mark -> [Content ()]
• type Technical = [Technical_]
• read_Technical :: Eq i => StateT Result [Content i] Technical
• show_Technical :: Technical -> [Content ()]
• data Technical_
  • = Technical_1 Up_Bow
  • | Technical_2 Down_Bow
  • | Technical_3 Harmonic
  • | Technical_4 Open_String
  • | Technical_5 Thumb_Position
  • | Technical_6 Fingering
  • | Technical_7 Pluck
  • | Technical_8 Double_Tongue
  • | Technical_9 Triple_Tongue
  • | Technical_10 Stopped
  • | Technical_11 Snap_Pizzicato
  • | Technical_12 Fret
  • | Technical_13 String
  • | Technical_14 Hammer_On
  • | Technical_15 Pull_Off
  • | Technical_16 Bend
  • | Technical_17 Tap
  • | Technical_18 Heel
  • | Technical_19 Toe
  • | Technical_20 Fingernails
  • | Technical_21 Other_Technical
• read_Technical_ :: StateT Result [Content i] Technical_
• show_Technical_ :: Technical_ -> [Content ()]
• type Up_Bow = ((Print_Style, Placement), ())
• read_Up_Bow :: StateT Result [Content i] Up_Bow
• show_Up_Bow :: Up_Bow -> [Content ()]
• type Down_Bow = ((Print_Style, Placement), ())
• read_Down_Bow :: StateT Result [Content i] Down_Bow
• show_Down_Bow :: Down_Bow -> [Content ()]
• type Harmonic = ((Print_Object, Print_Style, Placement), (Maybe Harmonic_A, Maybe Harmonic_B))
• read_Harmonic :: StateT Result [Content i] Harmonic
• show_Harmonic :: Harmonic -> [Content ()]
• data Harmonic_A
  • = Harmonic_1 Natural
  • | Harmonic_2 Artificial
• read_Harmonic_A :: StateT Result [Content i] Harmonic_A
• show_Harmonic_A :: Harmonic_A -> [Content ()]
• data Harmonic_B
  • = Harmonic_3 Base_Pitch
  • | Harmonic_4 Touching_Pitch
  • | Harmonic_5 Sounding_Pitch
• read_Harmonic_B :: StateT Result [Content i] Harmonic_B
• show_Harmonic_B :: Harmonic_B -> [Content ()]
• type Natural = ()
• read_Natural :: StateT Result [Content i] Natural
• show_Natural :: Natural -> [Content ()]
• type Artificial = ()
• read_Artificial :: StateT Result [Content i] Artificial
• show_Artificial :: Artificial -> [Content ()]
• type Base_Pitch = ()
• read_Base_Pitch :: StateT Result [Content i] Base_Pitch
• show_Base_Pitch :: Base_Pitch -> [Content ()]
• type Touching_Pitch = ()
• read_Touching_Pitch :: StateT Result [Content i] Touching_Pitch
• show_Touching_Pitch :: Touching_Pitch -> [Content ()]
• type Sounding_Pitch = ()
• read_Sounding_Pitch :: StateT Result [Content i] Sounding_Pitch
• show_Sounding_Pitch :: Sounding_Pitch -> [Content ()]
• type Open_String = ((Print_Style, Placement), ())
• read_Open_String :: StateT Result [Content i] Open_String
• show_Open_String :: Open_String -> [Content ()]
• type Thumb_Position = ((Print_Style, Placement), ())
• read_Thumb_Position :: StateT Result [Content i] Thumb_Position
• show_Thumb_Position :: Thumb_Position -> [Content ()]
• type Pluck = ((Print_Style, Placement), PCDATA)
• read_Pluck :: StateT Result [Content i] Pluck
• show_Pluck :: Pluck -> [Content ()]
• type Double_Tongue = ((Print_Style, Placement), ())
• read_Double_Tongue :: StateT Result [Content i] Double_Tongue
• show_Double_Tongue :: Double_Tongue -> [Content ()]
• type Triple_Tongue = ((Print_Style, Placement), ())
• read_Triple_Tongue :: StateT Result [Content i] Triple_Tongue
• show_Triple_Tongue :: Triple_Tongue -> [Content ()]
• type Stopped = ((Print_Style, Placement), ())
• read_Stopped :: StateT Result [Content i] Stopped
• show_Stopped :: Stopped -> [Content ()]
• type Snap_Pizzicato = ((Print_Style, Placement), ())
• read_Snap_Pizzicato :: StateT Result [Content i] Snap_Pizzicato
• show_Snap_Pizzicato :: Snap_Pizzicato -> [Content ()]
• type Hammer_On = ((Start_Stop, Number_Level, Print_Style, Placement), PCDATA)
• read_Hammer_On :: StateT Result [Content i] Hammer_On
• show_Hammer_On :: Hammer_On -> [Content ()]
• type Pull_Off = ((Start_Stop, Number_Level, Print_Style, Placement), PCDATA)
• read_Pull_Off :: StateT Result [Content i] Pull_Off
• show_Pull_Off :: Pull_Off -> [Content ()]
• type Bend = ((Print_Style, Bend_Sound), (Bend_Alter, Maybe Bend_, Maybe With_Bar))
• read_Bend :: StateT Result [Content i] Bend
• show_Bend :: Bend -> [Content ()]
• data Bend_
  • = Bend_1 Pre_Bend
  • | Bend_2 Release
• read_Bend_ :: StateT Result [Content i] Bend_
• show_Bend_ :: Bend_ -> [Content ()]
• type Bend_Alter = PCDATA
• read_Bend_Alter :: StateT Result [Content i] Bend_Alter
• show_Bend_Alter :: Bend_Alter -> [Content ()]
• type Pre_Bend = ()
• read_Pre_Bend :: StateT Result [Content i] Pre_Bend
• show_Pre_Bend :: Pre_Bend -> [Content ()]
• type Release = ()
• read_Release :: StateT Result [Content i] Release
• show_Release :: Release -> [Content ()]
• type With_Bar = ((Print_Style, Placement), CDATA)
• read_With_Bar :: StateT Result [Content i] With_Bar
• show_With_Bar :: With_Bar -> [Content ()]
• type Tap = ((Print_Style, Placement), CDATA)
• read_Tap :: StateT Result [Content i] Tap
• show_Tap :: Tap -> [Content ()]
• type Heel = ((Maybe Yes_No, Print_Style, Placement), ())
• read_Heel :: StateT Result [Content i] Heel
• show_Heel :: Heel -> [Content ()]
• type Toe = ((Maybe Yes_No, Print_Style, Placement), ())
• read_Toe :: StateT Result [Content i] Toe
• show_Toe :: Toe -> [Content ()]
• type Fingernails = ((Print_Style, Placement), ())
• read_Fingernails :: StateT Result [Content i] Fingernails
• show_Fingernails :: Fingernails -> [Content ()]
• type Other_Technical = ((Print_Style, Placement), CDATA)
• read_Other_Technical :: StateT Result [Content i] Other_Technical
• show_Other_Technical :: Other_Technical -> [Content ()]
• type Articulations = [Articulations_]
• read_Articulations :: Eq i => StateT Result [Content i] Articulations
• show_Articulations :: Articulations -> [Content ()]
• data Articulations_
  • = Articulations_1 Accent
  • | Articulations_2 Strong_Accent
  • | Articulations_3 Staccato
  • | Articulations_4 Tenuto
  • | Articulations_5 Detached_Legato
  • | Articulations_6 Staccatissimo
  • | Articulations_7 Spiccato
  • | Articulations_8 Scoop
  • | Articulations_9 Plop
  • | Articulations_10 Doit
  • | Articulations_11 Falloff
  • | Articulations_12 Breath_Mark
  • | Articulations_13 Caesura
  • | Articulations_14 Stress
  • | Articulations_15 Unstress
  • | Articulations_16 Other_Articulation
• read_Articulations_ :: StateT Result [Content i] Articulations_
• show_Articulations_ :: Articulations_ -> [Content ()]
• type Accent = ((Print_Style, Placement), ())
• read_Accent :: StateT Result [Content i] Accent
• show_Accent :: Accent -> [Content ()]
• type Strong_Accent = ((Print_Style, Placement, Up_Down), ())
• read_Strong_Accent :: StateT Result [Content i] Strong_Accent
• show_Strong_Accent :: Strong_Accent -> [Content ()]
• type Staccato = ((Print_Style, Placement), ())
• read_Staccato :: StateT Result [Content i] Staccato
• show_Staccato :: Staccato -> [Content ()]
• type Tenuto = ((Print_Style, Placement), ())
• read_Tenuto :: StateT Result [Content i] Tenuto
• show_Tenuto :: Tenuto -> [Content ()]
• type Detached_Legato = ((Print_Style, Placement), ())
• read_Detached_Legato :: StateT Result [Content i] Detached_Legato
• show_Detached_Legato :: Detached_Legato -> [Content ()]
• type Staccatissimo = ((Print_Style, Placement), ())
• read_Staccatissimo :: StateT Result [Content i] Staccato
• show_Staccatissimo :: Staccatissimo -> [Content ()]
• type Spiccato = ((Print_Style, Placement), ())
• read_Spiccato :: StateT Result [Content i] Spiccato
• show_Spiccato :: Spiccato -> [Content ()]
• type Scoop = ((Line_Shape, Line_Type, Print_Style, Placement), ())
• read_Scoop :: StateT Result [Content i] Scoop
• show_Scoop :: Scoop -> [Content ()]
• type Plop = ((Line_Shape, Line_Type, Print_Style, Placement), ())
• read_Plop :: StateT Result [Content i] Plop
• show_Plop :: Plop -> [Content ()]
• type Doit = ((Line_Shape, Line_Type, Print_Style, Placement), ())
• read_Doit :: StateT Result [Content i] Doit
• show_Doit :: Doit -> [Content ()]
• type Falloff = ((Line_Shape, Line_Type, Print_Style, Placement), ())
• read_Falloff :: StateT Result [Content i] Falloff
• show_Falloff :: Falloff -> [Content ()]
• type Breath_Mark = ((Print_Style, Placement), ())
• read_Breath_Mark :: StateT Result [Content i] Breath_Mark
• show_Breath_Mark :: Breath_Mark -> [Content ()]
• type Caesura = ((Print_Style, Placement), ())
• read_Caesura :: StateT Result [Content i] Caesura
• show_Caesura :: Caesura -> [Content ()]
• type Stress = ((Print_Style, Placement), ())
• read_Stress :: StateT Result [Content i] Stress
• show_Stress :: Stress -> [Content ()]
• type Unstress = ((Print_Style, Placement), ())
• read_Unstress :: StateT Result [Content i] Unstress
• show_Unstress :: Staccato -> [Content ()]
• type Other_Articulation = ((Print_Style, Placement), ())
• read_Other_Articulation :: StateT Result [Content i] Other_Articulation
• show_Other_Articulation :: Other_Articulation -> [Content ()]
• type Arpeggiate = ((Maybe Number_Level, Maybe Up_Down, Position, Placement, Color), ())
• read_Arpeggiate :: StateT Result [Content i] Arpeggiate
• show_Arpeggiate :: Arpeggiate -> [Content ()]
• type Non_Arpeggiate = ((Top_Bottom, Maybe Number_Level, Position, Placement, Color), ())
• read_Non_Arpeggiate :: StateT Result [Content i] Non_Arpeggiate
• show_Non_Arpeggiate :: Non_Arpeggiate -> [Content ()]
• type Lyric = ((Maybe CDATA, Maybe CDATA, Justify, Position, Placement, Color), (Lyric_, Maybe End_Line, Maybe End_Paragraph, Editorial))
• read_Lyric :: Eq i => StateT Result [Content i] Lyric
• show_Lyric :: Lyric -> [Content ()]
• data Lyric_
  • = Lyric_1 ((Maybe Syllabic, Text), [(Maybe Elision, Maybe Syllabic, Text)], Maybe Extend)
  • | Lyric_2 Extend
  • | Lyric_3 Laughing
  • | Lyric_4 Humming
• read_Lyric_ :: Eq i => StateT Result [Content i] Lyric_
• read_Lyric_aux1 :: Eq i => StateT Result [Content i] ((Maybe Syllabic, Text), [(Maybe Elision, Maybe Syllabic, Text)], Maybe Extend)
• read_Lyric_aux2 :: StateT Result [Content i] (Maybe Elision, Maybe Syllabic, Text)
• show_Lyric_ :: Lyric_ -> [Content ()]
• show_Lyric_aux1 :: (Maybe Elision, Maybe Syllabic, Text) -> [Content ()]
• type Text = ((Font, Color, Text_Decoration, Text_Rotation, Letter_Spacing, Maybe CDATA, Text_Direction), CDATA)
• read_Text :: StateT Result [Content i] Text
• show_Text :: Text -> [Content ()]
• type Syllabic = PCDATA
• read_Syllabic :: StateT Result [Content i] Syllabic
• show_Syllabic :: Syllabic -> [Content ()]
• type Elision = ((Font, Color), CDATA)
• read_Elision :: StateT Result [Content i] Elision
• show_Elision :: Elision -> [Content ()]
• type Extend = ((Font, Color), ())
• read_Extend :: StateT Result [Content i] Extend
• show_Extend :: Extend -> [Content ()]
• type Laughing = ()
• read_Laughing :: StateT Result [Content i] Laughing
• show_Laughing :: Laughing -> [Content ()]
• type Humming = ()
• read_Humming :: StateT Result [Content i] Humming
• show_Humming :: Humming -> [Content ()]
• type End_Line = ()
• read_End_Line :: StateT Result [Content i] End_Line
• show_End_Line :: End_Line -> [Content ()]
• type End_Paragraph = ()
• read_End_Paragraph :: StateT Result [Content i] End_Paragraph
• show_End_Paragraph :: End_Paragraph -> [Content ()]
• type Figured_Bass = ((Print_Style, Printout, Maybe Yes_No), ([Figure], Maybe Duration, Editorial))
• read_Figured_Bass :: Eq i => StateT Result [Content i] Figured_Bass
• show_Figured_Bass :: Figured_Bass -> [Content ()]
• type Figure = (Maybe Prefix, Maybe Figure_Number, Maybe Suffix, Maybe Extend)
• read_Figure :: StateT Result [Content i] Figure
• show_Figure :: Figure -> [Content ()]
• type Prefix = (Print_Style, CDATA)
• read_Prefix :: StateT Result [Content i] Prefix
• show_Prefix :: Prefix -> [Content ()]
• type Figure_Number = (Print_Style, PCDATA)
• read_Figure_Number :: StateT Result [Content i] Figure_Number
• show_Figure_Number :: Figure_Number -> [Content ()]
• type Suffix = (Print_Style, PCDATA)
• read_Suffix :: StateT Result [Content i] Suffix
• show_Suffix :: Suffix -> [Content ()]
• type Backup = (Duration, Editorial)
• read_Backup :: StateT Result [Content i] Backup
• show_Backup :: Backup -> [Content ()]
• type Forward = (Duration, Editorial_Voice, Maybe Staff)
• read_Forward :: StateT Result [Content i] Forward
• show_Forward :: Forward -> [Content ()]

Note entities

Note

Note_

Instrument

Type

Dot

Accidental

Time_Modification

Stem

Notehead

Beam

Notations

Tied

Slur

Tuplet

Glissando

Slide

Ornaments

Technical

Articulations

Arpeggiate

Non_Arpeggiate

Lyric