Find words with alternating vowels and consonants: Difference between revisions
Find words with alternating vowels and consonants (view source)
Revision as of 14:06, 23 January 2021
, 3 years ago→AppleScript :: Functional
(→AppleScript :: Functional: Refactored to generate two listings – aeiou and also aeiouy) |
|||
Line 159:
-- alternatingWordQuery :: String -> String
on alternatingWordQuery(
set regex to "^.*([" & vowels & "]{2}|[^" & vowels & "]{2}).*$"▼
"(9 < self.length) and not (self matches '" & regex & "')"
end alternatingWordQuery
▲ "^.*([" & vowels & "]{2}|[^" & vowels & "]{2}).*$"
Line 174 ⟶ 170:
script
on |λ|(vowels)
set query to alternatingWordQuery
set matches to filteredLines(query, lexicon)
Line 201 ⟶ 197:
end if
end run
| |||