plus   xtlang


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

Implementation

;; first function
(bind-func plus:[!a,!a,!a]*
  (lambda (a b)
    (let ((dict (NUM a))
          (f (tref dict 0)))
      (f a b))))


Back to Index

Similar Entries