Hofstadter Figure-Figure sequences: Difference between revisions
Hofstadter Figure-Figure sequences (view source)
Revision as of 12:58, 24 October 2011
, 12 years agoJ: bugfix
m (→{{header|J}}) |
(J: bugfix) |
||
Line 140:
while.+./y>:R,&#S do.
R=: R,({:R)+(<:#R){S
S=: (i.<:+/_2{.R)-.R
end.
R;S
|