View in color | License | Download script | History | Other scripts by: endo |
30-Apr 15:59 UTC
[0.041] 10.005k
[0.041] 10.005k
collatz.rREBOL [
Title: "Collatz Sequences"
Date: 2010-02-25
File: %collatz.r
Purpose: "Calculate collatz series, change start value and run."
Library: [
level: 'beginner
platform: 'all
type: [one-liner]
domain: [math]
tested-under: none
license: 'public-domain
]
]
i: 100000000001 forever [either odd? i [i: i * 3 + 1] [i: i / 2] prin [i tab]] |