Elias delta to Fibonacci by 51b

char*q;s[9],n;f(x,y){n<y?*q=49:f(y,x+y);*--q=n>=x?n-=x,49:48;}g(r){for(n=1;r--;n+=getchar()%2)n*=2;}main(c){for(;c=~getchar();)printf(c&2?c%7?g(n),g(n-1),q=s+8,f(1,2),q:n++*0:"\n");}

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

download

return to the top page