modified Program.fs - first test passed