My solution for icfpc2013