문자열을 하위 문자열로 나누기 haskell

Question

내 함수에 문제가 있습니다. 문자열을 내 함수와 패턴 일치시키고 싶지만 문자열을 부분 문자열로 분리하는 데 문제가 있습니다. 나는 "ccaabbccaacc"과 같은 문자열과 "a*b*c*"과 같은 정규 표현을 사용하여 바운드 서브 링이있는 목록 인 ["cc", "aabbcc", "aacc", ""]을 얻고 싶습니다. 나는 문자열

parts :: [a] -> [[[a]]] 
parts [ ] = [[ ]] 
parts [c] = [[[c]]] 
parts (c : cs) = concat [[(c : p) : ps ,[c] : p : ps] | p : ps <- parts cs] 

의 모든 부분을 반환이 기능을 만들었습니다하지만 적용 할 때 내 matchs는 내가 원하는 것을 더 반환하고 난 결과를 필터링하는 방법을 모른다 명백한 모든 결과를 작동합니다. somene는 나를 도울 수 있습니까?

Answer 1

나는이 질문이 파싱에 관한 것인가 - 문자열을 주어진 정규 표현식과 일치하는 최대 청크로 나누고 싶다고 생각합니다. "알파벳*".

이것은 반복적 인 렉서 응용 프로그램과 같으며 regexp에서만 가능합니다.

regexp와 문자열 입력 문자열을 사용하고, 가장 긴 일치 접두어 한 쌍의 입력 문자열의 나머지를 반환

reglex :: String -> String -> (String, String) 

, 우리는

import Control.Arrow 

parts reg str = ($ ("",str)) $ 
    iterate (reglex reg . snd) >>> 
    tail >>> 
    span (not.null.fst) 

을 쓸 수 함수의 존재를 가정하고 그 결과로 무언가를하십시오.