// $Source$
// $Revision$
// $Date$

$func Id e1 = e1;

$func Append (e1) e2 = e2e1;

$func Zip (e.list1) (e.list2) = e.new-list;

$func? Map s.Fname e.Fargs (e.list) = e.new-list;

$func? Map! s.Fname e.Fargs (e.list) = e.new-list;

$func Filter s.Fname e.Fargs (e.list) = e.new-list;

$func Split s.Fname e.Fargs (e.list) = (e.true-list) (e.false-list);

$func? Elem? e.list t.item = ;

$func Foldr s.Fname e.Fargs (e.value) (e.list) = e.value;

$func Foldr1 s.Fname e.Fargs (e.list) = e.value;

$func Concat e.lists = e.list;

$func Paren exprs = e.lists;

$func Reverse e.list = e.rev-list;

$func Intersperse (e.sep) e.list = e.new-list;

$func Nub e.expr = e.selected;

$func Replicate s.n e.expr = e.list;

// Returns number of e.expr entries in e.source and e.source without all e.expr's.
// FIXME: Strange function!
// Additionally it conflicts with Table.Entries.
// Commented out at least until there is some sort of name conflicts resolution
// strategy.
// $func Entries e.expr (e.source) = s.num e.res;

// Add to the first list all new elements from the second one.
$func Or (e.list1) e.list2 = e.or;

// Choose from the first list all elements present in the second one.
$func And (e.list1) e.list2 = e.and;

// Choose from the first list all elements not present in the second one.
$func Sub (e.list1) e.list2 = e.not;