Files
Cody Boone Ferguson 0c2a0a471d Capitalise 'fibonacci' and 'turing'
There are some places where this was not done: in data files that refer
to binaries (examples being 2001/herrmann1/{README.md,herrmann1.c} and
those related to 1990/theorem for Turing and Fibonacci respectively). In
comments in code it was changed to be capitalised though this is
potentially problematic in that maybe it was intentional by the authors.
2023-02-15 09:33:55 -08:00

54 lines
3.0 KiB
C

#define/**/Alan/**/(fflush(0),j=c=0;++c<b[6]+7;v=b[c]^(b[c+
char*H="close\r\nContent-Type:text/html\r\n\r\n<canvas id=\
'c'width='128'height='128'style='width:256px;height:256px'\
><script>x=y=-1;v=window.c;v.onmousemove=function(e){x=e.p\
ageX-v.offsetLeft;y=e. pageY-v.offsetTop};w=\
new WebSocket('ws'+ location.href.subs\
tr(4));w.binary" "Type='arraybuff\
er';w.onmess" "age=function(\
e){c=v.getC" "ontext('2d')\
;b=c.crea" "teI" "mageData(12\
8,128);u= new Uint8Array(d=e. data);b.dat\
a.set(u) ;c.putImageData(b,0,0) ;u[0]=x/2;\
u[1]=y/2 ;w.send(d.slice(0,x<0?0: 2));x=y=-\
1}</scr" "ipt>",b[9999];float*e,d[ 65536],u,v
,lu,lv, z;void*f;typedef unsigned long long
l;l*p,t[ 99]={0x67452301,0xEFCDAB89, 0x98BADCFE
,308438* 881,3285377520 },i,j,k ,n,m[204];
#include /*io*/ <stdio.h> /*Turing*/
void s(){ ; for( k =0;k++<7 * 2 *9;)for(i=
0;++i<127; ) e=d + i* 4 +512*k,1[e] +=(i-u)*(i
-u)+(k-v)* (k- v )<20?*e+=UV_DROP:0;}l*q= m, g=1LL<<32;
l(h)(l v,l (a)){ return(v<<a)|(v%g>>(32-a ) );}int main
(int c/*ha r*/, char**y){for(e=d;fgets(b ,m[97]=480,\
stdin)&&*b >31; )for( i=j=0;n=b[i],i<18 ? (l)"sec-webs\
ocket-key: "[i] ==(n|32):n-32? m[j/4] |=(j< 24?n:(l)
"258EAFA5-" "E914-47DA-95CA-C5AB0DC85B" "11\x80"[j-24])
<<(3-j%4)*8 ,++j<61:1;)i++;for(j=3;--j; ){for(i=4;++i<74
;)i>9?p=q+i- 2 ,p[8]=h(p[5 ]^*p^p[-6]^p[-8]
#define/*hah aha <--mouth*/ laplacian(u)l##u
,1):(t[i]=t[9 -i] );for(p=t+7 ,i=-1;++i<82;k
=*p++,p[2]=h(p[1],5) +p[-3]+n+ (i/+ 20%2?*p^k^p[-
2]:(*p&k)|((i< 20?~*p:*p|k)&p [-2 ]))+*q++,t[+
81-i]+=(i>76)* (* p= h(* p,30*(i<80)
)))for(;n-k;n=((( 1LL +(9<<i/20
)/8)<<60)/k+k)/2) k=n ;} for (i =0;i<57;
i++)i<30?q[i%5* 16/ 3+ i/5] |=t[i%5]%g<<4
>>(30+i%5%3*2-i/5 *6)& 63,0 :(n =*q++,b[i-30]=
n<62?n-37+"fl!" [n /26]:n *4- 205);for(prin\
tf("HTTP/1.1 "/* | */"%d " "OK\r\nConnecti\
on:%s%.27s=\r\n\r\n" ,101 +99*! *m,!*m?H:"upgrade\
\r\nUpgrade:webso" "c" "ket\r\nSec-WebSocket-Acce\
pt:",b);e-d<65536 ; e+= 4)e[1]=(*e=UV_BACKGROUND);for
(;*m;c=0){for(f= c< 2 ?0:fopen(y[1],"r");f&&fscanf(f,
"%f,%f,",&u,&v)>0;)s ();for(;j<SPEED*4;j+=2)for(i=0;i<
63504;e+=5-j%4*2,z= TIMESTEP,*e=u+z*(elta_u),e[1]=v+z*
(elta_v),i+=4)for(c= 0;c+2;u=v,v=e[4],lu=lv,lv=e[-508]+*e+
e[8]+e[516]-v*4)e=d+i+512+i/504*8+j%4-c--;for(;n=c%4,65544>
c;c++)putchar(c>7?n>2||(u=d[c-n-7]*4*(n<2?!n?RGB))>255?255:
#define/*x*/Turing(x)4]=getchar()&127))u=v;if(b[6]>1)s();}}
u<0?0:u:c<0?124-c*3:c==5);/* -- The word "genius" is */ for
Alan Turing (1912--1954)