Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
8
Task/Gray-code/K/gray-code-1.k
Normal file
8
Task/Gray-code/K/gray-code-1.k
Normal file
|
|
@ -0,0 +1,8 @@
|
|||
xor: {~x=y}
|
||||
gray:{x[0],xor':x}
|
||||
|
||||
/ variant: using shift
|
||||
gray1:{(x[0],xor[1_ x;-1_ x])}
|
||||
|
||||
/ variant: iterative
|
||||
gray2:{x[0],{:[x[y-1]=1;~x[y];x[y]]}[x]'1+!(#x)-1}
|
||||
Loading…
Add table
Add a link
Reference in a new issue