Play2's Applicative to Scalaz's one

Play4Scalaz.scala

import scalaz._
import scalaz.Scalaz._

object Play4Scalaz {

  type PlayApp[M[_]] = play.api.libs.functional.Applicative[M]

  implicit def applicative[M[_]:PlayApp]:Applicative[M] =
    new Applicative[M] {
      override def apply[A,B](f:M[A => B], a:M[A]) = implicitly[PlayApp[M]].apply(f, a)
      override def fmap[A,B](r:M[A], f: A => B) = implicitly[PlayApp[M]].map(r, f)
      override def pure[A](a: => A) = implicitly[PlayApp[M]].pure[A](a)
    }
}