Eban numbers: Difference between revisions

Content added Content deleted

Inline

@@ Line 2,180: / Line 2,180: @@
 =={{header|Quackery}}==
-<syntaxhighlight lang="Quackery">
+<syntaxhighlight lang="Quackery">  [ 20 /mod
-  [ 20 /mod
 /mod
     [ table 0 2 4 6 ]
@@ Line 2,187: / Line 2,186: @@
     [ table 0 30 40 50 60 ]
     +
-    over 0 = iff
+    over 0 = iff nip done
+    swap recurse 1000 * + ] is n->eban ( n --> n )
-      nip done
-    swap
-    recurse 1000 * + ]      is n->eban ( n --> n )
   [] 1