在我们查阅 Ramda 的文档 时, 常会见到一些"奇怪"的类型签名和用法,例如:
(Applicative f, Traversable t) => (a → f a) → t (f a) → f (t a)
或者,某一些函数"奇怪"的用法:
// R.ap can also be used as S combinator // when only two functions are passed
R.ap(R.concat, R.toUpper)('Ramda') //=> 'RamdaRAMDA'
这些"奇怪"的点背后投射着 Ramda "更深"一层的设计逻辑, 本文将会对此作出讲解, 并阐述背后通用的函数式编程理论知识。
Ramda 为人熟知的一面
Ramda 经常被当做 Lodash 的另外一个"更加FP"的替代库,相对于 Lodash,Ramda 的优势(之一)在于完备的柯里化与 data last 的设计带来的便捷的管道式编程(pipe)。
举一个简单的代码对比示例:
- Ramda:
const myFn = R.pipe (
R.fn1,
R.fn2 ('arg1', 'arg2'),
R.fn3 ('arg3'),
R.fn4
)
- Lodash:
const myFn = (x, y) => {
const var1 = _.fn1 (x, y)
const var2 = _.fn2 (var1, 'arg1', 'arg2')
const var3 = _.fn3 (var2, 'arg3')
return _.fn4 (var3)
}
Ramda 类型签名
在 Ramda 的 API 文档中, 类型签名的语法有些"奇怪":
- add: Number → Number → Number
我们结合 Ramda 的柯里化规则, 稍加推测, 可以将这个函数转换为TypeScript 的定义:
export function add(a: number, b: number): number;
export function add(a: number): (b: number) => number;
OK, 那为什么Ramda 的文档不直接使用TypeScript 表达函数的类型呢? -- 因为更加简洁!
Ramda 文档中的类型签名使用的是Haskell 的语法, Haskell 作为一门纯函数式编程语言, 可以很简洁地表达柯里化的语义, 相较之下, TypeScript 的表达方式就显得比较臃肿。
当然, 使用Haskell 的类型签名的意义不仅于此, 让我们再看看其他"奇怪"的函数类型:
- ap:
[a → b] → [a] → [b]
Apply f => f (a → b) → f a → f b
(r → a → b) → (r → a) → (r → b)
结合文档中的demo:
R.ap([R.multiply(2), R.add(3)], [1,2,3]); //=> [2, 4, 6, 4, 5, 6]
R.ap([R.concat('tasty '), R.toUpper], ['pizza', 'salad']); //=> ["tasty pizza", "tasty salad", "PIZZA", "SALAD"]
// R.ap can also be used as S combinator
// when only two functions are passed
R.ap(R.concat, R.toUpper)('Ramda') //=> 'RamdaRAMDA'
[a → b] → [a] → [b]我们好理解, 就是笛卡尔积;
(r → a → b) → (r → a) → (r → b)我们也能理解, 就是两个函数的串联;
Apply f => f (a → b) → f a → f b就有点难理解了, 语法上就有些陌生, 我们先将其翻译成TypeScript 语法:
:), 好吧, 这段类型没法简单地翻译成TypeScript, 因为: TypeScript 不支持将 「类型构造器」 作为类型参数!举个例子:
type T<F> = F<number>;
报错信息如下:
Type 'F' is not generic.
在类型签名中F是一个类型构造器, 既和Array一样的 「返回类型的类型」, 然而, TypeScript 里根本无法声明"一个类型参数为类型构造器"。
正如示例中type T<F> = F<number>;中, 我们无法告诉TypeScript, 这里的F是一个类型构造器, 所以当将number传入F的时候, 就报错了。
OK, 我们假设TypeScript 支持声明"一个类型参数为类型构造器", 让我们再来看看Apply f => f (a → b) → f a → f b该怎么翻译:
type AP = <F extends Appy, A, B>(f: F<((a: A) => B)>) => (fa: F<A>) => F<B>;
这里的F可以理解为一种 「上下文」, 这段类型签名可以先简单地理解为:
将一个包裹在上下文中的「函数」取出, 再将另一个包裹在上下文中的「值」取出, 调用函数后, 将函数的返回值重新包裹进上下文中并返回。
这里的 「上下文」 是一个泛指, 比如我们可以将其特异化(specialize)为 Promise :
type AP = <A, B>(f: Promise<((a: A) => B)>) => (fa: Promise<A>) => Promise<B>;
const ap: AP = (f) => fa => f.then(ff => fa.then(ff));
ap 或说 Apply 作为函数式编程中的一种常见抽象, 有非常重要重要的学习意义, 但其抽象的解析超出本文范围, 在这里我们只聚焦于「是什么」, 暂不考虑「为什么」。
那么, (r → a → b) → (r → a) → (r → b)与Apply f => f (a → b) → f a → f b是什么关系?
他们之间是同父异母的关系, (r → a → b) → (r → a) → (r → b)是对Apply f => f (a → b) → f a → f b的特异化, 正如我们对Promise 做的那样。
函数也可以是一个 「上下文」?
答案是可以的, 我们可以将一个一元函数a -> b理解为"一个包裹在上下文中的b, 只不过为了获取这个b, 需要先传入一个a。
先看看 Haskell 对ap 的定义:
instance Applicative ((->) r) where
(<*>) f g x = f x (g x)
替换为TypeScript 的实现, 我们将上面的Promise 的例子稍微修改下, 得出:
type F<A> = (a: any) => A;
type AP = <A, B>(f: F<((a: A) => B)>) => (fa: F<A>) => F<B>;
const ap: AP = f => fa => {
return (r) => f(r)(fa(r));
}
同样的, 我们得到Apply 特异化为Array 的实现:
type AP = <A, B>(f: Array<((a: A) => B)>) => (fa: Array<A>) => Array<B>;
const ap: AP = f => fa => {
return f.flatMap(ff => fa.map(ff));
};
综上所述, 我们可以得出结论:
ap的类型签名[a → b] → [a] → [b]和(r → a → b) → (r → a) → (r → b)是Apply f => f (a → b) → f a → f b的特异化。