Text.XML.MusicXML.Common

Contents

• Entities
• Attributes
• Attributes
• Attributes
• Elements
• Elements

Description

Synopsis

• module Text.XML.MusicXML.Util
• type YYYY_MM_DD = PCDATA
• read_YYYY_MM_DD :: StateT Result [Content i] YYYY_MM_DD
• show_YYYY_MM_DD :: YYYY_MM_DD -> [Content ()]
• type Tenths = CDATA
• read_Tenths :: String -> Result Tenths
• show_Tenths :: Tenths -> String
• type Layout_Tenths = PCDATA
• read_Layout_Tenths :: StateT Result [Content i] Layout_Tenths
• show_Layout_Tenths :: Layout_Tenths -> [Content ()]
• data Start_Stop
  • = Start_Stop_1
  • | Start_Stop_2
• read_Start_Stop :: String -> Result Start_Stop
• show_Start_Stop :: Start_Stop -> String
• data Start_Stop_Continue
  • = Start_Stop_Continue_1
  • | Start_Stop_Continue_2
  • | Start_Stop_Continue_3
• read_Start_Stop_Continue :: String -> Result Start_Stop_Continue
• show_Start_Stop_Continue :: Start_Stop_Continue -> String
• data Start_Stop_Single
  • = Start_Stop_Single_1
  • | Start_Stop_Single_2
  • | Start_Stop_Single_3
• read_Start_Stop_Single :: String -> Result Start_Stop_Single
• show_Start_Stop_Single :: Start_Stop_Single -> String
• type Yes_No = Bool
• read_Yes_No :: String -> Result Yes_No
• show_Yes_No :: Yes_No -> String
• type Yes_No_Number = CDATA
• read_Yes_No_Number :: String -> Result Yes_No_Number
• show_Yes_No_Number :: Yes_No_Number -> String
• data Symbol_Size
  • = Symbol_Size_1
  • | Symbol_Size_2
  • | Symbol_Size_3
• read_Symbol_Size :: String -> Result Symbol_Size
• show_Symbol_Size :: Symbol_Size -> String
• data Up_Down
  • = Up_Down_1
  • | Up_Down_2
• read_Up_Down :: String -> Result Up_Down
• show_Up_Down :: Up_Down -> String
• data Top_Bottom
  • = Top_Bottom_1
  • | Top_Bottom_2
• read_Top_Bottom :: String -> Result Top_Bottom
• show_Top_Bottom :: Top_Bottom -> String
• data Left_Right
  • = Left_Right_1
  • | Left_Right_2
• read_Left_Right :: String -> Result Left_Right
• show_Left_Right :: Left_Right -> String
• data Number_Of_Lines
  • = Number_Of_Lines_0
  • | Number_Of_Lines_1
  • | Number_Of_Lines_2
  • | Number_Of_Lines_3
• read_Number_Of_Lines :: String -> Result Number_Of_Lines
• show_Number_Of_Lines :: Number_Of_Lines -> String
• data Number_Level
  • = Number_Level_1
  • | Number_Level_2
  • | Number_Level_3
  • | Number_Level_4
  • | Number_Level_5
  • | Number_Level_6
• read_Number_Level :: String -> Result Number_Level
• show_Number_Level :: Number_Level -> String
• data Beam_Level
  • = Beam_Level_1
  • | Beam_Level_2
  • | Beam_Level_3
  • | Beam_Level_4
  • | Beam_Level_5
  • | Beam_Level_6
• read_Beam_Level :: String -> Result Beam_Level
• show_Beam_Level :: Beam_Level -> String
• type Position = (Maybe Tenths, Maybe Tenths, Maybe Tenths, Maybe Tenths)
• read_Position :: StateT Result [Attribute] Position
• show_Position :: Position -> [Attribute]
• type Placement = Maybe Placement_
• read_Placement :: StateT Result [Attribute] Placement
• show_Placement :: Placement -> [Attribute]
• data Placement_
  • = Placement_1
  • | Placement_2
• read_Placement_ :: String -> Result Placement_
• show_Placement_ :: Placement_ -> String
• type Orientation = Maybe Orientation_
• read_Orientation :: StateT Result [Attribute] Orientation
• show_Orientation :: Orientation -> [Attribute]
• data Orientation_
  • = Orientation_1
  • | Orientation_2
• read_Orientation_ :: String -> Result Orientation_
• show_Orientation_ :: Orientation_ -> String
• type Directive = Maybe Yes_No
• read_Directive :: StateT Result [Attribute] Directive
• show_Directive :: Directive -> [Attribute]
• type Bezier = (Maybe CDATA, Maybe CDATA, Maybe Tenths, Maybe Tenths, Maybe Tenths, Maybe Tenths)
• read_Bezier :: StateT Result [Attribute] Bezier
• show_Bezier :: Bezier -> [Attribute]
• type Font = (Maybe CDATA, Maybe CDATA, Maybe CDATA, Maybe CDATA)
• read_Font :: StateT Result [Attribute] Font
• show_Font :: Font -> [Attribute]
• type Color = Maybe CDATA
• read_Color :: StateT Result [Attribute] Color
• show_Color :: Color -> [Attribute]
• type Text_Decoration = (Maybe Number_Of_Lines, Maybe Number_Of_Lines, Maybe Number_Of_Lines)
• read_Text_Decoration :: StateT Result [Attribute] Text_Decoration
• show_Text_Decoration :: Text_Decoration -> [Attribute]
• type Justify = Maybe Justify_
• read_Justify :: StateT Result [Attribute] Justify
• show_Justify :: Justify -> [Attribute]
• data Justify_
  • = Justify_1
  • | Justify_2
  • | Justify_3
• read_Justify_ :: String -> Result Justify_
• show_Justify_ :: Justify_ -> String
• type Halign = Maybe Halign_
• read_Halign :: StateT Result [Attribute] Halign
• show_Halign :: Halign -> [Attribute]
• data Halign_
  • = Halign_1
  • | Halign_2
  • | Halign_3
• read_Halign_ :: String -> Result Halign_
• show_Halign_ :: Halign_ -> String
• type Valign = Maybe Valign_
• read_Valign :: StateT Result [Attribute] Valign
• show_Valign :: Valign -> [Attribute]
• data Valign_
  • = Valign_1
  • | Valign_2
  • | Valign_3
  • | Valign_4
• read_Valign_ :: String -> Result Valign_
• show_Valign_ :: Valign_ -> String
• type Valign_Image = Maybe Valign_Image_
• read_Valign_Image :: StateT Result [Attribute] Valign_Image
• show_Valign_Image :: Valign_Image -> [Attribute]
• data Valign_Image_
  • = Valign_Image_1
  • | Valign_Image_2
  • | Valign_Image_3
• read_Valign_Image_ :: String -> Result Valign_Image_
• show_Valign_Image_ :: Valign_Image_ -> String
• type Letter_Spacing = Maybe CDATA
• read_Letter_Spacing :: StateT Result [Attribute] Letter_Spacing
• show_Letter_Spacing :: Letter_Spacing -> [Attribute]
• type Line_Height = Maybe CDATA
• read_Line_Height :: StateT Result [Attribute] Line_Height
• show_Line_Height :: Line_Height -> [Attribute]
• type Text_Direction = Maybe Text_Direction_
• read_Text_Direction :: StateT Result [Attribute] Text_Direction
• show_Text_Direction :: Text_Direction -> [Attribute]
• data Text_Direction_
  • = Text_Direction_1
  • | Text_Direction_2
  • | Text_Direction_3
  • | Text_Direction_4
• read_Text_Direction_ :: String -> Result Text_Direction_
• show_Text_Direction_ :: Text_Direction_ -> String
• type Text_Rotation = Maybe CDATA
• read_Text_Rotation :: StateT Result [Attribute] Text_Rotation
• show_Text_Rotation :: Text_Rotation -> [Attribute]
• type Print_Style = (Position, Font, Color)
• read_Print_Style :: StateT Result [Attribute] Print_Style
• show_Print_Style :: Print_Style -> [Attribute]
• type Line_Shape = Maybe Line_Shape_
• read_Line_Shape :: StateT Result [Attribute] Line_Shape
• show_Line_Shape :: Line_Shape -> [Attribute]
• data Line_Shape_
  • = Line_Shape_1
  • | Line_Shape_2
• read_Line_Shape_ :: String -> Result Line_Shape_
• show_Line_Shape_ :: Line_Shape_ -> String
• type Line_Type = Maybe Line_Type_
• read_Line_Type :: StateT Result [Attribute] Line_Type
• show_Line_Type :: Line_Type -> [Attribute]
• data Line_Type_
  • = Line_Type_1
  • | Line_Type_2
  • | Line_Type_3
  • | Line_Type_4
• read_Line_Type_ :: String -> Result Line_Type_
• show_Line_Type_ :: Line_Type_ -> String
• type Print_Object = Maybe Yes_No
• read_Print_Object :: StateT Result [Attribute] Print_Object
• show_Print_Object :: Print_Object -> [Attribute]
• type Print_Spacing = Maybe Yes_No
• read_Print_Spacing :: StateT Result [Attribute] Print_Spacing
• show_Print_Spacing :: Print_Spacing -> [Attribute]
• type Printout = (Print_Object, Maybe Yes_No, Print_Spacing, Maybe Yes_No)
• read_Printout :: StateT Result [Attribute] Printout
• show_Printout :: Printout -> [Attribute]
• type Text_Formatting = (Justify, Halign, Valign, Print_Style, Text_Decoration, Text_Rotation, Letter_Spacing, Line_Height, Maybe CDATA, Text_Direction, Maybe Text_Formatting_)
• read_Text_Formatting :: StateT Result [Attribute] Text_Formatting
• show_Text_Formatting :: Text_Formatting -> [Attribute]
• data Text_Formatting_
  • = Text_Formatting_1
  • | Text_Formatting_2
  • | Text_Formatting_3
• read_Text_Formatting_ :: String -> Result Text_Formatting_
• show_Text_Formatting_ :: Text_Formatting_ -> String
• type Level_Display = (Maybe Yes_No, Maybe Yes_No, Maybe Symbol_Size)
• read_Level_Display :: StateT Result [Attribute] Level_Display
• show_Level_Display :: Level_Display -> [Attribute]
• type Trill_Sound = (Maybe Trill_Sound_A, Maybe Trill_Sound_B, Maybe Trill_Sound_C, Maybe Bool, Maybe CDATA, Maybe CDATA, Maybe CDATA)
• read_Trill_Sound :: StateT Result [Attribute] Trill_Sound
• show_Trill_Sound :: Trill_Sound -> [Attribute]
• data Trill_Sound_A
  • = Trill_Sound_1
  • | Trill_Sound_2
  • | Trill_Sound_3
• read_Trill_Sound_A :: String -> Result Trill_Sound_A
• show_Trill_Sound_A :: Trill_Sound_A -> String
• data Trill_Sound_B
  • = Trill_Sound_4
  • | Trill_Sound_5
  • | Trill_Sound_6
• read_Trill_Sound_B :: String -> Result Trill_Sound_B
• show_Trill_Sound_B :: Trill_Sound_B -> String
• data Trill_Sound_C
  • = Trill_Sound_7
  • | Trill_Sound_8
  • | Trill_Sound_9
• read_Trill_Sound_C :: String -> Result Trill_Sound_C
• show_Trill_Sound_C :: Trill_Sound_C -> String
• type Bend_Sound = (Maybe Yes_No, Maybe CDATA, Maybe CDATA, Maybe CDATA)
• read_Bend_Sound :: StateT Result [Attribute] Bend_Sound
• show_Bend_Sound :: Bend_Sound -> [Attribute]
• type Document_Attributes = CDATA
• read_Document_Attributes :: StateT Result [Attribute] Document_Attributes
• show_Document_Attributes :: Document_Attributes -> [Attribute]
• type Editorial = (Maybe Footnote, Maybe Level)
• read_Editorial :: StateT Result [Content i] Editorial
• show_Editorial :: Editorial -> [Content ()]
• type Editorial_Voice = (Maybe Footnote, Maybe Level, Maybe Voice)
• read_Editorial_Voice :: StateT Result [Content i] Editorial_Voice
• show_Editorial_Voice :: Editorial_Voice -> [Content ()]
• type Footnote = (Text_Formatting, PCDATA)
• read_Footnote :: StateT Result [Content i] Footnote
• show_Footnote :: Footnote -> [Content ()]
• type Level = ((Maybe Yes_No, Level_Display), PCDATA)
• read_Level :: StateT Result [Content i] Level
• show_Level :: Level -> [Content ()]
• type Voice = PCDATA
• read_Voice :: StateT Result [Content i] Voice
• show_Voice :: Voice -> [Content ()]
• type Fermata = ((Maybe Fermata_, Print_Style), PCDATA)
• data Fermata_
  • = Fermata_1
  • | Fermata_2
• read_Fermata_ :: String -> Result Fermata_
• show_Fermata_ :: Fermata_ -> String
• read_Fermata :: StateT Result [Content i] Fermata
• show_Fermata :: Fermata -> [Content ()]
• type Wavy_Line = ((Start_Stop_Continue, Maybe Number_Level, Position, Placement, Color, Trill_Sound), ())
• read_Wavy_Line :: StateT Result [Content i] Wavy_Line
• show_Wavy_Line :: Wavy_Line -> [Content ()]
• type Staff = PCDATA
• read_Staff :: StateT Result [Content i] Staff
• show_Staff :: Staff -> [Content ()]
• type Segno = (Print_Style, ())
• read_Segno :: StateT Result [Content i] Segno
• show_Segno :: Segno -> [Content ()]
• type Coda = (Print_Style, ())
• read_Coda :: StateT Result [Content i] Coda
• show_Coda :: Coda -> [Content ()]
• type Actual_Notes = PCDATA
• read_Actual_Notes :: StateT Result [Content i] Actual_Notes
• show_Actual_Notes :: Actual_Notes -> [Content ()]
• type Normal_Notes = PCDATA
• read_Normal_Notes :: StateT Result [Content i] Normal_Notes
• show_Normal_Notes :: Normal_Notes -> [Content ()]
• type Normal_Type = PCDATA
• read_Normal_Type :: StateT Result [Content i] Normal_Type
• show_Normal_Type :: Normal_Type -> [Content ()]
• type Normal_Dot = ()
• read_Normal_Dot :: StateT Result [Content i] Normal_Dot
• show_Normal_Dot :: Normal_Dot -> [Content ()]
• type Dynamics = ((Print_Style, Placement), [Dynamics_])
• read_Dynamics :: Eq i => StateT Result [Content i] Dynamics
• show_Dynamics :: Dynamics -> [Content ()]
• data Dynamics_
  • = Dynamics_1 P
  • | Dynamics_2 PP
  • | Dynamics_3 PPP
  • | Dynamics_4 PPPP
  • | Dynamics_5 PPPPP
  • | Dynamics_6 PPPPPP
  • | Dynamics_7 F
  • | Dynamics_8 FF
  • | Dynamics_9 FFF
  • | Dynamics_10 FFFF
  • | Dynamics_11 FFFFF
  • | Dynamics_12 FFFFFF
  • | Dynamics_13 MP
  • | Dynamics_14 MF
  • | Dynamics_15 SF
  • | Dynamics_16 SFP
  • | Dynamics_17 SFPP
  • | Dynamics_18 FP
  • | Dynamics_19 RF
  • | Dynamics_20 RFZ
  • | Dynamics_21 SFZ
  • | Dynamics_22 SFFZ
  • | Dynamics_23 FZ
  • | Dynamics_24 Other_Dynamics
• read_Dynamics_ :: StateT Result [Content i] Dynamics_
• show_Dynamics_ :: Dynamics_ -> [Content ()]
• type P = ()
• read_P :: StateT Result [Content i] P
• show_P :: P -> [Content ()]
• type PP = ()
• read_PP :: StateT Result [Content i] PP
• show_PP :: PP -> [Content ()]
• type PPP = ()
• read_PPP :: StateT Result [Content i] PPP
• show_PPP :: PPP -> [Content ()]
• type PPPP = ()
• read_PPPP :: StateT Result [Content i] PPPP
• show_PPPP :: PPPP -> [Content ()]
• type PPPPP = ()
• read_PPPPP :: StateT Result [Content i] PPPPP
• show_PPPPP :: PPPPP -> [Content ()]
• type PPPPPP = ()
• read_PPPPPP :: StateT Result [Content i] PPPPPP
• show_PPPPPP :: PPPPPP -> [Content ()]
• type FFFFFF = ()
• read_FFFFFF :: StateT Result [Content i] FFFFFF
• show_FFFFFF :: FFFFFF -> [Content ()]
• type FFFFF = ()
• read_FFFFF :: StateT Result [Content i] FFFFF
• show_FFFFF :: FFFFF -> [Content ()]
• type FFFF = ()
• read_FFFF :: StateT Result [Content i] FFFF
• show_FFFF :: FFFF -> [Content ()]
• type FFF = ()
• read_FFF :: StateT Result [Content i] FFF
• show_FFF :: FFF -> [Content ()]
• type FF = ()
• read_FF :: StateT Result [Content i] FF
• show_FF :: FF -> [Content ()]
• type F = ()
• read_F :: StateT Result [Content i] F
• show_F :: F -> [Content ()]
• type MP = ()
• read_MP :: StateT Result [Content i] MP
• show_MP :: MP -> [Content ()]
• type MF = ()
• read_MF :: StateT Result [Content i] MF
• show_MF :: MF -> [Content ()]
• type SF = ()
• read_SF :: StateT Result [Content i] SF
• show_SF :: SF -> [Content ()]
• type SFP = ()
• read_SFP :: StateT Result [Content i] SFP
• show_SFP :: SFP -> [Content ()]
• type SFPP = ()
• read_SFPP :: StateT Result [Content i] SFPP
• show_SFPP :: SFPP -> [Content ()]
• type FP = ()
• read_FP :: StateT Result [Content i] FP
• show_FP :: FP -> [Content ()]
• type RF = ()
• read_RF :: StateT Result [Content i] RF
• show_RF :: RF -> [Content ()]
• type RFZ = ()
• read_RFZ :: StateT Result [Content i] RFZ
• show_RFZ :: RFZ -> [Content ()]
• type SFZ = ()
• read_SFZ :: StateT Result [Content i] SFZ
• show_SFZ :: SFZ -> [Content ()]
• type SFFZ = ()
• read_SFFZ :: StateT Result [Content i] SFFZ
• show_SFFZ :: SFFZ -> [Content ()]
• type FZ = ()
• read_FZ :: StateT Result [Content i] FZ
• show_FZ :: FZ -> [Content ()]
• type Other_Dynamics = PCDATA
• read_Other_Dynamics :: StateT Result [Content i] Other_Dynamics
• show_Other_Dynamics :: Other_Dynamics -> [Content ()]
• type Fingering = ((Maybe Yes_No, Maybe Yes_No, Print_Style, Placement), PCDATA)
• read_Fingering :: StateT Result [Content i] Fingering
• show_Fingering :: Fingering -> [Content ()]
• type Fret = ((Font, Color), PCDATA)
• read_Fret :: StateT Result [Content i] Fret
• show_Fret :: Fret -> [Content ()]
• type String = ((Print_Style, Placement), PCDATA)
• read_String :: StateT Result [Content i] String
• show_String :: String -> [Content ()]
• type Tuning_Step = PCDATA
• read_Tuning_Step :: StateT Result [Content i] Tuning_Step
• show_Tuning_Step :: Tuning_Step -> [Content ()]
• type Tuning_Alter = PCDATA
• read_Tuning_Alter :: StateT Result [Content i] Tuning_Alter
• show_Tuning_Alter :: Tuning_Alter -> [Content ()]
• type Tuning_Octave = PCDATA
• read_Tuning_Octave :: StateT Result [Content i] Tuning_Octave
• show_Tuning_Octave :: Tuning_Octave -> [Content ()]
• type Display_Text = (Text_Formatting, PCDATA)
• read_Display_Text :: StateT Result [Content i] Display_Text
• show_Display_Text :: Display_Text -> [Content ()]
• type Accidental_Text = (Text_Formatting, PCDATA)
• read_Accidental_Text :: StateT Result [Content i] Accidental_Text
• show_Accidental_Text :: Accidental_Text -> [Content ()]
• type Part_Name_Display = (Print_Object, [Part_Name_Display_])
• read_Part_Name_Display :: Eq i => StateT Result [Content i] Part_Name_Display
• show_Part_Name_Display :: Part_Name_Display -> [Content ()]
• data Part_Name_Display_
  • = Part_Name_Display_1 Display_Text
  • | Part_Name_Display_2 Accidental_Text
• read_Part_Name_Display_ :: StateT Result [Content i] Part_Name_Display_
• show_Part_Name_Display_ :: Part_Name_Display_ -> [Content ()]
• type Part_Abbreviation_Display = (Print_Object, [Part_Abbreviation_Display_])
• read_Part_Abbreviation_Display :: Eq i => StateT Result [Content i] Part_Abbreviation_Display
• show_Part_Abbreviation_Display :: Part_Abbreviation_Display -> [Content ()]
• data Part_Abbreviation_Display_
  • = Part_Abbreviation_Display_1 Display_Text
  • | Part_Abbreviation_Display_2 Accidental_Text
• read_Part_Abbreviation_Display_ :: StateT Result [Content i] Part_Abbreviation_Display_
• show_Part_Abbreviation_Display_ :: Part_Abbreviation_Display_ -> [Content ()]
• type Midi_Instrument = (ID, (Maybe Midi_Channel, Maybe Midi_Name, Maybe Midi_Bank, Maybe Midi_Program, Maybe Midi_Unpitched, Maybe Volume, Maybe Pan, Maybe Elevation))
• read_Midi_Instrument :: StateT Result [Content i] Midi_Instrument
• show_Midi_Instrument :: Midi_Instrument -> [Content ()]
• type Midi_Channel = PCDATA
• read_Midi_Channel :: StateT Result [Content i] Midi_Channel
• show_Midi_Channel :: Midi_Channel -> [Content ()]
• type Midi_Name = PCDATA
• read_Midi_Name :: StateT Result [Content i] Midi_Name
• show_Midi_Name :: Midi_Name -> [Content ()]
• type Midi_Bank = PCDATA
• read_Midi_Bank :: StateT Result [Content i] Midi_Bank
• show_Midi_Bank :: Midi_Bank -> [Content ()]
• type Midi_Program = PCDATA
• read_Midi_Program :: StateT Result [Content i] Midi_Program
• show_Midi_Program :: Midi_Program -> [Content ()]
• type Midi_Unpitched = PCDATA
• read_Midi_Unpitched :: StateT Result [Content i] Midi_Unpitched
• show_Midi_Unpitched :: Midi_Unpitched -> [Content ()]
• type Volume = PCDATA
• read_Volume :: StateT Result [Content i] Volume
• show_Volume :: Volume -> [Content ()]
• type Pan = PCDATA
• read_Pan :: StateT Result [Content i] Pan
• show_Pan :: Pan -> [Content ()]
• type Elevation = PCDATA
• read_Elevation :: StateT Result [Content i] Elevation
• show_Elevation :: Elevation -> [Content ()]

Documentation

Entities

Attributes

Attributes

Attributes

Elements

Elements