11 lines
171 B
APL
11 lines
171 B
APL
|
dfnHailstone 5
|
|||
|
|
5 16 8 4 2 1
|
|||
|
|
5↑hailstone 27
|
|||
|
|
27 82 41 124 62
|
|||
|
|
¯5↑hailstone 27
|
|||
|
|
16 8 4 2 1
|
|||
|
|
⍴hailstone 27
|
|||
|
|
112
|
|||
|
|
1↑{⍵[⍒↑(⍴∘hailstone)¨⍵]}⍳100000
|
|||
|
|
77031
|