RosettaCodeData/Task/Fractran/J/fractran-8.j
2019-09-12 10:33:56 -07:00

1 line
40 B
Text

FRACTAN=. ({~ (1 i.~ (= <.)))@:* ::]^:_