module Regex where
import Data.List

regexIn :: String -> String -> Bool
regexIn = isInfixOf

regexList :: String -> [String] -> Bool
regexList x = any (isInfixOf x)