diff --git a/.gitignore b/.gitignore index 6a0c445..148252b 100644 --- a/.gitignore +++ b/.gitignore @@ -27,4 +27,5 @@ test*.c* *.asm !mmw.so *.k -!header.k \ No newline at end of file +!header.k +!join.k \ No newline at end of file diff --git a/join.k b/join.k new file mode 100644 index 0000000..0a220d8 --- /dev/null +++ b/join.k @@ -0,0 +1 @@ +{[I;L;R;i] t:&(I[i]);d:(#t);$[d=0;!0;+(Aa[t];Ab[t];d#(Bb[i]))]}[(Aa {x>(y*10)}/: Ba); Aa; Ba]'!#Aa \ No newline at end of file