RosettaCodeData/Task/Fractran/J/fractran-8.j
2023-07-01 13:44:08 -04:00

1 line
41 B
Text

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