:exec printLn (Main.filter even [S Z,2,3,4,5,6])
:q