* @since 4.0.0
(O: Order<A>)
| 529 | * @since 4.0.0 |
| 530 | */ |
| 531 | function Array_<A>(O: Order<A>): Order<ReadonlyArray<A>> { |
| 532 | return make((self, that) => { |
| 533 | const aLen = self.length |
| 534 | const bLen = that.length |
| 535 | const len = Math.min(aLen, bLen) |
| 536 | for (let i = 0; i < len; i++) { |
| 537 | const o = O(self[i], that[i]) |
| 538 | if (o !== 0) { |
| 539 | return o |
| 540 | } |
| 541 | } |
| 542 | return Number(aLen, bLen) |
| 543 | }) |
| 544 | } |
| 545 | |
| 546 | export { |
| 547 | /** |