Find words with alternating vowels and consonants: Difference between revisions

Content added Content deleted
(Added Quackery.)
m (→‎{{header|Factor}}: bi@ = -> same?)
Line 1,014: Line 1,014:
"unixdict.txt" ascii file-lines
"unixdict.txt" ascii file-lines
[ length 9 > ] filter
[ length 9 > ] filter
[ dup [ "aeiou" member? ] group-by [ length ] bi@ = ] filter .</lang>
[ dup [ "aeiou" member? ] group-by [ length ] same? ] filter .</lang>
{{out}}
{{out}}
<pre style="height:20em">
<pre style="height:20em">
Retrieved from "https://rosettacode.org/wiki/Find_words_with_alternating_vowels_and_consonants"