split-with
builtin-function
(split-with predicate seq)
Equivalent to (list (take-while predicate seq) (drop-while predicate seq)).
(list (take-while predicate seq) (drop-while predicate seq))
make-html > (split-with even? '(2 2 2 1 3 3 3)) it: ((2 2 2) (1 3 3 3))