taolson

    isUpperStart : String -> Bool
    isUpperStart name =
        case String.slice 0 1 name of
            
            "A" ->
                True
            
            "B" ->
                True
            
            "C" ->
                True
        ... for 23 more cases.

  where

    go [] = z

    go (x : xs) = f x (go xs)

    [] -> 0

    (x : xs) = x + go xs