feat(source)!: restructure gen-sequence

Lorenz Lehmann

27.03.24 d593dc211d019f10df8c7bd9069b4134c8d399b8

 OM-Lead.lisp

@@ -23,7 +23,7 @@

(defvar *OMLead-files* nil)
(setf *OMLead-files* '("gen-harmonies"
                       "harmon-progress"
                       "gen-sequence"
                       "get-score"
                       "harmon-rhythm"
                      ))
@@ -42,7 +42,7 @@
;--------------------------------------------------
(defvar *svppackages-list* nil)
(setf *subpackages-list* 
      '((Nil Nil Nil (omlead::harmon-database omlead::harmon-progress omlead::get-score omlead::harmon-rhythm) Nil)))
      '((Nil Nil Nil (omlead::gen-harmonies omlead::gen-sequence omlead::get-score omlead::harmon-rhythm) Nil)))

;--------------------------------------------------
;filling packages