("test this" (*test*) ) pi cons 2 cons 1 cons 4 { split disp newline } repeat