June 2018 Update

2018-06-22 20:57:24 +00:00 · 2018-06-22 20:57:24 +00:00 · 22f33d4004
commit 22f33d4004
parent ba8067c3b7
5278 changed files with 84726 additions and 14379 deletions
--- a/Task/Order-two-numerical-lists/J/order-two-numerical-lists-2.j
+++ b/Task/Order-two-numerical-lists/J/order-two-numerical-lists-2.j
@ -1,49 +1 @@
-    (,0) before ''
-0
-    '' before ''
-0
-    '' before ,0
-1
-    (,_1) before ,0
-1
-    (,0) before ,0
-0
-    (,0) before ,_1
-0
-    (,0) before 0 _1
-1
-    (,0) before 0 0
-1
-    (,0) before 0 1
-1
-    0 _1 before ,0
-0
-    0 0 before ,0
-0
-    0 0 before ,1
-1
-
-    (,'b') before ''
-0
-    '' before ''
-0
-    '' before ,'b'
-1
-    (,'a') before ,'b'
-1
-    (,'b') before ,'b'
-0
-    (,'b') before ,'a'
-0
-    (,'b') before 'ba'
-1
-    (,'b') before 'bb'
-1
-    (,'b') before 'bc'
-1
-    'ba' before ,'b'
-0
-    'bb' before ,'b'
-0
-    'bb' before ,'c'
-1
+cmp=: {.@\:@,:&(,&__)
--- a/Task/Order-two-numerical-lists/J/order-two-numerical-lists-3.j
+++ b/Task/Order-two-numerical-lists/J/order-two-numerical-lists-3.j
@ -0,0 +1,29 @@
+   cmp&.>"{~ ('';0;(,0);1;(,1);1 1)
+┌─┬─┬─┬─┬─┬─┐
+│0│1│1│1│1│1│
+├─┼─┼─┼─┼─┼─┤
+│0│0│0│1│1│1│
+├─┼─┼─┼─┼─┼─┤
+│0│0│0│1│1│1│
+├─┼─┼─┼─┼─┼─┤
+│0│0│0│0│0│1│
+├─┼─┼─┼─┼─┼─┤
+│0│0│0│0│0│1│
+├─┼─┼─┼─┼─┼─┤
+│0│0│0│0│0│0│
+└─┴─┴─┴─┴─┴─┘
+
+before&.>"{~ (0;1;'';(,0);(,1);1 1)
+┌─┬─┬─┬─┬─┬─┐
+│0│1│1│1│1│1│
+├─┼─┼─┼─┼─┼─┤
+│0│0│1│1│1│1│
+├─┼─┼─┼─┼─┼─┤
+│0│0│0│1│1│1│
+├─┼─┼─┼─┼─┼─┤
+│0│0│0│0│1│1│
+├─┼─┼─┼─┼─┼─┤
+│0│0│0│0│0│1│
+├─┼─┼─┼─┼─┼─┤
+│0│0│0│0│0│0│
+└─┴─┴─┴─┴─┴─┘