#define n ((e[++a]-42)/9-f[d+1])? #define o printf("%c",c[" 01./:;|\\"]); char e[]="**3<HRZcir+3@OXakt;=GOXds*\?HRZcir*7HNZ`i19JS\\p*H[m1:CJSz*>H[`mr25\ \?Hx,P,B2Gs-KTfzRdv1SeyCR-ISeu.<Ev+9+P,z,4PfzIdvO2*HRZcir6GPis=MU*3HRZcir*HZi\ 1JS\\epy*>H[m1JSey*DH[m*3<HZiu-@P*3HZi<N]q1JS\\epy:[m1CJSeny06I[m*4\?HRZcir,\ \?*6HRZcir1J]q2K*H[m2K*H[m2@K]qtO@M2DK]q,]q1JS\\epy[m1:JSey+[m*3<HRZcir13Gt,\ =GVs*3<HRZcir1J]qz*HF*AH2;DK]qua0=G2:K]q]q1CJS\\pDVu1:JS*D!+3:BIOSY`egilqtxz\ \177.0249<==>EJMUY`ejov#$59@CJOXYZbfhlnrxy&+.57=@IMR[``bcfmnq!#),@",*f; int main(int j,char *k[]) { int a,b,c,d,g,h,i=19; printf(" "); for(g=0[f=(char *)calloc(80+(h=atoi(1[k])),1)]=1; g<=h; g++) { if ((g>30)&&(f[i-2]+f[i-1]!=0)) i++; for(d=c=0; d<i; d++) { o f[d]=(e[b=c*9,b+=(c=d[f]),(((a=e[345+b]+b/19*85-33-b/40*12-b/80*4)[e] -42)/9-f[d+1])?n n n n n n n n 0:a:a:a:a:a:a:a:a:a]-42)%9; } o if (0[f]-1) printf("\n%6i ",g); else printf("\n "); } }

引用元：https://www.ioccc.org/2001/ollinger.c

審査員・作者による説明：https://github.com/ioccc-src/winner/blob/main/2001/ollinger.hint

動作

セルオートマトンで素数列挙。

$ gcc -o ollinger ollinger.c

$ ./ollinger 1000
        0
        0\
     2  1.\
     3  1\ \
        0\. \
     5  1/\  \
        0\;\  \
     7  1:.0\  \
        0/.0.\  \
        0; 10 \  \
        0|/\0; \  \
    11  1/\.0|1 \  \
        0\/| |1/ \  \
    13  1:\| |\1. \  \
        0//| \:11  \  \
        0;\| /|.0/  \  \
        0|/|/ : 1.   \  \
    17  1/\:|.|.11    \  \
        0\/|; : 00/    \  \
    19  1:\: ;|0 1.     \
        0//|./||.11      \
        0;\:/ :0 00/      \
        0|/:|.;11 1.
    23  1/;|;.1/0 11
        0;/:.\|0..00/
        0:;: /|11 .1.
        0//|/ |00 .\1
        0;\:| | 1. \;/
        0|/|\ | 11  \1
    29  1/\| \| 00/ 1;/
        0\/| /|  1. /01
    31  1:\|/ |  11///1/
        0//:| |  011  11
        0;;|\ |  /;0/ 00/
        0:/| \| / |0.  1.
        0/\| /|/  |1\  11
        0\/|/ :|  |0\\ 00/
    37  1:\:|.|\  |1. \ 1.
        0//|; | \ |11  \11
        0;\: \|  \|00/ 100/
        0|/| /|  /| 1. \;1.
    41  1/\|/ | / | 11  \\1
        0\/:| |/  | 00/  \;/
    43  1:;|\ :|  |  1.   \1
        0//| ;|\  |  11   1;/
        0;\|./| \ |  00/  /01
        0|/:/ |  \|   1. ///1/
    47  1/;:| |  /|   11/   11
        0;/|\ | / |   011   00/
        0:\| \|/  |   /;0/   1.
        0//| /:|  |  / |0.   11
        0;\|/.|\  | /  |1\   00/
        0|/:: | \ |/   |0\\   1.
    53  1/;:\ |  \:|   |1. \  11
        0;/| \|  /|\   |11  \ 00/
        0:\| /| / | \  |00/  \ 1.
        0//|/ |/  |  \ | 1.   \11
        0;\:| :|  |   \| 11   100/
        0|/|\.|\  |   /| 00/  \;1.
    59  1/\|.\| \ |  / |  1.   \\1
        0\/: /|  \| /  |  11    \;/
    61  1:;|/ |  /|/   |  00/    \1
        0//:| | / :|   |   1.    1;/
        0;;|\ |/ .|\   |   11    /01
        0:/| \:|. | \  |   00/  ///1/
        0/\| /|;  |  \ |    1. /   11
        0\/|/ : \ |   \|    11/    00/
    67  1:\:|.|  \|   /|    011     1.
        0//|; |  /|  / |    /;0/    11
        0;\: \| / | /  |   / |0.    00/
        0|/| /|/  |/   |  /  |1\     1.
    71  1/\|/ :|  :|   | /   |0\\    11
        0\/:|.|\ .|\   |/    |1. \   00/
    73  1:;|; | ; | \  :|    |11  \   1.
        0//: \|. \|  \.|\    |00/  \  11
        0;;| /:  /|  .\| \   | 1.   \ 00/
        0:/|/.| / | . /|  \  | 11    \ 1.
        0/\:: |/  |. / |   \ | 00/    \11
        0\/:\ :|  : /  |    \|  1.    100/
    79  1:;| ;|\ .|/   |    /|  11    \;1.
        0//|./| ; :|   |   / |  00/    \\1
        0;\:/ |. ;|\   |  /  |   1.     \;/
        0|/:| : ./| \  | /   |   11      \1
    83  1/;|\.|./ |  \ |/    |   00/     1;/
        0;/|.\:/  |   \:|    |    1.     /01
        0:\: /:|  |   /|\    |    11    ///1/
        0//|/.|\  |  / | \   |    00/  /   11
        0;\:: | \ | /  |  \  |     1. /    00/
        0|/:\ |  \|/   |   \ |     11/      1.
    89  1/;| \|  /:|   |    \|     011      11
        0;/| /| /.|\   |    /|     /;0/     00/
        0:\|/ |/. | \  |   / |    / |0.      1.
        0//:| ::  |  \ |  /  |   /  |1\      11
        0;;|\.:\  |   \| /   |  /   |0\\     00/
        0:/|.;| \ |   /|/    | /    |1. \     1.
        0/\:./|  \|  / :|    |/     |11  \    11
        0\/:/ |  /| / .|\    :|     |00/  \   00/
    97  1:;:| | / |/ . | \  .|\     | 1.   \   1.
        0//|\ |/  :|.  |  \. | \    | 11    \  11
        0;\| \:| .|;   |  .\ |  \   | 00/    \ 00/
        0|/| /|\. : \  | .  \|   \  |  1.     \ 1.
   101  1/\|/ |.\.|  \ |.   /|    \ |  11      \11
        0\/:| : .\|   \:   / |     \|  00/     100/
   103  1:;|\.|. /|   /|  /  |     /|   1.     \;1.

解説

左側は素数、右側はオートマトン。

左上、真上、右上の3セルの状態から次の行のセルが決まる、9状態の1次元セルオートマトン。各状態をいい感じに01\|/:;.と空白の9文字で表現している（と思う）。オートマトン自体はKorec 1998が提案しているもので、ベースはFischer 1965とのこと。

IOCCC審査員のFAQの「見飽きてるネタはありますか？」に対して「素数列挙や状態機械」という回答があったので、その2つを組み合わせたとのこと。