让我们land代表"逻辑和",然后他们很容易定义:
(defn land
([] true)
([x & xs] (and x (apply land xs))))
Run Code Online (Sandbox Code Playgroud)
或者,稍微接近标准and行为:
(defn land
([] true)
([x] x)
([x & xs] (and x (apply land xs))))
Run Code Online (Sandbox Code Playgroud)
同样的or.
| 归档时间: |
|
| 查看次数: |
3587 次 |
| 最近记录: |