(bind-val fmsynth INSTRUMENT (make_instrument (fmsynth_note) (fmsynth_fx))) (define fmsynth ($$ fmsynth)) (bind-val synth INSTRUMENT (make_instrument (analogue_note) (analogue_fx)))