## F#, <s>202</s> 166 bytes let rec f a b = seq { yield int(a%6m)|>function|0->"FiboNacci"|2|4->"Fibo"|3->"Nacci"|_->a.ToString() yield! f b (a+b)} f 1m 1m|>Seq.take 100|>Seq.iter(printfn"%s") This is an FSX file