FizzBuzz in scala, somewhat functional

FizzBuzz.scala

object Main {
  def main(args: Array[String]) = {
    def m3(x: Int) = x % 3 == 0
    def m5(x: Int) = x % 5 == 0

    val checks = List((m3 _, "Fizz"), (m5 _, "Buzz"))

    Stream.from(1) map { n =>
      checks filter (_._1(n)) map (_._2) reduceOption (_ + _) getOrElse n
    } take 100 foreach println
  }
}