球拍中有6个叶节点

Question

所以我下面有完美实现的代码（定义myleaf（内部节点'a（叶子节点5）（叶子节点6）））。多数民众赞成已经定义

如何实现6叶节点以获取更多数据？

    define-datatype bintree bintree?
  (leaf-node
    (datum number?)
  )
  (interior-node
   (key symbol?)
   (left bintree?)
   (right bintree?)
  )
)

Answer 1

我用“ 6-叶节点”来假设您的意思是一个6元树，其中每个非叶节点都有6个子节点。

(define-datatype bintree bintree?
     (leaf-node
       (datum number?)
     )
     (interior-node
      (key symbol?)
      (first  bintree?)
      (second bintree?)
      (third  bintree?)
      (fourth bintree?)
      (fifth  bintree?)
      (sixth  bintree?)
     )
   )

define-datatype基本上是这样的：

• 第一个参数：新数据类型的名称
• 第二个参数：用于测试某物是否是该类型实例的函数的名称
• 下一个：该数据类型可以存在的所有不同种类，它们的成员是它们的类型

因此，在这种情况下，您只需为想要的6个孩子中的每一个添加新成员。