方案如何在一个条款中测试2个条件？

Question

我需要创建一个子函数来返回所有相邻节点，这是我需要的 this question在方案中。我是计划的新手，不确定如何将两个条件组合成一个测试用例？

基本上我的算法是测试节点是否在边缘。在这种情况下，我使用 5x5 网格。

如果两个节点都在拐角处，这意味着两者都等于 1 或 5，那么我将只有 2 个相邻节点。
如果只有一个节点被击中边缘，我将有 3 个节点返回值。
如果节点周围没有边，我将有 4 个节点返回。

我的问题是如何将 2 个测试用例放在一个子句中？

(define (neighbors l w)
  (if (= 1 l) and (= 1 w)
      (display l w))) --at top left corner

在这里，我想评估 l 和 w 是否都等于 1。现在这不起作用，因为我不能在语法中使用“and”“or”这样的关键字，也不能使用 & 或 + 来组合它们。有任何想法吗 ？或者我应该做点别的？

Answer 1

你有没有试过这个:

(define (neighbors l w)
  (if (and (= 1 l) (= 1 w))
     (display l w))) --at top left corner

因为当我看 this ，它似乎是这样工作的