placePoly([],_,Board,FinalBoard).
placePoly([(X,Y)|T],Letter,Board,_) :- setPixel(X,Y,Letter,Board,NewBoard),
                                       placePoly(T,Letter,NewBoard,NewBoard).

setPixel(X,Y,Letter,P,NewP) :- getElement(Y,P,Row),
                               setElement(Y,NewRow,P,NewP),
                               setElement(X,Letter,Row,NewRow).