| | |
|---|
| | | :name name)) |
|---|
| | | |
|---|
| | | (defvar *OMLead-files* nil) |
|---|
| | | (setf *OMLead-files* '("harmon-database" |
|---|
| | | (setf *OMLead-files* '("gen-harmonies" |
|---|
| | | "harmon-progress" |
|---|
| | | "get-score" |
|---|
| | | "harmon-rhythm" |
|---|
| | |
|---|
| | | ;-------------------------------------------------- |
|---|
| | | (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::harmon-progress omlead::get-score omlead::harmon-rhythm) Nil))) |
|---|
| | | |
|---|
| | | ;-------------------------------------------------- |
|---|
| | | ;filling packages |
|---|
