added solution for problem 1 in sml