Music.Typesetting.Model

Synopsis

• type Font_Family_T = String
• data Font_Style_T
  • = Font_Style_Normal
  • | Font_Style_Italic
• type Font_Size_T = Int
• data Font_Weight_T
  • = Font_Weight_Normal
  • | Font_Weight_Bold
• data Font_T = Font Font_Family_T Font_Style_T Font_Size_T Font_Weight_T
• data Articulation_T
  • = Accent
  • | Staccato
  • | Strong_Accent
  • | Tenuto
• data Ornament_T = Trill_Mark
• data Harmonic_T
  • = Natural_Harmonic
  • | Artifical_Harmonic
• data Technical_T
  • = Up_Bow
  • | Down_Bow
  • | Harmonic Harmonic_T
  • | Open_String
  • | Stopped
  • | Snap_Pizzicato
  • | Other_Technical (Maybe Font_T) String
• data Placement_T
  • = Above
  • | Below
• type Tuplet_T = (Integer, Duration, Integer, Duration)
• data Pedal_T
  • = Pedal_Start
  • | Pedal_Stop
  • | Pedal_Continue
  • | Pedal_Change
• data Sound_T
  • = Sound_Tempo Double
  • | Sound_Dynamics Double
• data Direction_T
  • = D_Rehearsal String
  • | D_Words Placement_T String
  • | D_Hairpin Hairpin_T
  • | D_Dynamic_Mark Dynamic_Mark_T
  • | D_Pedal {
    • pedal_type :: Pedal_T
    • pedal_line :: Bool
    • pedal_sign :: Bool
    }
  • | D_Tempo_Marking Tempo_Marking
• data Beam_T
  • = Beam_Begin
  • | Beam_Continue
  • | Beam_End
• data Notehead_T
  • = Notehead_Triangle
  • | Notehead_Diamond
  • | Notehead_Square
  • | Notehead_Cross
• data N_Annotation
  • = N_Grace
  • | N_Chord
  • | N_Pitch Pitch
  • | N_Unpitched
  • | N_Rest
  • | N_Notehead Notehead_T
  • | N_Staff Integer
  • | N_Beam Integer Beam_T
  • | N_Begin_Tied
  • | N_End_Tied
  • | N_Begin_Slur
  • | N_End_Slur
  • | N_Begin_Tuplet (Maybe Tuplet_T)
  • | N_End_Tuplet
  • | N_Begin_Glissando
  • | N_End_Glissando
  • | N_Begin_Slide
  • | N_End_Slide
  • | N_Stem_Tremolo Integer
  • | N_Ornament Ornament_T
  • | N_Technical Technical_T
  • | N_Articulation Articulation_T
  • | N_Fermata
  • | N_Arpeggiate
  • | N_Direction Direction_T
  • | N_Voice Integer
  • | N_Backup [Duration]
• data Note = Note {
  • n_duration :: Duration
  • n_annotations :: [N_Annotation]
  }
• data M_Annotation
  • = M_Division Integer
  • | M_Key Note_T (Maybe Alteration_T) Mode_T
  • | M_Time_Signature Time_Signature
  • | M_Staves Integer
  • | M_Clef (Clef Integer) Integer
  • | M_Direction Direction_T
• data Measure = Measure {
  • m_annotations :: [M_Annotation]
  • m_notes :: [Note]
  }
• type Name = (String, String)
• data Group_Symbol_T
  • = None
  • | Brace
  • | Line
  • | Bracket
• data P_Annotation = P_Name Name
• data G_Annotation
  • = G_Name Name
  • | G_Symbol Group_Symbol_T
• type ID = Integer
• data Part
  • = Part (Maybe ID) [P_Annotation] [Measure]
  • | Group (Maybe ID) [G_Annotation] [Part]
• data Score = Score [Part]

Documentation