-\version "2.3.22"
+\version "2.16.0"
drumPitchNames =
#'((acousticbassdrum . acousticbassdrum)
(trim . mutetriangle)
(tri . triangle)
(trio . opentriangle)
+ (tt . tamtam)
(ua . oneup)
(ub . twoup)
(uc . threeup)
)
-#(map
+#(for-each
(lambda (k-v)
(module-define! (current-module)
(car k-v)