<p dir="ltr">Whoops, isAtLeast should be</p>
<p dir="ltr">    | otherwise = isAtLeast (tail ls) (n-1)</p>