require 'pl'
utils.import 'pl.func'
require 'seqa'

seq.printall(seq.filter(seq.list{1,2,3,4},Gt(_1,2)))

S{1,2,3,4}:filter(Gt(_1,2)):printall()

S{'one','tw','t'} :map '#' :printall()

print ( S{10,20,30} : reduce '*' )

S{'[one]','[two]','[three]'}:sub(2,-2):upper():printall()

S(io.lines 'seqa.lua') : upper() : take(10) : printall '\n'

str = 'for i=1,10 do for j = 1,10 do print(i,j) end end'
ls = S(lexer.lua(str)):filter(Eq(_1,'iden')):map(_2):unique():copy()

print(List(ls))