• Home
• dev.continuously.libretto
• libretto-core_3
• 0.3.1
• source code
• Monad.scala

×

Project download

Many resources are needed to download a project. Please understand that we have to compensate our server costs. Thank you in advance.
Project price only 1 $

You can buy this project and download/modify it how often you want.

libretto.cats.Monad.scala Maven / Gradle / Ivy

package libretto.cats

/** Witnesses that `F` is a monad in the category `->`. */
trait Monad[->[_, _], F[_]] extends Functor[->, F] {
  def pure[A]    :       A -> F[A]
  def flatten[A] : F[F[A]] -> F[A]

  import category.*

  def liftF[A, B](f: A -> F[B]): F[A] -> F[B] =
    lift(f) > flatten

  extension [A, B](f: A -> F[B]) {
    def >=[C](g: B -> F[C]): A -> F[C] =
      f > liftF(g)
  }
}