(define [DML vara]
(cond
((atom? (car vara))
(cond
((eqan? (car vara) 'N)
(display (cdr vara)))
(else (negate vara)))
)))
我目前正在试图挽救回的内容,现在为了简单起见,我在测试的否定功能为“返回”名单,我想救该功能的结果做测试。我如何实际保存从否定列表返回。 类似(x =(negate vara))其中x是列表。我看起来让谷歌和堆栈溢出,但我找不到一个非常简单的基本任务。方式存储功能的结果,(让)
原谅我的计划,我只是starting..and从命令式语言去功能不好的语法也不是那么顺畅..
编辑:
我想打印出来的结果表达式(否定vara),但由于计划只打印出最后一次“递归调用”(请原谅我的错误措辞)。我想它使用来自(否定翻)所产生的名单,但仍然打印出清单像
say if I had
(else (test (negate vara)))
...
(define (test vara)
(display "test")
)
I wanted it to display
'(O a b)) ;list
here
伪代码不清楚。你为什么不用你选择的另一种编程语言编写一个完整的_working_例子(意思是:编译并实际运行的例子)? –