kata 13. f# fixed ok