package ml2mxml

  1. Overview
  2. Docs
val drum_element_to_mxml_param : [< `China | `Cowbell | `Crash | `Crash_01 | `Hihat | `Hihat_02 | `Kick | `PedalHiHat | `Ride | `Ride_01 | `Ride_bell | `Snare | `Snare_muted | `Splash | `Tom | `Tom_01 | `Tom_02 | `Tom_03 | `Tom_04 ] -> string * int * string
val drum_element_to_unpitched : [< `China | `Cowbell | `Crash | `Crash_01 | `Hihat | `Hihat_02 | `Kick | `PedalHiHat | `Ride | `Ride_01 | `Ride_bell | `Snare | `Snare_muted | `Splash | `Tom | `Tom_01 | `Tom_02 | `Tom_03 | `Tom_04 ] -> Cow.Xml.t
val drum_element_to_notehead : [< `China | `Cowbell | `Crash | `Crash_01 | `Hihat | `Hihat_02 | `Kick | `PedalHiHat | `Ride | `Ride_01 | `Ride_bell | `Snare | `Snare_muted | `Splash | `Tom | `Tom_01 | `Tom_02 | `Tom_03 | `Tom_04 ] -> Cow.Xml.t
type drum_part = {
  1. part_id : string;
  2. name : string;
  3. channel : int;
  4. unpitched : int;
  5. volume : int;
  6. pan : int;
}
val kick : drum_part
val snare_00 : drum_part
val snare_02 : drum_part
val cowbell_02 : drum_part
val cowbell_01 : drum_part
val cowbell_00 : drum_part
val tom_00 : drum_part
val tom_01 : drum_part
val tom_02 : drum_part
val tom_03 : drum_part
val tom_04 : drum_part
val hihat_00 : drum_part
val hihat_01 : drum_part
val hihat_02 : drum_part
val pedalhihat_00 : drum_part
val crash_00 : drum_part
val crash_01 : drum_part
val splash_00 : drum_part
val ride_00 : drum_part
val ride_01 : drum_part
val ride_02 : drum_part
val china_00 : drum_part
val from_drum_element_to_music_xml : [< `China | `Cowbell | `Crash | `Crash_01 | `Hihat | `Hihat_02 | `Kick | `PedalHiHat | `Ride | `Ride_01 | `Ride_bell | `Snare | `Snare_muted | `Splash | `Tom | `Tom_01 | `Tom_02 | `Tom_03 | `Tom_04 ] -> drum_part
val prefix : int -> string -> string
val drum_element_to_instrument_line : int -> [< `China | `Cowbell | `Crash | `Crash_01 | `Hihat | `Hihat_02 | `Kick | `PedalHiHat | `Ride | `Ride_01 | `Ride_bell | `Snare | `Snare_muted | `Splash | `Tom | `Tom_01 | `Tom_02 | `Tom_03 | `Tom_04 ] -> Cow.Xml.t
val drum_parts : drum_part list
val create_score_instrument : int -> drum_part -> Cow.Xml.t
type t = {
  1. id : int;
  2. name : string;
  3. abbrev : string;
  4. parts : drum_part list;
}
val drum_part : t -> Cow.Xml.t
val create_std_drum : int -> t
val create_midi_instrument : int -> Cow.Xml.t