ghc-exactprint-1.9.0.0: tests/examples/pre-ghc910/Process1.hs

module Synthesizer.MIDI.CausalIO.Process1 where

gateFromNoteOffs=
   let dur = 1
   in (d, 3
          {-
            AllNotesOff -> VoiceMsg.normalVelocity -} )