Life Letters

And now introducing… Life Letters!

FFNG, FSZE, and, MRNT are the smallest words that produce infinite growth.

Another curious word with the same property is AAPRO.

Perl script for Golly. It generates a given string $letters.

use strict;
my $letters="ABCDEFGHIJKLMNOPQRSTUVWXYZ";
my $length = length($letters);
g_new("LIFE LETTERS");
my $j=0;
for (my $k=0;$k<$length;$k++) {
my $substr = substr $letters, $k, 1;
if ($substr eq 'A') {
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 2, 1);        
g_setcell($j+2, 1, 1);
g_setcell($j+2, 2, 1);
g_setcell($j+2, 3, 1);
g_setcell($j+2, 4, 1);    
$j = $j + 4;                
} elsif ($substr eq 'B') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 2, 1);                    
g_setcell($j+1, 4, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 3, 1);
$j = $j + 4;
} elsif ($substr eq 'C') {
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 4, 1);            
$j = $j + 4;
} elsif ($substr eq 'D') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 2, 1);
g_setcell($j+2, 3, 1);            
$j = $j + 4;
} elsif ($substr eq 'E') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 2, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 4, 1);            
$j = $j + 4;
} elsif ($substr eq 'F') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 2, 1);
g_setcell($j+2, 0, 1);        
$j = $j + 4;
} elsif ($substr eq 'G') {
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 2, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 2, 1);
g_setcell($j+2, 3, 1);
g_setcell($j+2, 4, 1);            
$j = $j + 4;
} elsif ($substr eq 'H') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 2, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 2, 1);
g_setcell($j+2, 3, 1);
g_setcell($j+2, 4, 1);            
$j = $j + 4;
} elsif ($substr eq 'I') {
g_setcell($j, 0, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 1, 1);
g_setcell($j+1, 2, 1);
g_setcell($j+1, 3, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 4, 1);            
$j = $j + 4;
} elsif ($substr eq 'J') {
g_setcell($j, 3, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 2, 1);
g_setcell($j+2, 3, 1);
g_setcell($j+2, 4, 1);            
$j = $j + 4;
} elsif ($substr eq 'K') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 1, 1);
g_setcell($j+1, 3, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 4, 1);            
$j = $j + 4;
} elsif ($substr eq 'L') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 4, 1);            
$j = $j + 4;
} elsif ($substr eq 'M') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 1, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 2, 1);
g_setcell($j+2, 3, 1);
g_setcell($j+2, 4, 1);            
$j = $j + 4;
} elsif ($substr eq 'N') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 1, 1);
g_setcell($j+1, 2, 1);
g_setcell($j+1, 3, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 2, 1);
g_setcell($j+2, 3, 1);
g_setcell($j+2, 4, 1);            
$j = $j + 4;
} elsif ($substr eq 'O') {
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 2, 1);
g_setcell($j+2, 3, 1);            
$j = $j + 4;
} elsif ($substr eq 'P') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 2, 1);
g_setcell($j+2, 1, 1);
$j = $j + 4;
} elsif ($substr eq 'Q') {
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 3, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 2, 1);
g_setcell($j+2, 3, 1);
g_setcell($j+2, 4, 1);            
$j = $j + 4;
} elsif ($substr eq 'R') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 2, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 3, 1);
g_setcell($j+2, 4, 1);            
$j = $j + 4;
} elsif ($substr eq 'S') {
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 2, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 2, 1);
g_setcell($j+2, 3, 1);            
$j = $j + 4;
} elsif ($substr eq 'T') {
g_setcell($j, 0, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 1, 1);
g_setcell($j+1, 2, 1);
g_setcell($j+1, 3, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 0, 1);        
$j = $j + 4;
} elsif ($substr eq 'U') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 2, 1);
g_setcell($j+2, 3, 1);
g_setcell($j+2, 4, 1);        
$j = $j + 4;
} elsif ($substr eq 'V') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 2, 1);
g_setcell($j+2, 3, 1);            
$j = $j + 4;
} elsif ($substr eq 'W') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 2, 1);
g_setcell($j+1, 3, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 2, 1);
g_setcell($j+2, 3, 1);
g_setcell($j+2, 4, 1);            
$j = $j + 4;
} elsif ($substr eq 'X') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 2, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 3, 1);
g_setcell($j+2, 4, 1);            
$j = $j + 4;
} elsif ($substr eq 'Y') {
g_setcell($j, 0, 1);
g_setcell($j, 1, 1);
g_setcell($j, 2, 1);
g_setcell($j+1, 2, 1);
g_setcell($j+1, 3, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 2, 1);        
$j = $j + 4;
} elsif ($substr eq 'Z') {
g_setcell($j, 0, 1);
g_setcell($j, 3, 1);
g_setcell($j, 4, 1);
g_setcell($j+1, 0, 1);
g_setcell($j+1, 2, 1);
g_setcell($j+1, 4, 1);
g_setcell($j+2, 0, 1);
g_setcell($j+2, 1, 1);
g_setcell($j+2, 4, 1);        
$j = $j + 4;
}
}