9 lines
218 B
Text
9 lines
218 B
Text
fun octal(x: int): int =
|
|
loop ((out,mult,x) = (0,1,x)) = while x > 0 do
|
|
let digit = x % 8
|
|
let out = out + digit * mult
|
|
in (out, mult * 10, x / 8)
|
|
in out
|
|
|
|
fun main(n: int): [n]int =
|
|
map octal (iota n)
|