diff --git a/exercises/scrabble-score/Example.fs b/exercises/scrabble-score/Example.fs
index f30857963..b5dbdb713 100644
--- a/exercises/scrabble-score/Example.fs
+++ b/exercises/scrabble-score/Example.fs
@@ -3,7 +3,7 @@
 open System
 
 let letterScores = 
-    [("AEIOULNRST", 1); ("DG", 2); ("BCMP", 3); ("FHVWY", 4); ("K", 5); ("JX", 9); ("QZ", 10)] 
+    [("AEIOULNRST", 1); ("DG", 2); ("BCMP", 3); ("FHVWY", 4); ("K", 5); ("JX", 8); ("QZ", 10)] 
     |> List.map (fun (letters, score) -> letters |> Seq.map (fun letter -> (letter, score))) 
     |> Seq.concat 
     |> Map.ofSeq
diff --git a/exercises/scrabble-score/ScrabbleScoreTests.fs b/exercises/scrabble-score/ScrabbleScoreTests.fs
index 23d91f7ae..1224f86aa 100644
--- a/exercises/scrabble-score/ScrabbleScoreTests.fs
+++ b/exercises/scrabble-score/ScrabbleScoreTests.fs
@@ -35,4 +35,4 @@ let ``Complicated word scores more`` () =
 [<Test>]
 [<Ignore("Remove to run test")>]
 let ``Scores are case insensitive`` () =
-    Assert.That(score "MULTIBILLIONAIRE", Is.EqualTo(20))
\ No newline at end of file
+    Assert.That(score "OXYPHENBUTAZONE", Is.EqualTo(41))
\ No newline at end of file