Есть ли хитрость или функция прелюдии для проверки, содержит ли список определенную подстроку / подсписок?
xyz :: [a] -> [a] -> Bool
xyz "hello world" "worl" -> True
xyz [1,2,3,4,5,6,7,8,1,2,3,4,5] [7,8,1] -> True
Я пытался написать один самостоятельно, но это тривиальная проблема, и я не хочу изобретать велосипед.