• Home
• com.peterpotts
• example_2.11
• 1.0.2
• source code
• ExampleMonad.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.

com.peterpotts.example.ExampleMonad.scala Maven / Gradle / Ivy

package com.peterpotts.example

import scalaz._

trait ExampleMonad {

  case class Exampler[+T](generator: Long => T)

  type Example[T] = Free[Exampler, T]

  implicit val examplerFunctor: Functor[Exampler] = new Functor[Exampler] {
    def map[A, B](exampler: Exampler[A])(f: A => B): Exampler[B] = Exampler(seed => f(exampler.generator(seed)))
  }

  object Example {
    def apply[T](generator: Long => T): Example[T] = Free.liftF(Exampler(generator))
  }

}