1(library (rnrs lists (6))
2  (export find for-all exists filter partition fold-left fold-right
3          remp remove remq remv memp member memv memq
4          assp assoc assv assq
5	  cons*
6	  )
7  (import (primitives
8           find for-all exists filter partition fold-left fold-right
9           remp remove remq remv memp member memv memq
10           assp assoc assv assq
11	   cons*
12	   )))
13