smap   xtlang


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/examples/core/audio_streams.xtm

Implementation

(bind-func smap:[Stream{!a}*,[!a,!a,!a]*,Stream{!a}*,Stream{!a}*]*
  (lambda (func xs ys)
    (if (null? xs ys)
        null
        (scons (func (scar xs) (scar ys))
               (smap func (scdr xs) (scdr ys))))))


Back to Index

Similar Entries