22

是否可以foldLeft在参数列表上执行 a ，其中提供给折叠的初始值是一个完全柯里化的函数，运算符是apply，并且列表是要传递给函数的参数列表f？

例如，假设 f 定义为：

scala> val f = (i: Int, j: Int, k: Int, l: Int) => i+j+k+l
f: (Int, Int, Int, Int) => Int = <function4>

我们当然可以直接使用：

scala> f(1, 2, 3, 4)
res1: Int = 10

或者 curry 并一次应用一个参数：

scala> f.curried
res2: Int => Int => Int => Int => Int = <function1>

scala> f.curried.apply(1).apply(2).apply(3).apply(4)
res3: Int = 10

乍一看，这看起来像是foldLeft.

我第一次尝试描述这个apply使用顺序foldLeft看起来像：

scala> List(1, 2, 3, 4).foldLeft(f.curried)({ (g, x) => g.apply(x) })

但是，这会产生以下错误：

<console>:9: error: type mismatch;
 found   : Int => Int => Int => Int
 required: Int => Int => Int => Int => Int
              List(1, 2, 3, 4).foldLeft(f.curried)({ (g, x) => g.apply(x) })

我对错误消息的阅读是类型推断需要一些提示g。

我正在寻找的解决方案在我的原始表达式中保持不变，除了以下类型g：

List(1, 2, 3, 4).foldLeft(f.curried)({ (g: ANSWER, x) => g.apply(x) })

我的第一个想法是联合类型在这里会很有用。我已经看到 Miles Sabin 使用 Curry-Howard 推导联合类型，所以如果第一个预感是真的，那么我似乎拥有解决问题所需的基本机制。

但是：即使联合类型是答案，如果我可以参考“从函数的完全柯里化类型到除了最后一个参数之外的所有类型的柯里化函数类型的所有类型的联合”，这将是有用的。换句话说，一种转换类型的方法：

T1 => ... => Tn

进入联合类型：

(T1 => ... => Tn) |∨| ... |∨| (Tn-1 => Tn)

作为上述类型将很有用g。

做 a foldLefton aList将讨论限制在T1通过Tn-1都相同的情况。像这样的符号

(T1 =>)+ Tn

将描述我想要提供的类型g。

我要询问的具体情况不需要任意长的链，因此我们可以使用

(T1 =>){1,4} Tn

但是，展望想要对不相等的类型链执行此操作，也许一些将链切分成所有后缀集的类型的神奇功能更有用：

Suffixes(T1 => ... => Tn)

目前，实现这一点远远超出了我的 Scala 能力。任何有关如何这样做的提示将不胜感激。这是否可以通过 Scala 现有类型系统的高级使用或通过编译器插件来完成，或者两者都没有，我不知道。

正如在下面的评论中所指出的，将结果称为“联合类型”并不完全适合此用例。我不知道还能怎么称呼它，但这是我目前最接近的想法。其他语言对这个想法有特殊的支持吗？这将如何在 Coq 和 Agda 中工作？

命名这个问题并理解它在更大的图景（类型理论、可判定性等）方面的位置对我来说比有一个有效的实现更重要ANSWER，尽管两者都很好。奖金指向任何可以与 Scalaz、Monoids 或一般范畴理论建立联系的人。

4

3 回答 3

30

事实证明这比我最初预期的要简单得多。

首先我们需要定义一个简单的HList,

sealed trait HList

final case class HCons[H, T <: HList](head : H, tail : T) extends HList {
  def ::[H1](h : H1) = HCons(h, this)
  override def toString = head+" :: "+tail.toString
}

trait HNil extends HList {
  def ::[H1](h : H1) = HCons(h, this)
  override def toString = "HNil"
}

case object HNil extends HNil
type ::[H, T <: HList] = HCons[H, T]

然后我们可以在类型类的帮助下归纳定义折叠函数，

trait FoldCurry[L <: HList, F, Out] {
  def apply(l : L, f : F) : Out
}

// Base case for HLists of length one
implicit def foldCurry1[H, Out] = new FoldCurry[H :: HNil, H => Out, Out] {
  def apply(l : H :: HNil, f : H => Out) = f(l.head)
}

// Case for HLists of length n+1
implicit def foldCurry2[H, T <: HList, FT, Out]
  (implicit fct : FoldCurry[T, FT, Out]) = new FoldCurry[H :: T, H => FT, Out] {
    def apply(l : H :: T, f : H => FT) = fct(l.tail, f(l.head))
}

// Public interface ... implemented in terms of type class and instances above
def foldCurry[L <: HList, F, Out](l : L, f : F)
  (implicit fc : FoldCurry[L, F, Out]) : Out = fc(l, f)

我们可以像这样使用它，首先是你原来的例子，

val f1 = (i : Int, j : Int, k : Int, l : Int) => i+j+k+l
val f1c = f1.curried

val l1 = 1 :: 2 :: 3 :: 4 :: HNil

// In the REPL ... note the inferred result type
scala> foldCurry(l1, f1c)
res0: Int = 10

我们也可以foldCurry对具有不同arity和非统一参数类型的函数使用相同的未修改函数，

val f2 = (i : Int, s : String, d : Double) => (i+1, s.length, d*2)
val f2c = f2.curried

val l2 = 23 :: "foo" :: 2.0 :: HNil

// In the REPL ... again, note the inferred result type
scala> foldCurry(l2, f2c)
res1: (Int, Int, Double) = (24,3,4.0)
于 2011-11-06T21:48:42.257 回答
6

您的函数需要正好 4 个Int参数。foldLeft是适用于任意数量元素的函数。你提到List(1,2,3,4)但如果你有List(1,2,3,4,5)orList()怎么办？

List.foldLeft[B]还期望一个函数返回相同的类型B，但在你的情况下Int，有些Function1[Int, _]不是相同的类型。

无论您想出什么解决方案都不会是通用的。例如，如果您的函数是 type(Int, Float, Int, String) => Int怎么办？然后你需要一个List[Any]

所以这绝对不是一份工作List.foldLeft。

考虑到这一点（警告非常 un-scala 代码）：

class Acc[T](f: Function1[T, _]) {
  private[this] var ff: Any = f
  def apply(t: T): this.type = {
    ff = ff.asInstanceOf[Function1[T,_]](t)
    this
  }
  def get = ff match { 
    case _: Function1[_,_] => sys.error("not enough arguments")
    case res => res.asInstanceOf[T]
  }
}

List(1,2,3,4).foldLeft(new Acc(f.curried))((acc, i) => acc(i)).get
// res10: Int = 10
于 2011-09-30T13:46:56.740 回答
3

好的，没有scalaz，没有解决方案，只有一个解释。如果您在 REPL 中使用 f.curried.apply 和 1，然后使用 2 个参数，请观察返回结果类型实际上每次都不同！FoldLeft 非常简单。它的类型是固定的，起始参数是 f.curried ，因为它的签名与 f.curried.apply(1) 不同，所以它不起作用。所以起始参数和结果必须是同一类型。foldLeft 的起始和元素的类型必须一致。你的结果甚至是 Int ，所以这绝对行不通。希望这可以帮助。

于 2011-09-30T07:10:38.657 回答