Lines Matching refs:NoteId

266 newtype NoteId = NoteId Integer  function
269 succNoteId :: NoteId -> NoteId
270 succNoteId (NoteId n) = NoteId (n+1)
272 flattenNoteIdRange :: (NoteId,NoteId) -> [NoteId]
279       unwrapNoteOffList :: Events (NoteBoundary NoteId)
346    (MIDIEv.Pitch, NoteId) ->
391       (f [NoteBoundary (NoteId, Maybe MIDIEv.Program)])
426                             Nothing -> (NoteId 0, NoteId 0)
442    ((MIDIEv.Pitch, NoteId) -> noteOffListCtrl -> gateCtrl) ->
446       (Events (NoteBoundary (NoteId, Maybe MIDIEv.Program)))
471       (Events (NoteBoundary (NoteId, Maybe MIDIEv.Program)))
489          (Events (NoteBoundary (NoteId, Maybe MIDIEv.Program)))