Hofstadter Figure-Figure sequences: Difference between revisions

Content added Content deleted

Inline

@@ Line 390: / Line 390: @@
 =={{header|J}}==
-<lang j>R=:1 1 3
+<lang j>R=: 1 1 3
-S=:0 2 4
+S=: 0 2 4
-FF=:3 :0
+FF=: 3 :0
-  while.+./y>:R,&#S do.
+  while. +./y>:R,&#S do.
     R=: R,({:R)+(<:#R){S
     S=: (i.<:+/_2{.R)-.R