m@23: (cl:defpackage #:amuse-utils d@33: (:use #:common-lisp #:amuse #:midi) d@33: (:export #:pitchedp d@33: #:unpitchedp d@33: #:bar-number d@36: #:bar-onset d@33: #:bass-note d@33: #:crotchets-in-a-bar d@33: #:sounding-events d@37: #:levenshtein-distance d@38: #:beats-to-seconds d@41: #:get-n-grams d@47: #:inter-onset-intervals d@47: #:get-n-gram d@47: #:n-gram-stats d@41: #:monodificate d@88: #:significantly-louderp d@88: #:substantially-louderp d@33: ))