solved a few more
sierpinski triangle in lisp