Added some solutions to Prolog day 2