2

简而言之，我想声明一个这样的特征：

trait Test {
    def test(amount: Int): A[Int] // where A must be a Monad
}

这样我就可以在不知道monadA是什么的情况下使用它，例如：

class Usecase {
    def someFun(t: Test) = for { i <- t.test(3) } yield i+1
}

更多细节...

本质上，我想做这样的事情：

class MonadResultA extends SomeUnknownType {
    // the base function
    def test(s: String): Option[Int] = Some(3)
}

class MonadResultB(a: MonadResultA) extends SomeUnknownType {
    // added a layer of Writer on top of base function
    def test(s: String): WriterT[Option, String, Int] = WriterT.put(a.test(s))("the log")
}

class Process {
    def work(x: SomeUnknownType) {
        for {
            i <- x.test("key")
        } yield i+1
    }
}

我希望能够传递MonadResultA 或 MonadResultB不对函数进行任何更改的任何实例work。
缺少的部分是SomeUnknowType，我想它应该有一个test类似的下面来使work函数编译。

trait SomeUnknowType {
    def test(s: String): T[Int] // where T must be some Monad
}

正如我所说，我还在学习这个 monad 的东西......如果你发现我的代码不是正确的方法，非常欢迎你指出来~

非常感谢~~

4

1 回答 1

4

假设您有一个名为的类型类，Monad您可以编写

def test[A:Monad](amount: Int): A[Int]

调用 test 时，编译器将要求Monad[A]范围内有隐式类型。

编辑： 我仍然不确定您在寻找什么，但是您可以将 monad 值与其对应的类型类打包成这样的特征：

//trait that holds value and monad
trait ValueWithMonad[E] {
  type A[+E]
  type M <: Monad[A]
  val v:A[E]
  val m:M
}

object M {

  //example implementation of test method
  def test(amount:Int):ValueWithMonad[Int] = new ValueWithMonad[Int] {
    type A[+E] = Option[E]
    type M = Monad[Option]
    override val v = Option(amount)
    override val m = OptionMonad
  }

  //test can now be used like this
  def t {
    val vwm = test(1)
    vwm.m.bind(vwm.v, (x:Int) => {
      println(x)
      vwm.m.ret(x)
    })
  }
}

trait Monad[A[_]] {
  def bind[E,E2](m:A[E], f:E=>A[E2]):A[E2]
  def ret[E](e:E):A[E]
}

object OptionMonad extends Monad[Option] {
  override def bind[E,E2](m:Option[E], f:E=>Option[E2]) = m.flatMap(f)
  override def ret[E](e:E) = Some(e)
}
于 2012-08-09T12:50:30.590 回答