Mirrored Vowels

A list by effigy.
effigy has created 7 lists, listed 577 words, written 13 comments, and added 27 tags, 13 favorites, and 0 pronunciations.
This is an open list, anyone can contribute.
word feed  |  comment feed  |  sort: alpha / order added  |  favorite  |  comments
Rules:
• The word must have an even number of vowels.
• There must be four or more vowels; thus, at minimum, an A-A-A-A or A-B-B-A pattern.
• The vowels must appear in a mirrored pattern. For example, the vowels in "feminine" follow the pattern A-B-B-A (or E-I-I-E for the literal-minded).
• No "-ed"s or "-ing"s.
• "y" is valid.
Sign in or sign up to add words to this list.


comments for this list

Please sign in or sign up to comment on this profile

  • almost 2 years ago mollusque said
    Thanks, effigy. I was thinking of things like embarrassed and embarrasses, where even if you disallow "-ed", "-es" still brings it into play.

    By the way, I've tagged the vowel sequence for most of the words on this list. I skipped a few like colesterol and recomposer, which are Spanish.
  • almost 2 years ago effigy said
    My first thought was no -eds or -ings because they throw an extra vowel in play, whereas -s does not; however, I'm open to suggestions. I'll cross it out for now—let's see what you've got!

    Thanks for the Ukrainian catch. I'll try to figure out how that slipped in there. Ah ha! My program had a bug: the strip all non-vowels part was case sensitive, thus ignoring "U."
  • almost 2 years ago mollusque said
    Hi effigy! Glad to see another vowelhound on Wordie. A couple of questions and comments. Why no -eds or -ings, but plurals allowed? I'd say, prefer the shortest form that contains the sequence, but if adding the ending produces the sequence, why not allow it?

    Ukranian doesn't fit the pattern.
  • almost 2 years ago effigy said
    Perl to the rescue!

    #open my $LIST, '-|', 'look "*"' or die $!; ### Solaris 5.8
    #open my $LIST, '<', '/usr/share/dict/american-english' or die $!; ### Ubuntu
    while (<$LIST>) {
        chomp;
        my $original = $_;
        s/[^aeiouy]//gi;
        my $len = length $_;
        next if $len < 4 || $len % 2;
        my $halfway = ($len + 1) / 2;
        my ($first, $second) = (
            substr($_, 0, $halfway),
            substr($_, $halfway, $len),
        );
        my $r_first = reverse $first;
        next if $r_first ne $second;
        print "$original: $first/$second\n";
    }