sig
  val masque_entete : int
  val numero_de_canal : int
  val touche_relachee : int
  val touche_appuyee : int
  val mode : int
  val instru : int
  val pitch : int
  val sys : int
  val bank_select : int
  val modulation : int
  val swell : int
  val sustain_pedal : int
  val curseur_1 : int
  val curseur_2 : int
  val curseur_3 : int
  val curseur_4 : int
  val curseur_5 : int
  val curseur_6 : int
  val curseur_7 : int
  val curseur_8 : int
  val curseur_9 : int
  val bouton_1 : int
  val bouton_2 : int
  val bouton_3 : int
  val bouton_4 : int
  val bouton_5 : int
  val bouton_6 : int
  val bouton_7 : int
  val bouton_8 : int
  val bouton_8bis : int
  val poussoir_boucle : int
  val poussoir_rembobine : int
  val poussoir_avance_rapide : int
  val poussoir_arret : int
  val poussoir_lecture : int
  val poussoir_enregistrement : int
  val poussoir_1 : int
  val poussoir_2 : int
  val poussoir_3 : int
  val poussoir_4 : int
  val poussoir_5 : int
  val poussoir_6 : int
  val poussoir_7 : int
  val poussoir_8 : int
  val poussoir_9 : int
  val poussoir_a : int
  val poussoir_b : int
  val poussoir_c : int
  val poussoir_d : int
  val scrute : Pervasives.in_channel -> Pervasives.out_channel -> unit
end