def evenlyDivisibleBy(divider: Int): Int ^^ Int = Extractor {
  case n if n % divider == 0 => n
}

val evenlyDivisibleByFive = evenlyDivisibleBy(5)
val evenlyDivisibleByThree = evenlyDivisibleBy(3)
val evenlyDivisibleByFifteen = evenlyDivisibleBy(15)

def fizzbuzz(x: Int) = x match {
  case evenlyDivisibleByFifteen(_) => "fizzbuzz"
  case evenlyDivisibleByFive(_) => "buzz"
  case evenlyDivisibleByThree(_) => "fizz"
  case _ => x
}

(1 until 100).map(fizzbuzz).foreach(println)