(defmethod transposer Long [scale degree] (loop [new-scale scale count degree] (cond (zero? count) new-scale (< count 0) (recur (step (reverse new-scale)) ...
確定! 回上一頁