diff options
Diffstat (limited to 'lib.functions.lisp')
-rw-r--r-- | lib.functions.lisp | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib.functions.lisp b/lib.functions.lisp index 30c1e64..8eb2304 100644 --- a/lib.functions.lisp +++ b/lib.functions.lisp @@ -32,3 +32,7 @@ each member is STEP distance apart." (fn take (n lst) (-> (fixnum list) list) (subseq lst 0 n)) + +(fn split (n lst) (-> (fixnum list) list) + (cons (take n lst) + (subseq lst n))) |