hsdescribeList' :: [a] -> String
describeList' [] = "The list is empty."
describeList' [x] = "The list has one element."
describeList' _ = "The list has multiple elements."
hsdescribeListWithGuard :: [a] -> String
describeListWithGuard xs
| length xs == 0 = "The list is empty."
| length xs == 1 = "The list has one element."
| otherwise = "The list has multiple elements."
otherwise
で網羅性をチェックするhsisEmptyIf :: [a] -> Bool
isEmptyIf xs = if null xs then True else False
hsdescribeList :: [a] -> String
describeList xs = case xs of
[] -> "The list is empty."
[x] -> "The list has one element."
_ -> "The list has multiple elements."