Discussion:
[Lisp-cn] eqan? is not for itself 是什么意思? - The Little Schemer
l***@gmail.com
2018-01-18 08:13:49 UTC
Permalink
猖皋新手圚看 The Little Schemer <https://book.douban.com/subject/1632977/>

TLS ch4 p78

Can we assume that all functions written using eq ? can be generalized by
replacing eq ? by eqan ?

answer:

Yes, except , of course, for eqan? itself.

In TLS, eq? takes two arguments. Each must be a nonnumeric atom.

(define eqan?
(lambda (a1 a2)
(cond
((and (number? a1) (number? a2))
(= a1 a2))
((or (number? a1) (number? a2)) #f)
(else (eq? a1 a2)))))

问题

Yes, except , of course, for eqan? itself.

这句话是什么意思

我的理解是把 eqan? 圓䜜它自己的参数进行比蟃类䌌

(eqan? eqan? eqan?)

圚 jupyter calysto scheme 里测试的结果郜是 true。按照乊䞭的意思是无法比蟃吗应该怎么理解
[image: eqan]
​
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn

---
悚收到歀邮件是因䞺悚订阅了 Google 眑䞊论坛的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁退订歀矀组并停止接收歀矀组的电子邮件请发送电子邮件到lisp-cn+***@googlegroups.com。
芁查看曎倚选项请访问 https://groups.google.com/d/optout。
Zoom.Quiet
2018-01-18 08:44:28 UTC
Permalink
Post by l***@gmail.com
猖皋新手圚看 The Little Schemer <https://book.douban.com/subject/1632977/>
<~ 俺补充䞀䞋背景, 绝对的新人皋序媛, github 郜才泚册䞍超过半幎,
䜆是, 只是因䞺圚各种皋序猿必读乊单䞭总是见到 Scheme 这䞪语蚀, 然后就自行匀始孊习了.
Post by l***@gmail.com
TLS ch4 p78
Can we assume that all functions written using eq ? can be generalized by
replacing eq ? by eqan ?
Yes, except , of course, for eqan? itself.
In TLS, eq? takes two arguments. Each must be a nonnumeric atom.
(define eqan?
(lambda (a1 a2)
(cond
((and (number? a1) (number? a2))
(= a1 a2))
((or (number? a1) (number? a2)) #f)
(else (eq? a1 a2)))))
问题
Yes, except , of course, for eqan? itself.
这句话是什么意思
原文的䞊䞋文劂附件截屏;
根据俺的刷乊䜓验, TLS 的尿性呢, 是所有代衚/文案, 郜是圓章关联的..

所以, 这句话的含义就是回答问题, 没有倚䜙的嗯哌,
是的, 圚所有 eq? 出没的地方郜可以甚 eqan? 来替代,
䜜甚是等价的...
Post by l***@gmail.com
我的理解是把 eqan? 圓䜜它自己的参数进行比蟃类䌌
(eqan? eqan? eqan?)
圚 jupyter calysto scheme 里测试的结果郜是 true。按照乊䞭的意思是无法比蟃吗应该怎么理解
[image: eqan]
​
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
life is pathetic, go Pythonic! 人生苊短, Python圓歌!
俺: http://zoomquiet.io
授: http://creativecommons.org/licenses/by-sa/2.5/cn/
怒: 冗䜙䞍做,日子甭过!倇仜䞍做,十恶䞍赊!
KM keep growing environment culture which promoting organization learning!
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn

---
悚收到歀邮件是因䞺悚订阅了 Google 眑䞊论坛的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁退订歀矀组并停止接收歀矀组的电子邮件请发送电子邮件到lisp-cn+***@googlegroups.com。
芁查看曎倚选项请访问 https://groups.google.com/d/optout。
Nala Ginrut
2018-01-18 09:50:20 UTC
Permalink
只是匀玩笑的语气而已虜然二者等价可以盞互替换䜆eqan?肯定埗甚eq?来实现因䞺它䞍是primitive

有些叙述意䌚就奜了
Post by Zoom.Quiet
Post by l***@gmail.com
猖皋新手圚看 The Little Schemer <https://book.douban.com/subject/1632977/>
<~ 俺补充䞀䞋背景, 绝对的新人皋序媛, github 郜才泚册䞍超过半幎,
䜆是, 只是因䞺圚各种皋序猿必读乊单䞭总是见到 Scheme 这䞪语蚀, 然后就自行匀始孊习了.
Post by l***@gmail.com
TLS ch4 p78
Can we assume that all functions written using eq ? can be generalized by
replacing eq ? by eqan ?
Yes, except , of course, for eqan? itself.
In TLS, eq? takes two arguments. Each must be a nonnumeric atom.
(define eqan?
(lambda (a1 a2)
(cond
((and (number? a1) (number? a2))
(= a1 a2))
((or (number? a1) (number? a2)) #f)
(else (eq? a1 a2)))))
问题
Yes, except , of course, for eqan? itself.
这句话是什么意思
原文的䞊䞋文劂附件截屏;
根据俺的刷乊䜓验, TLS 的尿性呢, 是所有代衚/文案, 郜是圓章关联的..
所以, 这句话的含义就是回答问题, 没有倚䜙的嗯哌,
是的, 圚所有 eq? 出没的地方郜可以甚 eqan? 来替代,
䜜甚是等价的...
Post by l***@gmail.com
我的理解是把 eqan? 圓䜜它自己的参数进行比蟃类䌌
(eqan? eqan? eqan?)
圚 jupyter calysto scheme 里测试的结果郜是 true。按照乊䞭的意思是无法比蟃吗应该怎么理解
[image: eqan]
​
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
life is pathetic, go Pythonic! 人生苊短, Python圓歌!
俺: http://zoomquiet.io
授: http://creativecommons.org/licenses/by-sa/2.5/cn/
怒: 冗䜙䞍做,日子甭过!倇仜䞍做,十恶䞍赊!
KM keep growing environment culture which promoting organization learning!
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn

---
悚收到歀邮件是因䞺悚订阅了 Google 眑䞊论坛的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁退订歀矀组并停止接收歀矀组的电子邮件请发送电子邮件到lisp-cn+***@googlegroups.com。
芁查看曎倚选项请访问 https://groups.google.com/d/optout。
Zoom.Quiet
2018-01-18 09:54:06 UTC
Permalink
只是开玩笑的语气而已,虽然二者等价可以相互替换,但eqan?肯定得用eq?来实现,因为它不是primitive
有些叙述意会就好了
是也乎,( ̄▽ ̄)
禅师 是深圳创客老司机:个人网站虽然停了, 但是, 以往的嗯哼都有在搜索引擎中缓存, 值得挖掘...
SZDIY Community http://szdiy.org/members
编程新手在看 The Little Schemer
<~ 俺补充一下背景, 绝对的新人程序媛, github 都才注册不超过半年,
但是, 只是因为在各种程序猿必读书单中总是见到 Scheme 这个语言, 然后就自行开始学习了.
TLS ch4 p78
Can we assume that all functions written using eq ? can be generalized by replacing eq ? by eqan ?
Yes, except , of course, for eqan? itself.
In TLS, eq? takes two arguments. Each must be a nonnumeric atom.
(define eqan?
(lambda (a1 a2)
(cond
((and (number? a1) (number? a2))
(= a1 a2))
((or (number? a1) (number? a2)) #f)
(else (eq? a1 a2)))))
问题
Yes, except , of course, for eqan? itself.
这句话是什么意思?
原文的上下文如附件截屏;
根据俺的刷书体验, TLS 的尿性呢, 是所有代表/文案, 都是当章关联的..
所以, 这句话的含义就是回答问题, 没有多余的嗯哼,
是的, 在所有 eq? 出没的地方都可以用 eqan? 来替代,
作用是等价的...
我的理解是把 eqan? 当作它自己的参数进行比较,类似
(eqan? eqan? eqan?)
在 jupyter calysto scheme 里测试的结果都是 true。按照书中的意思是无法比较吗?应该怎么理解?
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了Google网上论坛上的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问https://groups.google.com/d/optout。
--
life is pathetic, go Pythonic! 人生苦短, Python当歌!
俺: http://zoomquiet.io
授: http://creativecommons.org/licenses/by-sa/2.5/cn/
怒: 冗余不做,日子甭过!备份不做,十恶不赦!
KM keep growing environment culture which promoting organization learning!
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了Google网上论坛上的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了Google网上论坛上的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问https://groups.google.com/d/optout。
--
life is pathetic, go Pythonic! 人生苦短, Python当歌!
俺: http://zoomquiet.io
授: http://creativecommons.org/licenses/by-sa/2.5/cn/
怒: 冗余不做,日子甭过!备份不做,十恶不赦!
KM keep growing environment culture which promoting organization learning!
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn

---
您收到此邮件是因为您订阅了 Google 网上论坛的“Lisp-cn(Lisp中文用户组)”群组。
要退订此群组并停止接收此群组的电子邮件,请发送电子邮件到lisp-cn+***@googlegroups.com。
要查看更多选项,请访问 https://gr
Nala Ginrut
2018-01-18 09:55:48 UTC
Permalink
谁说停了,暂时没更新是因为在自己写一个blog engine而已
Post by Zoom.Quiet
只是开玩笑的语气而已,虽然二者等价可以相互替换,但eqan?肯定得用eq?来实现,因为它不是primitive
有些叙述意会就好了
是也乎,( ̄▽ ̄)
禅师 是深圳创客老司机:个人网站虽然停了, 但是, 以往的嗯哼都有在搜索引擎中缓存, 值得挖掘...
SZDIY Community http://szdiy.org/members
编程新手在看 The Little Schemer
<~ 俺补充一下背景, 绝对的新人程序媛, github 都才注册不超过半年,
但是, 只是因为在各种程序猿必读书单中总是见到 Scheme 这个语言, 然后就自行开始学习了.
TLS ch4 p78
Can we assume that all functions written using eq ? can be generalized by replacing eq ? by eqan ?
Yes, except , of course, for eqan? itself.
In TLS, eq? takes two arguments. Each must be a nonnumeric atom.
(define eqan?
(lambda (a1 a2)
(cond
((and (number? a1) (number? a2))
(= a1 a2))
((or (number? a1) (number? a2)) #f)
(else (eq? a1 a2)))))
问题
Yes, except , of course, for eqan? itself.
这句话是什么意思?
原文的上下文如附件截屏;
根据俺的刷书体验, TLS 的尿性呢, 是所有代表/文案, 都是当章关联的..
所以, 这句话的含义就是回答问题, 没有多余的嗯哼,
是的, 在所有 eq? 出没的地方都可以用 eqan? 来替代,
作用是等价的...
我的理解是把 eqan? 当作它自己的参数进行比较,类似
(eqan? eqan? eqan?)
在 jupyter calysto scheme 里测试的结果都是 true。按照书中的意思是无法比较吗?应该怎么理解?
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了Google网上论坛上的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问https://groups.google.com/d/optout。
--
life is pathetic, go Pythonic! 人生苦短, Python当歌!
俺: http://zoomquiet.io
授: http://creativecommons.org/licenses/by-sa/2.5/cn/
怒: 冗余不做,日子甭过!备份不做,十恶不赦!
KM keep growing environment culture which promoting organization learning!
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了Google网上论坛上的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了Google网上论坛上的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问https://groups.google.com/d/optout。
--
life is pathetic, go Pythonic! 人生苦短, Python当歌!
俺: http://zoomquiet.io
授: http://creativecommons.org/licenses/by-sa/2.5/cn/
怒: 冗余不做,日子甭过!备份不做,十恶不赦!
KM keep growing environment culture which promoting organization learning!
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了 Google 网上论坛的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问 https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn

---
您收到此邮件是因为您订阅了 Google 网上论坛的“Lisp-cn(Lisp中文用户组)”群组。
要退订此群组并停止接收此群组的电子邮件,请发送电子邮件到lisp-cn+***@googlegroups.com。
要查看更多选项,请访问 https://groups.google.com/d/optout。
Nala Ginrut
2018-01-18 10:06:57 UTC
Permalink
原来是linode今天修复meltdown所以重启了...
Post by Nala Ginrut
谁说停了,暂时没更新是因为在自己写一个blog engine而已
Post by Zoom.Quiet
只是开玩笑的语气而已,虽然二者等价可以相互替换,但eqan?肯定得用eq?来实现,因为它不是primitive
有些叙述意会就好了
是也乎,( ̄▽ ̄)
禅师 是深圳创客老司机:个人网站虽然停了, 但是, 以往的嗯哼都有在搜索引擎中缓存, 值得挖掘...
SZDIY Community http://szdiy.org/members
编程新手在看 The Little Schemer
<~ 俺补充一下背景, 绝对的新人程序媛, github 都才注册不超过半年,
但是, 只是因为在各种程序猿必读书单中总是见到 Scheme 这个语言, 然后就自行开始学习了.
TLS ch4 p78
Can we assume that all functions written using eq ? can be generalized by replacing eq ? by eqan ?
Yes, except , of course, for eqan? itself.
In TLS, eq? takes two arguments. Each must be a nonnumeric atom.
(define eqan?
(lambda (a1 a2)
(cond
((and (number? a1) (number? a2))
(= a1 a2))
((or (number? a1) (number? a2)) #f)
(else (eq? a1 a2)))))
问题
Yes, except , of course, for eqan? itself.
这句话是什么意思?
原文的上下文如附件截屏;
根据俺的刷书体验, TLS 的尿性呢, 是所有代表/文案, 都是当章关联的..
所以, 这句话的含义就是回答问题, 没有多余的嗯哼,
是的, 在所有 eq? 出没的地方都可以用 eqan? 来替代,
作用是等价的...
我的理解是把 eqan? 当作它自己的参数进行比较,类似
(eqan? eqan? eqan?)
在 jupyter calysto scheme 里测试的结果都是 true。按照书中的意思是无法比较吗?应该怎么理解?
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了Google网上论坛上的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问https://groups.google.com/d/optout。
--
life is pathetic, go Pythonic! 人生苦短, Python当歌!
俺: http://zoomquiet.io
授: http://creativecommons.org/licenses/by-sa/2.5/cn/
怒: 冗余不做,日子甭过!备份不做,十恶不赦!
KM keep growing environment culture which promoting organization learning!
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了Google网上论坛上的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了Google网上论坛上的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问https://groups.google.com/d/optout。
--
life is pathetic, go Pythonic! 人生苦短, Python当歌!
俺: http://zoomquiet.io
授: http://creativecommons.org/licenses/by-sa/2.5/cn/
怒: 冗余不做,日子甭过!备份不做,十恶不赦!
KM keep growing environment culture which promoting organization learning!
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了 Google 网上论坛的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问 https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn

---
您收到此邮件是因为您订阅了 Google 网上论坛的“Lisp-cn(Lisp中文用户组)”群组。
要退订此群组并停止接收此群组的电子邮件,请发送电子邮件到lisp-cn+***@googlegroups.com。
要查看更多选项,请访问 https://groups.go
Hui Yan
2018-01-18 10:56:05 UTC
Permalink
奜吧是我想倚了  

谢谢 Nala Ginrut谢谢倧劈支持
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn

---
悚收到歀邮件是因䞺悚订阅了 Google 眑䞊论坛的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁退订歀矀组并停止接收歀矀组的电子邮件请发送电子邮件到lisp-cn+***@googlegroups.com。
芁查看曎倚选项请访问 https://groups.google.com/d/optout。
Chaos Eternal
2018-01-18 11:07:49 UTC
Permalink
Orgmode static blog
谁诎停了暂时没曎新是因䞺圚自己写䞀䞪blog engine而已
Post by Nala Ginrut
只是匀玩笑的语气而已虜然二者等价可以盞互替换䜆eqan?肯定埗甚eq?来实现因䞺它䞍是primitive
有些叙述意䌚就奜了
是也乎,( ̄▜ ̄)
犅垈 是深圳创客老叞机:䞪人眑站虜然停了, 䜆是, 以埀的嗯哌郜有圚搜玢匕擎䞭猓存, 倌埗挖掘...
SZDIY Community http://szdiy.org/members
Post by Nala Ginrut
Post by Zoom.Quiet
Post by l***@gmail.com
猖皋新手圚看 The Little Schemer
<~ 俺补充䞀䞋背景, 绝对的新人皋序媛, github 郜才泚册䞍超过半幎,
䜆是, 只是因䞺圚各种皋序猿必读乊单䞭总是见到 Scheme 这䞪语蚀, 然后就自行匀始孊习了.
Post by l***@gmail.com
TLS ch4 p78
Can we assume that all functions written using eq ? can be
generalized by replacing eq ? by eqan ?
Post by Nala Ginrut
Post by Zoom.Quiet
Post by l***@gmail.com
Yes, except , of course, for eqan? itself.
In TLS, eq? takes two arguments. Each must be a nonnumeric atom.
(define eqan?
(lambda (a1 a2)
(cond
((and (number? a1) (number? a2))
(= a1 a2))
((or (number? a1) (number? a2)) #f)
(else (eq? a1 a2)))))
问题
Yes, except , of course, for eqan? itself.
这句话是什么意思
原文的䞊䞋文劂附件截屏;
根据俺的刷乊䜓验, TLS 的尿性呢, 是所有代衚/文案, 郜是圓章关联的..
所以, 这句话的含义就是回答问题, 没有倚䜙的嗯哌,
是的, 圚所有 eq? 出没的地方郜可以甚 eqan? 来替代,
䜜甚是等价的...
Post by l***@gmail.com
我的理解是把 eqan? 圓䜜它自己的参数进行比蟃类䌌
(eqan? eqan? eqan?)
圚 jupyter calysto scheme 里测试的结果郜是 true。按照乊䞭的意思是无法比蟃吗应该怎么理解
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
life is pathetic, go Pythonic! 人生苊短, Python圓歌!
俺: http://zoomquiet.io
授: http://creativecommons.org/licenses/by-sa/2.5/cn/
怒: 冗䜙䞍做,日子甭过!倇仜䞍做,十恶䞍赊!
KM keep growing environment culture which promoting organization
learning!
Post by Nala Ginrut
Post by Zoom.Quiet
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了Google眑䞊论坛䞊的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问https://groups.google.com/d/optout。
--
life is pathetic, go Pythonic! 人生苊短, Python圓歌!
俺: http://zoomquiet.io
授: http://creativecommons.org/licenses/by-sa/2.5/cn/
怒: 冗䜙䞍做,日子甭过!倇仜䞍做,十恶䞍赊!
KM keep growing environment culture which promoting organization
learning!
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了 Google 眑䞊论坛的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问 https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn
---
悚收到歀邮件是因䞺悚订阅了 Google 眑䞊论坛的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁查看曎倚选项请访问 https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp䞭文甚户组)
CLUG http://lisp.org.cn

---
悚收到歀邮件是因䞺悚订阅了 Google 眑䞊论坛的“Lisp-cn(Lisp䞭文甚户组)”矀组。
芁退订歀矀组并停止接收歀矀组的电子邮件请发送电子邮件到lisp-cn+***@googlegroups.com。
芁查看曎倚选项请访问 https://groups.google.com/d/optout。
Nala Ginrut
2018-01-19 09:14:25 UTC
Permalink
自从用org-mode来写项目文档以后,感觉用来写blog逼格不够
Post by Chaos Eternal
Orgmode static blog
Post by Nala Ginrut
谁说停了,暂时没更新是因为在自己写一个blog engine而已
Post by Zoom.Quiet
只是开玩笑的语气而已,虽然二者等价可以相互替换,但eqan?肯定得用eq?来实现,因为它不是primitive
有些叙述意会就好了
是也乎,( ̄▽ ̄)
禅师 是深圳创客老司机:个人网站虽然停了, 但是, 以往的嗯哼都有在搜索引擎中缓存, 值得挖掘...
SZDIY Community http://szdiy.org/members
编程新手在看 The Little Schemer
<~ 俺补充一下背景, 绝对的新人程序媛, github 都才注册不超过半年,
但是, 只是因为在各种程序猿必读书单中总是见到 Scheme 这个语言, 然后就自行开始学习了.
TLS ch4 p78
Can we assume that all functions written using eq ? can be
generalized by replacing eq ? by eqan ?
Yes, except , of course, for eqan? itself.
In TLS, eq? takes two arguments. Each must be a nonnumeric atom.
(define eqan?
(lambda (a1 a2)
(cond
((and (number? a1) (number? a2))
(= a1 a2))
((or (number? a1) (number? a2)) #f)
(else (eq? a1 a2)))))
问题
Yes, except , of course, for eqan? itself.
这句话是什么意思?
原文的上下文如附件截屏;
根据俺的刷书体验, TLS 的尿性呢, 是所有代表/文案, 都是当章关联的..
所以, 这句话的含义就是回答问题, 没有多余的嗯哼,
是的, 在所有 eq? 出没的地方都可以用 eqan? 来替代,
作用是等价的...
我的理解是把 eqan? 当作它自己的参数进行比较,类似
(eqan? eqan? eqan?)
在 jupyter calysto scheme 里测试的结果都是 true。按照书中的意思是无法比较吗?应该怎么理解?
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了Google网上论坛上的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问https://groups.google.com/d/optout。
--
life is pathetic, go Pythonic! 人生苦短, Python当歌!
俺: http://zoomquiet.io
授: http://creativecommons.org/licenses/by-sa/2.5/cn/
怒: 冗余不做,日子甭过!备份不做,十恶不赦!
KM keep growing environment culture which promoting organization learning!
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了Google网上论坛上的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了Google网上论坛上的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问https://groups.google.com/d/optout。
--
life is pathetic, go Pythonic! 人生苦短, Python当歌!
俺: http://zoomquiet.io
授: http://creativecommons.org/licenses/by-sa/2.5/cn/
怒: 冗余不做,日子甭过!备份不做,十恶不赦!
KM keep growing environment culture which promoting organization learning!
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了 Google 网上论坛的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问 https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了 Google 网上论坛的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问 https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn
---
您收到此邮件是因为您订阅了Google网上论坛上的“Lisp-cn(Lisp中文用户组)”群组。
要查看更多选项,请访问https://groups.google.com/d/optout。
--
--
Lisp-cn(Lisp中文用户组)
CLUG http://lisp.org.cn

---
您收到此邮件是因为您订阅了 Google 网上论坛的“Lisp-cn(Lisp中文用户组)”群组。
要退订此群组并停止接收此群组的电子邮件,请发送电子邮件到lisp-cn+***@googlegroups.com。
要查看更多选项,请访问 https://grou
Loading...