pat8   scheme


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/libs/core/pattern.xtm

Implementation

(define pat8 (match '(a??? (b??? (one? two? three?) c???) d???)))
(println 'pat8a (pat8 '(a (b (c d e) f) g)))
(println 'pat8b (pat8 '(a "a" 1 (b "two" 2 (c d e)))))
(println 'pat8c (pat8 '(((c d e) (f g h) (i j k)))))
(println 'pat8d (pat8 '(a (b (c d) (c d e) (c d) f) g)))


Back to Index