Anagrams/Deranged anagrams: Difference between revisions

Content added Content deleted

Inline

@@ Line 3,505: / Line 3,505: @@
       [ dip behead = if
           [ dip not conclude ] ]
-   drop ]                        is deranged ( $ $ --> b )
+    drop ]                       is deranged ( $ $ --> b )
   $ 'rosetta/unixdict.txt' sharefile drop nest$
@@ Line 3,515: / Line 3,515: @@
             nested join nested
             temp take join temp put ]
-          else drop ]
+        else drop ]
-       drop ]
+      drop ]
   drop
   temp take