3 # This file is part of NIT ( http://www.nitlanguage.org ).
4 # This program is public domain
7 # SEE: <http://rosettacode.org/wiki/Fibonacci_word>
12 var words
= new Array[String]
19 if i
>= words
.length
then
20 w
= words
[i-1
] + words
[i-2
]
26 if w
.length
> 40 then out
= "..."
27 print
"{i}\t{w.length}\t{w.chars.to_counter.entropy.to_precision(16)}\t{out}"