scheme

2热度

1回答

以下代码搜索图并根据作为参数传递的谓词函数返回true或false。该图以邻接表的形式表示。假设图形不包含循环。代码： (define (search predicate? key) (define value-list (lookup key)) (if (not (empty? value-list)) (if (findf predicate? valu

1热度

1回答

元数不匹配构建子记录类型

我有一个point记录类型定义如下时： (define-record-type point (make-point x y) point? (x point-x) (y point-y) ) 现在，我想扩展point记录类型，定义了一个新的记录类型如下： (define-record-type cpoint (make-cpoint col

2热度

1回答

如何使用数鸡方案脚本参数

这里是我的方案代码： (define (fact n) (if (= n 1) 1 (* n (fact (- n 1))))) (define (main args) (fact (car args))) 然后我运行这段代码的脚本在bash命令： csi -ss test.scm 4 然而，口译员得到这个错误信息： Error: (=) bad

-2热度

1回答

方案中的排序程序

我如何编写我自己的排序程序在程序中接受程序并根据程序进行排序！如果可以，程序是什么？例如 - （排序“（2 4 9 5 3）>）的产率（9 5 4 3 2）而且任何人都可以提供一个程序，用于在第二列表中搜索一个列表的每个元素！

2热度

2回答

有没有一种检测方案实现的标准方法？

存在许多不同的Scheme实现，其中一些可能带有比其他更多的内置功能（或怪癖）。假设我们想写一段Scheme代码，它可以在许多Scheme实现中移植到实际中。有没有一种标准的方法来检测哪个Scheme实现正在运行代码？（通过“标准方式”，我的意思是通常的做法，或按照方案标准的规定）。

0热度

1回答

lisp-“汽车：合同违规期望：对？给定:(）”同时销毁访问控制模型中的obj

编写一个过程以销毁我的访问控制模型中的对象并模拟每种情况。这是我的代码。 (define st1 (term (st 3 2 (,s0 ,s1 ,s2) (,o0 ,o1) ,br ,m1))) (define m1 (term ((,s0 control ,s0) (,s1 (trans ,r1) ,o0) (,s2 ,r2 ,o1)))) (define r1 (term read))

1热度

1回答

不可能找到一个lambda纸

我读的拉姆达论文，但它是不可能的，我找到this list 8号文件，斯蒂尔的即论文，名为 G.L.Steele, Jr. "Compiler Optimization Based on Viewing LAMBDA as RENAME + GOTO". AI: An MIT Perspective. 1980 有人可以帮我找了个地方我可以在哪里买到这篇论文？

0热度

1回答

什么引用将以下表达式改为？

(display (+ 1 2)) ; output 3 (display '(+ 1 2)) ; output (+ 1 2) (display z) ; Error: execute: unbound symbol: "z" [] (display 'z) ; output z 什么引用将以下表达式改为？一个字符串，或一个列表，或两者？第一个例子似乎变成了一个列表，而第二个例子似乎

0热度

1回答

圆括号和`apply`之间有什么区别？

要用某些参数调用某个函数，我们可以简单地使用(funcname arg1 arg2 ...)或(apply funcname '(arg1 arg2 ...))。两种方式有什么区别？谢谢。

0热度

1回答

Scheme中的变异是什么？

我试图编写一个函数，它将在Scheme中找到给定点与其他点列表之间的最大距离。其中一个要求是我不能使用变异。那么Scheme中的变异是什么？经过Google搜索后，我认为设定和定义是突变，但没有具体说明让。你们有些人可以为我澄清这一点。谢谢。