Recent public codes are listed below. You can filter them by the following programming languages:
- view
- All
- Ada
- Assembler
- Assembler
- AWK (gawk)
- AWK (mawk)
- Bash
- bc
- Brainf**k
- C
- C#
- C++
- C++0x
- C99 strict
- CLIPS
- Clojure
- COBOL
- COBOL 85
- Common Lisp (clisp)
- D (dmd)
- Erlang
- F#
- Factor
- Falcon
- Forth
- Fortran
- Go
- Groovy
- Haskell
- Icon
- Intercal
- Java
- JavaScript (rhino)
- JavaScript (spidermonkey)
- Lua
- Nemerle
- Nice
- Nimrod
- Objective-C
- Ocaml
- Oz
- Pascal (fpc)
- Pascal (gpc)
- Perl
- Perl 6
- PHP
- Pike
- Prolog (gnu)
- Prolog (swi)
- Python
- Python 3
- R
- Ruby
- Scala
- Scheme (guile)
- Smalltalk
- SQL
- Tcl
- Text
- Unlambda
- VB.NET
- Whitespace
-
1
NR>1{i=0;while rshift($0,++i);print 2^i}
-
1
NR>1{while(rshift($0,++$2));print 2^$2}
-
1
NR>1{while(rshift($0,++$2));$0=2^$2}
-
1
NR>1{while(rshift($0,++$2));print 2^$2}
-
1
NR>1{while(rshift($0,++$2));print 2^$2/2}
-
1
{i=-1;while(rshift($0,++i)>0);print 2^i}
-
1
{while(rshift($0,$2)>0)++$2;print 2^$2}
-
1
{while($0/=2>0)++$2;print 2^$2}
-
1
{while(rshift($0,$2))++$2;print 2^$2}
-
1
{while(rshift($0,$2))++$2;print 2*2^$2}
-
1
{while(rshift($0,$2))++$2;print lshift(1,$2)}
-
1
{while(rshift($0,$2))++$2;print lshift(1,$2)}
-
1
{while(rshift($0,$2++));print lshift(1,$2)}
-
1
{while(rshift($0,++$2));print lshift(1,$2)}
-
1
{n=0;while(rshift($0,++n));print lshift(1,n)}
-
1
{n=0;while(rshift($0,++n)>1);print lshift(1,++n)}
-
1
{while(rshift($0,++n)>1);print lshift(1,++n)}
-
1 2
$0+=and($0,$0-1)?($0+and($0,$0-1)):$0 END{for(i=0; i<100; ++i) print i " " and(i,i-1);}
-
1 2
$0+=and($0,$0-1)?($0+and($0,$0-1)):$0 END{for(i=0; i<100; ++i) print i and(i,i-1);}
-
1
$0+=and($0,$0-1)?($0+and($0,$0-1)):$0
-
1
$0+=and($0,$0-1)?($0+and($0,$0-1))/2:$0
-
1
$0+=and($0,$0-1)?($0-and($0,$0-1))/2:$0
-
1
$0+=and($0,$0-1)?int(($0-and($0,$0-1))/2)*2:$0
-
1
$0+=and($0,$0-1)?($0-and($0,$0-1))/2:$0
-
1
$0+=and($0,$0-1)?and($0,$0-1)/2:$0
-
1
$0+=and($0,$0-1)
-
1
$0=$0==0?1:and($0,$0-1)?int($0^.5+1)*int($0^.5+1):$0*2
-
1
$0=$0==0?1:and($0,$0-1)?2^int($0^.5+1):$0*2
-
1
$0=$0==0?1:and($0,$0-1)?2^int($0^.5+1):$0*2
-
1
$0=and($0,$0-1)?2^int($0^.5+1):$0*2


