Wordle comparison: Difference between revisions

→‎{{header|Haskell}}: Updated output to include integer scores
(→‎{{header|Python}}: Added a version in Python)
(→‎{{header|Haskell}}: Updated output to include integer scores)
Line 184:
main :: IO ()
main = do
putStrLn $ intercalate " -> " ["Target", "Guess", "ScoreScores"]
putStrLn []
mapM_ (either putStrLn putStrLn) $
Line 207:
Left (guess <> ": Expected 5 character guess.")
| otherwise =
let scores = wordleScore target guess
Right
in ( intercalateRight
"( -> "intercalate
[ target, " -> "
guess [ target,
unwords (color <$> wordleScore target guess),
] show scores,
unwords (color <$> scores)
]
Right )
 
color 2 = "green"
Line 220 ⟶ 222:
color _ = "gray"</lang>
{{Out}}
<pre>Target -> Guess -> ScoreScores
 
ALLOW -> LOLLY -> [1,1,2,0,0] -> amber amber green gray gray
CHANT -> LATTE -> [0,1,1,0,0] -> gray amber amber gray gray
ROBIN -> ALERT -> [0,0,0,1,0] -> gray gray gray amber gray
ROBIN -> SONIC -> [0,2,1,2,0] -> gray green amber green gray
ROBIN -> ROBIN -> [2,2,2,2,2] -> green green green green green
BULLY -> LOLLY -> [0,0,2,2,2] -> gray gray green green green
ADAPT -> SÅLÅD -> [0,0,0,0,1] -> gray gray gray gray amber
Ukraine: Expected 5 character target.
BBBBBAA: Expected 5 character guess.
9,655

edits