Find words with alternating vowels and consonants: Difference between revisions
Find words with alternating vowels and consonants (view source)
Revision as of 10:47, 3 January 2021
, 3 years agoAdd Factor
mNo edit summary |
(Add Factor) |
||
Line 6:
The length of any word shown should have a length <big>'''> 9</big>.
=={{header|Factor}}==
{{works with|Factor|0.99 2020-08-14}}
<lang factor>USING: grouping.extras io.encodings.ascii io.files kernel math
prettyprint sequences ;
"unixdict.txt" ascii file-lines
[ length 9 > ] filter
[ dup [ "aeiou" member? ] group-by [ length ] bi@ = ] filter .</lang>
{{out}}
<pre style="height:20em">
{
"aboriginal"
"apologetic"
"bimolecular"
"borosilicate"
"calorimeter"
"capacitate"
"capacitive"
"capitoline"
"capitulate"
"caricature"
"colatitude"
"coloratura"
"colorimeter"
"debilitate"
"decelerate"
"decolonize"
"definitive"
"degenerate"
"deliberate"
"demodulate"
"denominate"
"denotative"
"deregulate"
"desiderata"
"desideratum"
"dilapidate"
"diminutive"
"epigenetic"
"facilitate"
"hemosiderin"
"heretofore"
"hexadecimal"
"homogenate"
"inoperative"
"judicature"
"latitudinal"
"legitimate"
"lepidolite"
"literature"
"locomotive"
"manipulate"
"metabolite"
"nicotinamide"
"oratorical"
"paragonite"
"pejorative"
"peridotite"
"peripatetic"
"polarimeter"
"recitative"
"recuperate"
"rehabilitate"
"rejuvenate"
"remunerate"
"repetitive"
"reticulate"
"savonarola"
"similitude"
"solicitude"
"tananarive"
"telekinesis"
"teratogenic"
"topologize"
"unilateral"
"unimodular"
"uninominal"
"verisimilitude"
}
</pre>
=={{header|Julia}}==
| |||