import scalaz._, Scalaz._
def bench[T](fn: => T):(T,Long) = {
val start = System.currentTimeMillis()
val result = fn
val end = System.currentTimeMillis()
(result, end - start)
}
val (result, time) = bench{List(Option(1)).traverse(x => x)}
// time = 150ms!?