join   xtlang


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/examples/contrib/algebraic_data_types.xtm

Implementation

(bind-func join:[Option{!a}*,Option{Option{!a}*}*]*
  (lambda (M)
    (Some$ M (x) x (None))))


Back to Index

Similar Entries