scheme - Andmap\ormap - chez 方案

Question

我试图在 chez 方案中查找有关 andmap 和 ormap 操作的信息。

尽管如此，我还是不明白这些操作的用途，以及它和map有什么区别。

Answer 1

在伪方案中，

(andmap f xs)  ==  (fold and #t (map f xs))
(ormap  f xs)  ==  (fold or  #f (map f xs))

除了那个：

1. 你不能以这种方式使用and和or。
2. andmap并且ormap可以短路处理列表。

也就是说，除了短路行为略有不同外，

(andmap f (list x1 x2 x3 ...))  ==  (and (f x1) (f x2) (f x3) ...)
(ormap  f (list x1 x2 x3 ...))  ==  (or  (f x1) (f x2) (f x3) ...)

Answer 2

Petite Chez Scheme Version 8.3
Copyright (c) 1985-2011 Cadence Research Systems

> (define (andmap f xs)
    (cond ((null? xs) #t)
          ((f (car xs))
            (andmap f (cdr xs)))
          (else #f)))
> (define (ormap f xs)
    (cond ((null? xs) #f)
          ((f (car xs)) #t)
          (else (ormap f (cdr xs)))))
> (andmap even? '(2 4 6 8 10))
#t
> (andmap even? '(2 4 5 6 8))
#f
> (ormap odd? '(2 4 6 8 10))
#f
> (ormap odd? '(2 4 5 6 8))
#t

Answer 3

由实用方案网提供：

(ormap procedure list1 list2 ...)

按顺序应用于procedure列表的相应元素，直到列表用完或过程返回真值。

(andmap procedure list1 list2 ...)

按顺序应用于procedure列表的相应元素，直到列表用完或过程返回 false 值。

http://practical-scheme.net/wiliki/schemexref.cgi/ormap

Figured this was worth putting here, since this StackOverflow question is the first result on Google.