The moving-autocorrelation mus-data array does not
have any data until you call the generator.

(let* ((n 512)
       (hop 128)
(ac (make-moving-autocorrelation (make-readin "oboe.snd") n hop ))
       (mydata (make-float-vector hop)))
  ;; call it to get some data:
  (moving-autocorrelation ac) ; fill mus-data
  (format #t "mus-data:\n")
  (let* ((data  (mus-data ac))
         (len (length data)))
    (format #t "length data: ~A\n " len )
    (set! mydata (mus-data ac))
    (do ((i 0 (+ i 1)))
        ((= i hop))
      (format #t "~A ~0,12F\n " i (mydata i) ) )))

_______________________________________________
Cmdist mailing list
[email protected]
https://cm-mail.stanford.edu/mailman/listinfo/cmdist

Reply via email to