scalaz.syntax.ApplicativePlusSyntax.scala Maven / Gradle / Ivy

Go to download
package scalaz
package syntax

/** Wraps a value `self` and provides methods related to `ApplicativePlus` */
final class ApplicativePlusOps[F[_],A] private[syntax](val self: F[A])(implicit val F: ApplicativePlus[F]) extends Ops[F[A]] {
  ////

  ////
}

sealed trait ToApplicativePlusOpsU[TC[F[_]] <: ApplicativePlus[F]] {
  implicit def ToApplicativePlusOpsUnapply[FA](v: FA)(implicit F0: Unapply[TC, FA]): ApplicativePlusOps[F0.M, F0.A] =
    new ApplicativePlusOps[F0.M, F0.A](F0(v))(F0.TC)

}

trait ToApplicativePlusOps0[TC[F[_]] <: ApplicativePlus[F]] extends ToApplicativePlusOpsU[TC] {
  implicit def ToApplicativePlusOps[F[_],A](v: F[A])(implicit F0: TC[F]): ApplicativePlusOps[F, A] =
    new ApplicativePlusOps[F, A](v)

  ////

  ////
}

trait ToApplicativePlusOps[TC[F[_]] <: ApplicativePlus[F]] extends ToApplicativePlusOps0[TC] with ToApplicativeOps[TC] with ToPlusEmptyOps[TC]

trait ApplicativePlusSyntax[F[_]] extends ApplicativeSyntax[F] with PlusEmptySyntax[F] {
  implicit def ToApplicativePlusOps[A](v: F[A]): ApplicativePlusOps[F, A] = new ApplicativePlusOps[F,A](v)(ApplicativePlusSyntax.this.F)

  def F: ApplicativePlus[F]
  ////

  ////
}