; ACCCI:      40_02_1.ORC
; timbre:     clarinet-like
; synthesis:  waveshaping(40)
;             basic instrument with duration dependent envelope(02)
; source:     Risset(1969)
;             #150 Serial Excerpt with Clarinet-like Sounds by Nonlinearity
; coded:      jpg 8/93

sr=20000
kr=2000
ksmps=10
nchnls=1

instr 1
        i1 = p5
        i2 = .64
  if p3 >.75 igoto start
        i2 = p3 - .085
  start:
        a1  linen   255,.085,p3,i2
        a1  oscili  a1,i1,1
        a1  tablei  a1+256,2
        out a1*p4
endin