i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49 (2010-07-07) Copyright (c) Bruno Haible, Michael Stoll 1992, 1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2010 Type :h and hit Enter for context help. [1]> (load "lp.lsp") ;; Loading file lp.lsp ... ;; Loaded file lp.lsp T [2]> (filter-in 'evenp '(1 2 3 4 5 6)) (2 4 6) [3]> (filter-in 'oddp '(1 2 3 4 5 6)) (1 3 5) [4]> (filter-in 'null '(1 2 3 4 5 6)) NIL [5]> (filter-out 'evenp '(1 2 3 4 5 6)) (1 3 5) [6]> (filter-out 'oddp '(1 2 3 4 5 6)) (2 4 6) [7]> (filter-out 'null '(1 2 3 4 5 6)) (1 2 3 4 5 6) [7]> (bye) Bye.