solved in lisp
included triangle