5

我正在尝试使用 y-combinator 在 scala 中定义 gcd:

object Main {
  def y[A,B]( f : (A => B) => A => B ) : A => B = f(y(f))
  def gcd = y[(Int,Int),Int]( (g) => (x,y) => if (x == 0) y else g(y % x, x) )
}

但我收到一个错误:

Main.scala:3: error: type mismatch;                                                  
 found   : (Int, Int) => Int                                                               
 required: (Int, Int) => Int                                                               
    def gcd = y[(Int,Int),Int]( (g) => (x :Int,y :Int) => if (x == 0) y else g(y % x, x) ) 
                                                       ^

如果我将所有论点都归结起来,那么就没有问题:

def gcd = y[Int,Int => Int]( g => x => y => if (x == 0) y else g(y % x)(x) )

我在非咖喱版本中做错了什么?

4

1 回答 1

9

位与(g) => (x :Int,y :Int) =>. Scala 希望您的论点是 (Int,Int) 的元组,所以它更像(g) => (tup: (Int, Int)) =>

您可以使用一些模式匹配来避免在 tup 上使用_1和匹配。_2这对我来说编译得很好:

def gcd = y[(Int, Int), Int](g => {
  case (x,y) => if(x == 0) y else g(y % x, x)
})
于 2012-01-20T23:46:55.273 回答