D
Size: a a a
D
Т8
EL
EL
collatz (num, i)
| num == 1 = i
| even num = collatz (num`div`2, i+1)
| otherwise = collatz (3*num+1, i+1)
А⚙
Т8
EL
Т8
А⚙
nextCollatz 1 = 1
nextCollatz x = if even x then
div
x 2 else 3 * x + 1
collatz = (+1) . length . takeWhile (/= 1) . iterate nextCollatz
А⚙
EL
А⚙
EL
DP
А⚙
AT
DP
А⚙
А⚙
AT