Rep-string: Difference between revisions
m
→{{header|Haskell}}
m (→{{header|Haskell}}: Tidied alternative version. Applied Ormolu.) |
|||
Line 1,397:
repCycles :: String -> [String]
repCycles cs =
let n = length cs▼
((cs ==) . take n . cycle)
▲ in filter
where
--------------------------- TEST -------------------------
| |||