Dear All, An useful function do make various pitch-demix operations at once. (defun poly-demix (n-list mat-omn) "Extrai as vozes especificadas em N-LIST de uma sequência OMN e as combina em um único fluxo polifônico." (let* (;; 1. Garante que n-list seja uma lista e extrai cada voz (extracted-voices (mapcar #'(lambda (n) (pitch-demix n mat-omn)) (list! n-list)))) ;; 2. Aplica merge-voices sob