Skip to content
Find file
Fetching contributors…
Cannot retrieve contributors at this time
11 lines (9 sloc) 266 Bytes
validScoreNoSafeties :: Int -> String
validScoreNoSafeties v
| v > 5 = "Valid Score"
| v == 3 = "Valid Score"
| otherwise = "Invalid Score"
validScoreWithSafeties :: Int -> String
validScoreWithSafeties v
| v == 1 = "Invalid Score"
| otherwise = "Valid Score"
Something went wrong with that request. Please try again.