Composition Calculus by inaniwa(kik)

C[],P,X,Y;main(){for(;~(X=getchar());)Y=X<11?g(Y),g(10),P=0:X-32?Y&&f(Y),X:Y;}f(x){x>0|C[-x]>0||C[-C[-x]]-46?C[++P]=X,C[++P]=x,X=-P:f(C[~x])+f(C[~C[-x]]);}g(x){putchar(x<0?g(40),g(C[-x]),g(32),g(C[~x]),41:x);}

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page