-- pv_PlayBuf ; c.f. pv_RecordBuf
let rec_buf = control kr "rec" 10
    fft_buf = localBufId 'α' 1024 1
    x = mouseX kr (-1) 1 Linear 0.2
    c = X.pv_PlayBuf fft_buf rec_buf x 50 1
in ifft c 1 0

-- pv_PlayBuf
let rec_buf = control kr "rec" 10
    fft_buf = localBufId 'β' 1024 1
    n = range (-1) 2 (lfNoise2Id 'γ' kr 0.2)
    c = X.pv_PlayBuf fft_buf rec_buf n 0 1
in ifft c 1 0
