写不出来

一楼给度娘

(define (generator product) (define (status resume) (product (lambda x (set! status resume) (resume x)))) (lambda () (call/cc status))) (define test (generator (lambda (yield) (let loop ((i 0) (sum 0)) (yield sum) (loop (+ i 1) (+ i sum))))))

求一位大佬给讲讲题

最近看完了R5RS文档（能看懂的部分），里面谈到load的方法，这才明白原来可以用load函数载入写好的源代码，要不然，我的Chez Scheme还只能运行单行的代码呢。 想问问各位大神，chez到底可以怎么用啊？比如和什么sublime啊，vim这些搭配可以吗？搭配使得我能在比如vim里写好了代码，按个什么按钮就直接开始调用chez进行运行。 诸如此类的。。。求教。谢谢

rt，就想看程序执行过程中变量的变化情况

铁路12306的scheme协议 cn.12306:// 为什么没有用，还有他的详情页该怎么跳

一个简单的解释器，有源码，但看不太懂，需要讲解调试，价格好说！

scheme中有没有类似sprintf的函数？将将数字格式化变成字符串后赋给一个字符串变量，先行谢谢了！

求scheme大佬看一下这道题 有偿回答！！！

刚刚接触到，请问一下把一个操作定义成syntax 和定义成函数有什么区别？

使用无限流来定义一些我们喜欢的序列。在下面为您定义了函数combine-with，以及如何使用它定义偶数流的示例。 (define (naturals n) (cons-stream n (naturals (+ n 1)))) (define (combine-with f xs ys) (if (or (null? xs) (null? ys)) nil (cons-stream (f (car xs) (car ys)) (combine-with f (cdr-stream xs) (cdr-stream ys))))) (define (slice s start end) (define (helper s n start end) (cond ((null? s) nil) ((>= n end) nil) ((< n start) (helper (cdr-stream s) (+ n 1) start end)) ((>= n start) (cons (car s) (helper (cdr-stream s) (+ n 1) start end))) ) ) (he

问题是这个程序的功能是什么。 如果能每步都讲解一下就更好了，不胜感激

2020年夏天，TeXmacs中文社区会发起TeXmacs Summer of Code，形式上和Google Summer of Code类似，最终完成TeXmacs Summer of Code的学生（总共1名）将获得TeXmacs中文社区提供的2020人民币。（如果有土豪赞助TSOC，我们可以把奖励提高一些） 参与者：中国（不仅限于大陆）大学生 时间：2020年夏季 具体的细节还在拟定中，欢迎想参加本活动的小伙伴加入GNU TeXmacs的QQ群（934456971）参与讨论。也希望有Summer of Code经验的小伙伴莅临指导。 TeXmacs贴吧原文链接： https://tieba.baidu.c

let函数不是不直接计算么，为什么可以用let人为计算?

这个吧没人吗气氛很诡异

在GitHub上下了Chezscheme的源码，但不会编译，一直出错，AWSL

@鸡蛋小哥 代码如下（等级不够不能上传啊..） ;r: result ;g: graph ;v: vertice ;p: path(length) ;plist: pair-list ;vp-plist: vertice-path-pair

用racket写的第一个程序，网上也查不到资料，求助这里应该怎么写才对？以及为什么会是错的？ 先谢谢各位大佬！

我正在设计实现一个中文的受Scheme影响的calculus

list是用cons表示的，想了半天还是不知道该怎么写出这种rotate functionQAQ 求助大佬=。=

代码里看到这个(-1+ x)和(1+ y) 请问这和(- x 1) 以及 (+ y 1)有啥区别? -1+和1+是运算符?

查了r5rs的文档 操作符只有let let*和letrec 没有letcc 我是看The Seasoned Schemer 的 但是在DrRacket里letcc是红字啊 也就是说DrRacket不识别letcc

刚刚编译好的。 链接：http://pan.baidu.com/s/1i4B8hJv 密码：guyl

请问scheme cons 两个元素后为什么有个点 如果(cons 1 2) 则得到(1 . 2) 如果(cons 1 (cons 2 `())) 则得到(1 2) 请问scheme为什么这么设计？弄个点恶心人吗？ 还有scheme教程里经常有 讲解(1 . (2 . (3. `()))) 能得到（1 2 3）的这个规则 可是这个规则有什么用？ 这和cons表达出来的意思有什么不一样的吗， 这是要给cons 起个点的别名再重复一遍

1.Write the function filter that take a predicate and a list as its inputs and returns a list containing those elements that were satisfied by the predicate. (filter odd? '(5 12 31 7 98 13) // returns (5 31 7 13) (filter (lambda (x) (> x 10)) '(3 47 18 2 20) // returns (47 18 20) (filter list? '(() 2 ((6) 4))) // returns (() ((6) 4)) 2.Write the function reverse that takes a list as its input and returns a list with the order of those elements reversed.Note that any sublists are not reversed. (reverse '(5 12 31 7 98 13)) // returns (13 98 7 31 12 5) (reverse '((1 2) 3))

恕我愚笨，明明就那么几个按钮，我硬是按了两天没搞明白怎么写多行。 然后，我用别的编辑器写了个多行的，导入进来也不知道怎么运行。如图 感谢大佬

作为Win10的一个新特性，WSL可以在windows中使用接近原生的Ubuntu16.04.于是在wsl中使用ChezScheme也很方便。吧中已经有大神将ChezScheme编译后制作了windows下的安装包，需要的朋友可以直接下载安装。链接https://tieba.baidu.com/p/4998810479。想要在linux环境下使用ChezScheme但又不想安装双系统或者虚拟机的朋友可以参考我的帖子。 1. 关于如何开启WSL已经安装相应的Linux发行版这里就不再赘述，主要可以参考微软官方的教程https://docs.microsoft.com/zh-cn/windows/wsl/install-win10 2.

在ubuntu16.04报错 gcc version 5.4.0 20160609 (Ubuntu 5.4.0-6ubuntu1~16.04.10) uname -a Linux VM-0-12-ubuntu 4.4.0-130-generic #156-Ubuntu SMP Thu Jun 14 08:53:28 UTC 2018 x86_64 x86_64 x86_64 GNU/Linux 报错信息如下 compiling strip.ss with output to strip.a6le compiling ftype.ss with output to ftype.a6le compiling back.ss with output to back.a6le compiling cpnanopass.ss with output to cpnanopass.a6le Mf-base:487: recipe for target 'bootall' failed make[4]: *** [bootall] Killed Mf-base:164: recipe for target 'allx' failed make[3]: *** [allx] Error 2 Mf-base:181: recipe f

如(cond (条件) ((语句A) (语句B))) (语句A) (语句B)是怎么样连接起来的

请教怎样在scheme写这个， 我从C++刚过来学习，有点搞不清了 我想从一个list里面找相同element,如果有就输出#f, 如果没有就输出#t 比如(diff? '(2 7 1 4 1) ；表示这这个list里面的element是不是都是不一样 #f 如果 (diff? (1 2 3 4 5 6)) #t (define diff? (lambda (L) (cond ((null? L) #f) ((equal? (car L) (car(cdr L))) (diff (cdr L))) ((diff? (cdr L))) ))) (all-different? '(1 2 3 1)) 我这里有error出现： car: contract violation expected: pair? given: '()

如题。 刚刚在Geiser的页面浏览，心血来潮Google了一下 http://www.scheme.com 页面提供的Cisco Github项目网址，里面有Windows版本已经编译好的安装包（9.5 最新版本的还是要Github自行下载编译）。 https://cisco.github.io/ChezScheme/#get 传送门在这里。

RT

mitscheme 64位的安装，以及依赖的软件。已经打包好，放在云盘，如有需要可以下载。