(:enter       add         :false)
(:shift-enter add         :true)
(:del         del         :false)
(:shift-del   del         :true)
(:comma       note/length :prev-note-length)
(:period      note/length :next-note-length)
(:plus        note/range  :next-note-range)
(:underscore  note/range  :prev-note-range)
(:up          note/point  :next-note-point)
(:down        note/point  :prev-note-point)
(:left        time/point  :next-time-point)
(:right       time/point  :prev-time-point)
(:z           time/lock   :next-time-lock)
(:equal       time/zoom   :next-time-zoom)
(:minus       time/zoom   :prev-time-zoom)
(:space       clock/play  :play-current)
(:shift-space clock/play  :play-start)
(:u           history     :history-prev)
(:r           history     :history-next)
(:tab         compact     :next-compact)