kata 15. f# solved