isAllowedOption :: String -> Bool
isAllowedOption opt =
    S.member opt allowedOptions || any (`isPrefixOf` opt) allowedOptionPrefixes
isAllowedOption :: String -> Bool
isAllowedOption opt =
    S.member opt allowedOptions || any (`isPrefixOf` opt) allowedOptionPrefixes
isAllowedOption opt =
    S.member opt allowedOptions || any (`isPrefixOf` opt) allowedOptionPrefixes